[ViewVC] Diff of: cvs/deliantra/Deliantra-Client/DC/Protocol.pm

Comparing deliantra/Deliantra-Client/DC/Protocol.pm (file contents):
Revision 1.93 by root, Fri Dec 22 03:43:05 2006 UTC vs.
Revision 1.95 by root, Wed Apr 4 02:43:30 2007 UTC

       map ["$cmd$_", $text],
          sort { (length $a) <=> (length $b) }
             @args
   } sort { $a->{par} <=> $b->{par} }
          CFPlus::Pod::find command => "*";
+  $self->connect_ext (event_capabilities => sub {
+     my ($cap) = @_;
+     if (my $ts = $cap->{tileset}) {
+        if (my ($default) = grep $_->[2] & 1, @$ts) {
+           $self->{tileset} = $default;
+           $self->{tilesize} = $default->[3];
+           $self->setup_req (tileset => $default->[0]);
+           my $w = int $self->{mapw} * 32 / $self->{tilesize};
+           my $h = int $self->{maph} * 32 / $self->{tilesize};
+           $self->setup_req (mapsize => "${w}x${h}");
+        }
+     }
+  });
   $self->{map_widget}->add_command (@$_)
      for @cmd_help;
    $self->{noface} = new_from_file CFPlus::Texture
 }
 sub setup {
    my ($self, $setup) = @_;
+   $self->{map_widget}->set_tilesize ($self->{tilesize});
    $::MAP->resize ($self->{mapw}, $self->{maph});
 }
 sub addme_success {
    my ($self) = @_;
    $self->update_server_info;
    $self->send_command ("output-sync $::CFG->{output_sync}");
    $self->send_command ("output-count $::CFG->{output_count}");
+   $self->send_command ("output-rate $::CFG->{output_rate}") if $::CFG->{output_rate} > 0;
    $self->send_command ("pickup $::CFG->{pickup}");
 }
 sub buildat {
    my ($self, $builditem, $x, $y) = @_;

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