*** empty log message ***
authorroot <root>
Tue, 3 Jan 2006 04:30:31 +0000 (04:30 +0000)
committerroot <root>
Tue, 3 Jan 2006 04:30:31 +0000 (04:30 +0000)
src/perl/digital-clock

index ef4e2a502f827e81e22f9c5b01873cb033b996f5..ad48eb6cec81e1e4e3d5aea5c47c9c548eb5f9f3 100644 (file)
@@ -8,6 +8,7 @@ sub on_init {
    $self->{digital_clock_overlay} = $self->overlay (-1, 0, 8, 1, urxvt::OVERLAY_RSTYLE, 0);
    $self->{digital_clock_timer} = urxvt::timer
                     ->new
+                    ->start (int urxvt::NOW) # make sure we update "on" the second
                     ->interval (1)
                     ->cb (sub {
                        $self->{digital_clock_overlay}->set (0, 0,