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

Comparing deliantra/Deliantra-Client/DC/UI.pm (file contents):
Revision 1.350 by root, Sat Aug 19 18:39:24 2006 UTC vs.
Revision 1.353 by root, Thu Nov 16 19:42:45 2006 UTC

       glClear GL_COLOR_BUFFER_BIT;
       {
          package CFPlus::UI::Base;
-         ($draw_x, $draw_y, $draw_w, $draw_h) =
+         local ($draw_x, $draw_y, $draw_w, $draw_h) =
             (0, 0, $self->{w}, $self->{h});
+         $self->_render;
       }
-      $self->_render;
    };
 }
 sub _draw {
    my ($self) = @_;
       $self->{texture} ||= new_from_opengl CFPlus::Texture $W, $H, sub {
          glClearColor 0, 0, 0, 0;
          glClear GL_COLOR_BUFFER_BIT;
+         package CFPlus::UI::Base;
+         local ($draw_x, $draw_y, $draw_w, $draw_h) =
+            (0, 0, $self->{w}, $self->{h});
          my $top = int $self->{children}[1]{range}[0];
          my $paridx = 0;
          my $top_paragraph;
          my $top = int $self->{children}[1]{range}[0];
 package CFPlus::UI::Buttonbar;
 our @ISA = CFPlus::UI::HBox::;
-# TODO: should actualyl wrap buttons and other goodies.
+# TODO: should actually wrap buttons and other goodies.
 #############################################################################
 package CFPlus::UI::Menu;
    glLoadIdentity;
    {
       package CFPlus::UI::Base;
-      ($draw_x, $draw_y, $draw_w, $draw_h) =
+      local ($draw_x, $draw_y, $draw_w, $draw_h) =
          (0, 0, $self->{w}, $self->{h});
-   }
-   $self->_draw;
+      $self->_draw;
+   }
 }
 #############################################################################
 package CFPlus::UI;

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