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

Comparing deliantra/Deliantra-Client/DC/UI.pm (file contents):
Revision 1.446 by root, Sun Dec 16 00:21:58 2007 UTC vs.
Revision 1.451 by root, Wed Dec 26 19:11:13 2007 UTC

 our $TOOLTIP;
 our $BUTTON_STATE;
 our %WIDGET; # all widgets, weak-referenced
-our $TOOLTIP_WATCHER = EV::timer_ns 0, 1/60, sub {
+our $TOOLTIP_WATCHER = EV::timer_ns 0, 0.03, sub {
    $_[0]->stop;
    if (!$GRAB) {
       for (my $widget = $HOVER; $widget; $widget = $widget->{parent}) {
          if (length $widget->{tooltip}) {
    );
    if ($self->{anim} && $self->{animspeed}) {
       CFPlus::weaken (my $widget = $self);
-      $widget->{animspeed} = List::Util::max 0.05, $widget->{animspeed};
+      $self->{animspeed} = List::Util::max 0.05, $self->{animspeed};
-      $widget->{anim_start} = $self->{animspeed} * int EV::now / $self->{animspeed};
+      $self->{timer} = EV::periodic_ns 0, $self->{animspeed}, undef, sub {
-      $self->{timer} = EV::timer_ns 0, 0, sub {
          return unless $::CONN;
          my $w = $widget
             or return;
    my ($self) = @_;
    return unless $self->{timer};
    if ($self->{visible}) {
-      $self->{timer}->set (
-         $self->{anim_start}
-         + $self->{animspeed}
-           * int 1.5 + (EV::now - $self->{anim_start}) / $self->{animspeed}
-      );
       $self->{timer}->start;
    } else {
       $self->{timer}->stop;
    }
 }
 }
 sub update {
    my ($self) = @_;
-   $::WANT_REFRESH->start;
+   $::WANT_REFRESH = 1;
 }
 sub add {
    my ($self, @children) = @_;

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