--- deliantra/Deliantra-Client/DC/Protocol.pm 2006/08/14 14:35:31 1.78 +++ deliantra/Deliantra-Client/DC/Protocol.pm 2006/08/19 02:49:55 1.81 @@ -14,7 +14,7 @@ sub new { my $class = shift; - my $self = $class->SUPER::new (@_); + my $self = $class->SUPER::new (@_, setup_req => { extmap => 0 }); $self->{map_widget}->clr_commands; @@ -47,11 +47,14 @@ $self->{open_container} = 0; # "global" - $self->{tilecache} = CFPlus::db_table "tilecache"; - $self->{facemap} = CFPlus::db_table "facemap"; + $self->{tilecache} = CFPlus::db_table "tilecache" + or die "tilecache: unable to open database table"; + $self->{facemap} = CFPlus::db_table "facemap" + or die "facemap: unable to open database table"; # per server - $self->{mapcache} = CFPlus::db_table "mapcache_$self->{host}_$self->{port}"; + $self->{mapcache} = CFPlus::db_table "mapcache_$self->{host}_$self->{port}" + or die "mapcache_$self->{host}_$self->{port}: unable to open database table"; $self } @@ -59,7 +62,6 @@ sub logprint { my ($self, @a) = @_; - return; $self->{log_fh} ||= do { my $path = "$Crossfire::VARDIR/log.$self->{host}"; @@ -342,7 +344,7 @@ sub feed_map1a { my ($self, $data) = @_; - $self->{map}->map1a_update ($data); + $self->{map}->map1a_update ($data, $self->{setup}{extmap}); $self->{map_widget}->update; } @@ -877,6 +879,7 @@ . "protocol version $self->{version}\n" . "minimap support $yesno[$self->{setup}{mapinfocmd} > 0]\n" . "extended command support $yesno[$self->{setup}{extcmd} > 0]\n" + . "map attributes $yesno[$self->{setup}{extmap} > 0]\n" . "cfplus support $yesno[$self->{cfplus_ext} > 0]" . ($self->{cfplus_ext} > 0 ? ", version $self->{cfplus_ext}" : "") ."\n" . "map size $self->{mapw}×$self->{maph}\n" @@ -925,7 +928,7 @@ sub destroy { my ($self) = @_; - $self->{npc_dialog}->destroy + (delete $self->{npc_dialog})->destroy if $self->{npc_dialog}; $self->SUPER::destroy;