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

Comparing deliantra/Deliantra-Client/DC/UI.pm (file contents):
Revision 1.191 by root, Tue May 9 22:27:53 2006 UTC vs.
Revision 1.192 by root, Tue May 9 22:49:32 2006 UTC

    $_->reconfigure
       for $self->children;
    $self->check_size;
-   $self->size_allocate ($self->{w}, $self->{h});
+   $CFClient::UI::ROOT->{size_alloc}{$self} = [$self, $self->{w}, $self->{h}];
    $self->update;
 }
 sub set_max_size {
    my ($self, $w, $h) = @_;
 sub new {
    my $class = shift;
    my %args = @_;
-   my $item = $args{item};
+   my $item = delete $args{item};
    my $desc = $item->{nrof} < 2
       ? $item->{name}
       : "$item->{nrof} $item->{name_pl}";
          1
       },
       %args
    );
-   $self->add(new CFClient::UI::Face
+   $self->add (new CFClient::UI::Face
       can_events => 0,
       face       => $item->{face},
       anim       => $item->{anim},
-      animspeed  => $item->{animspeed});
+      animspeed  => $item->{animspeed},
+   );
-   $self->add(new CFClient::UI::Label
+   $self->add (new CFClient::UI::Label
       can_events => 0,
-      text => $desc);
+      text       => $desc,
+   );
    $self
 }
 #############################################################################
    for my $item (@items) {
       my $desc = $item->{nrof} < 2
                      ? $item->{name}
                      : "$item->{nrof} $item->{name_pl}";
-      $self->{scrolled}->add (new CFClient::UI::InventoryItem item => $item);
+      $self->{scrolled}->add ($item->{widget} ||= new CFClient::UI::InventoryItem item => $item);
    }
 #   $range->{range} = [$self->{pos}, 0, $self->{max_pos}, $page];
 }

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