--- deliantra/Deliantra-Client/DC/UI.pm	2006/04/12 23:59:42	1.93
+++ deliantra/Deliantra-Client/DC/UI.pm	2006/04/13 23:07:57	1.94
@@ -1456,9 +1456,17 @@
 sub draw {
    my ($self) = @_;
 
+   $self->{need_update}++;#d#
    if (delete $self->{need_update}) {
       glNewList $self->{list}, GL_COMPILE;
 
+      my $sw = int $::WIDTH  / 32;
+      my $sh = int $::HEIGHT / 32;
+
+      $::MAP->draw (0, 0, $sw, $sh) if $::MAP;
+      
+      if (0) {
+
       my $mx = $::CONN->{mapx};
       my $my = $::CONN->{mapy};
 
@@ -1543,6 +1551,7 @@
 
       glDisable GL_TEXTURE_2D;
       glDisable GL_BLEND;
+      }
 
       glEndList;
    }