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

Comparing deliantra/Deliantra-Client/DC/UI.pm (file contents):
Revision 1.455 by root, Thu Dec 27 19:12:19 2007 UTC vs.
Revision 1.456 by root, Fri Dec 28 11:44:02 2007 UTC

       my ($c, $w, $cs) = @$widget{qw(c_col req_w c_colspan)};
       my $sw = sum @w[$c .. $c + $cs - 1];
       if ($w > $sw) {
-         $_ += ($w - $sw) / ($sw ? $sw / $_ : $cs) for @w[$c .. $c + $cs - 1];
+         $_ += ($w - $sw) / ($_ ? $sw / $_ : $cs) for @w[$c .. $c + $cs - 1];
       }
    }
    # second pass, rows
    for my $widget (sort { $a->{c_rowspan} <=> $b->{c_rowspan} } @children) {
       my ($r, $h, $rs) = @$widget{qw(c_row req_h c_rowspan)};
       my $sh = sum @h[$r .. $r + $rs - 1];
       if ($h > $sh) {
-         $_ += ($h - $sh) / ($sh ? $sh / $_ : $rs) for @h[$r .. $r + $rs - 1];
+         $_ += ($h - $sh) / ($_ ? $sh / $_ : $rs) for @h[$r .. $r + $rs - 1];
       }
    }
    (\@w, \@h)
 }
       can_hover  => 1,
       can_focus  => 1,
       valign     => 0,
       can_events => 1,
       ellipsise  => 0,
+      padding_x  => 4,
+      padding_y  => 2,
       #text      => ...
       #hidden    => "*",
       @_
    )
 }
 our @ISA = DC::UI::EntryBase::;
 use DC::OpenGL;
+sub new {
+   my $class = shift;
+   $class->SUPER::new (
+      padding_y  => 4,
+      @_
+   )
+}
 sub move_cursor_ver {
    my ($self, $dy) = @_;
    my ($y, $x) = $self->{layout}->index_to_line_x ($self->{cursor});

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