ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/Deliantra-Client/DC/UI.pm
(Generate patch)

Comparing deliantra/Deliantra-Client/DC/UI.pm (file contents):
Revision 1.393 by root, Sat Jul 21 13:41:46 2007 UTC vs.
Revision 1.394 by root, Sat Jul 21 13:54:03 2007 UTC

789} 789}
790 790
791sub clear { 791sub clear {
792 my ($self) = @_; 792 my ($self) = @_;
793 793
794 my $children = delete $self->{children}; 794 my $children = $self->{children};
795 $self->{children} = []; 795 $self->{children} = [];
796 796
797 for (@$children) { 797 for (@$children) {
798 delete $_->{parent}; 798 delete $_->{parent};
799 $_->hide; 799 $_->hide;
1119 1119
1120 my ($w1, $w2) = ($child->{w}, $self->{vp}{w}); 1120 my ($w1, $w2) = ($child->{w}, $self->{vp}{w});
1121 $self->{hslider}->set_range ([$self->{hslider}{range}[0], 0, $w1, $w2, 1]); 1121 $self->{hslider}->set_range ([$self->{hslider}{range}[0], 0, $w1, $w2, 1]);
1122 1122
1123 my $visible = $w1 > $w2; 1123 my $visible = $w1 > $w2;
1124 if ($visible != $self->{hslider}{visible}) { 1124 if ($visible != $self->{hslider_visible}) {
1125 $self->{hslider_visible} = $visible;
1125 $visible ? $self->SUPER::add ($self->{hslider}) 1126 $visible ? $self->SUPER::add ($self->{hslider})
1126 : $self->SUPER::remove ($self->{hslider}); 1127 : $self->SUPER::remove ($self->{hslider});
1127 } 1128 }
1128 1129
1129 my ($h1, $h2) = ($child->{h}, $self->{vp}{h}); 1130 my ($h1, $h2) = ($child->{h}, $self->{vp}{h});
1130 $self->{vslider}->set_range ([$self->{vslider}{range}[0], 0, $h1, $h2, 1]); 1131 $self->{vslider}->set_range ([$self->{vslider}{range}[0], 0, $h1, $h2, 1]);
1131 1132
1132 my $visible = $h1 > $h2; 1133 my $visible = $h1 > $h2;
1133 if ($visible != $self->{vslider}{visible}) { 1134 if ($visible != $self->{vslider_visible}) {
1135 $self->{vslider_visible} = $visible;
1134 $visible ? $self->SUPER::add ($self->{vslider}) 1136 $visible ? $self->SUPER::add ($self->{vslider})
1135 : $self->SUPER::remove ($self->{vslider}); 1137 : $self->SUPER::remove ($self->{vslider});
1136 } 1138 }
1137} 1139}
1138 1140

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines