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

Comparing deliantra/Deliantra-Client/DC/UI.pm (file contents):
Revision 1.438 by root, Sat Sep 1 07:22:21 2007 UTC vs.
Revision 1.440 by root, Sun Sep 16 18:27:48 2007 UTC

    $self->{force_h} = $h;
    $self->realloc;
 }
+# traverse the widget chain up to find the maximum "physical" size constraints
+sub get_max_wh {
+   my ($self) = @_;
+   return $self->{parent}->get_max_wh
+      if $self->{parent};
+   ($::WIDTH, $::HEIGHT)
+}
 sub size_request {
    require Carp;
    Carp::confess "size_request is abstract";
 }
    1
 }
 #############################################################################
 # back-buffered drawing area
 package CFPlus::UI::Window;
 our @ISA = CFPlus::UI::Bin::;
    $self->CFPlus::UI::Container::add ($self->{title_widget}) if $self->{title_widget};
 }
 sub border {
    int $_[0]{border} * $::FONTSIZE
+}
+sub get_max_wh {
+   my ($self) = @_;
+   return ($self->{w}, $self->{h})
+      if $self->{visible} && $self->{w};
+   $self->SUPER::get_max_wh
 }
 sub size_request {
    my ($self) = @_;
 sub size_request {
    my ($self) = @_;
    $self->{size_req} ||= do {
+      my ($max_w, $max_h) = $self->get_max_wh;
       $self->{layout}->set_font ($self->{font}) if $self->{font};
-      $self->{layout}->set_width ($self->{max_w} || -1);
+      $self->{layout}->set_width ($self->{max_w} || $max_w || -1);
       $self->{layout}->set_ellipsise ($self->{ellipsise});
       $self->{layout}->set_single_paragraph_mode ($self->{ellipsise});
       $self->{layout}->set_height ($self->{fontsize} * $::FONTSIZE);
       my ($w, $h) = $self->{layout}->size;

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