[ViewVC] Diff of: cvs/deliantra/Deliantra-Client/bin/deliantra

Comparing deliantra/Deliantra-Client/bin/deliantra (file contents):
Revision 1.100 by root, Tue Dec 22 01:37:42 2009 UTC vs.
Revision 1.102 by elmex, Sat Mar 20 00:50:06 2010 UTC

    sub audio_tab_update;
    audio_tab_update;
 }
 sub audio_shutdown {
+   if ($SDL_MIXER) {
+      DC::MixMusic::halt;
+      DC::Mix_AllocateChannels 0;
+   }
    undef $MUSIC_PLAYER;
    undef $MUSIC_PLAYING_META;
    undef $MUSIC_PLAYING_DATA;
    $MUSIC_WANT   = [];
    @MUSIC_JINGLE = ();
    %AUDIO_PLAY   = ();
    %AUDIO_CHUNK  = ();
-   DC::MixMusic::halt;
-   DC::Mix_AllocateChannels 0;
    DC::Mix_CloseAudio if $SDL_MIXER;
    undef $SDL_MIXER;
 }
 #############################################################################
    my $text = !$freq
       ? "audio is off"
       : "audio is enabled\n"
       . "frequency (Hz): $freq\n"
-      . "channels: $chans";
+      . "channels: $chans\n"
+      . "chunk decoders available: " . (join ", ", DC::MixChunk::decoders) . "\n"
+      . "music decoders available: " . (join ", ", DC::MixMusic::decoders);
    $AUDIO_INFO->set_text ($text);
 }
 sub audio_setup {
          shift_fire_stop     => 0,
          uitheme             => "wood",
          map_shift_x         => -24, # arbitrary
          map_shift_y         => +24, # arbitrary
       );
       while (my ($k, $v) = each %DEF_CFG) {
          $CFG->{$k} = $v unless exists $CFG->{$k};
       }
       $CFG->{profile}{default}{host} ||= "gameserver.deliantra.net";
       $PROFILE = $CFG->{profile}{default};
+      $PROFILE->{host}     = $ARGV[0] if @ARGV > 0;
+      $PROFILE->{user}     = $ARGV[1] if @ARGV > 1;
+      $PROFILE->{password} = $ARGV[2] if @ARGV > 2;
       # convert old bindings (only default profile matters)
       if (my $bindings = delete $PROFILE->{bindings}) {
          while (my ($mod, $syms) = each %$bindings) {
             while (my ($sym, $cmds) = each %$syms) {
             DejaVuSansMono-BoldOblique.ttf
             mona.ttf
          );
          DC::add_font $_ for @fonts;
          $FONT_PROP  = new_from_file DC::Font $fonts[0];
          $FONT_FIXED = new_from_file DC::Font $fonts[1];
          $FONT_PROP->make_default;

Diff Legend

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines

Comparing deliantra/Deliantra-Client/bin/deliantra (file contents): Revision 1.100 by root, Tue Dec 22 01:37:42 2009 UTC vs. Revision 1.102 by elmex, Sat Mar 20 00:50:06 2010 UTC

Diff Legend

Comparing deliantra/Deliantra-Client/bin/deliantra (file contents):
Revision 1.100 by root, Tue Dec 22 01:37:42 2009 UTC vs.
Revision 1.102 by elmex, Sat Mar 20 00:50:06 2010 UTC