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.404 by root, Sat Jul 21 22:54:52 2007 UTC vs.
Revision 1.406 by root, Sat Jul 21 23:17:35 2007 UTC

2026 2026
2027 $self->{oy} = int ($self->{valign} < 0 ? $self->{padding_y} 2027 $self->{oy} = int ($self->{valign} < 0 ? $self->{padding_y}
2028 : $self->{valign} > 0 ? $self->{h} - $size->[1] - $self->{padding_y} 2028 : $self->{valign} > 0 ? $self->{h} - $size->[1] - $self->{padding_y}
2029 : ($self->{h} - $size->[1]) * 0.5); 2029 : ($self->{h} - $size->[1]) * 0.5);
2030 }; 2030 };
2031
2032 my $w = List::Util::min $self->{w} + 4, $size->[0];
2033 my $h = List::Util::min $self->{h} + 2, $size->[1];
2034 2031
2035 $self->{layout}->render ($self->{ox}, $self->{oy}, $self->{style}); 2032 $self->{layout}->render ($self->{ox}, $self->{oy}, $self->{style});
2036} 2033}
2037 2034
2038############################################################################# 2035#############################################################################
3439 3436
3440 if ($self->{anim} && $self->{animspeed}) { 3437 if ($self->{anim} && $self->{animspeed}) {
3441 CFPlus::weaken (my $widget = $self); 3438 CFPlus::weaken (my $widget = $self);
3442 3439
3443 $widget->{animspeed} = List::Util::max 0.05, $widget->{animspeed}; 3440 $widget->{animspeed} = List::Util::max 0.05, $widget->{animspeed};
3444 $widget->{anim_start} = $self->{animspeed} * Event::time / $self->{animspeed}; 3441 $widget->{anim_start} = $self->{animspeed} * int Event::time / $self->{animspeed};
3445 $self->{timer} = Event->timer ( 3442 $self->{timer} = Event->timer (
3446 parked => 1, 3443 parked => 1,
3447 cb => sub { 3444 cb => sub {
3448 return unless $::CONN && $widget; 3445 return unless $::CONN && $widget;
3449 3446

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines