--- deliantra/Deliantra-Client/DC/MapWidget.pm	2006/05/17 00:26:55	1.23
+++ deliantra/Deliantra-Client/DC/MapWidget.pm	2006/05/17 16:17:01	1.26
@@ -81,6 +81,9 @@
 sub draw {
    my ($self) = @_;
 
+   return
+      unless $CFClient::UI::FOCUS == $self || !$::FAST;
+
    if (delete $self->{need_update}) {
       glNewList $self->{list};
 
@@ -247,8 +250,7 @@
 
    $tooltip =~ s/^\s+//;
 
-   $tooltip = "<big>" . (CFClient::UI::Label::escape $data) . "</big>\n\n"
-            . CFClient::UI::Label::escape $tooltip;
+   $tooltip = "<big>$data</big>\n\n$tooltip";
 
    $tooltip =~ s/\s+$//;
 
@@ -361,9 +363,10 @@
    $self->{label} = [
       map
          CFClient::UI::Label->new (
-            can_hover  => 1,
-            can_events => 1,
-            fontsize   => $_,
+            can_hover     => 1,
+            can_events    => 1,
+            tooltip_width => 0.33,
+            fontsize      => $_,
          ), (0.8) x 6
    ];
 
@@ -479,7 +482,7 @@
       $labels[0]->{fg} = [0, 0, 0, 1];
       $labels[0]->{bg} = [1, 1, 1, 0.8];
    } else {
-      delete $self->{select};
+      $self->{select} = "$cmd$arg";
    }
 
    for my $match (@matches) {