--- timer.pl.orig   2003-11-17 14:36:19.000000000 +0100
+++ scripts/timer.pl  2006-01-20 14:46:10.934456144 +0100
@@ -142,11 +142,12 @@
 command_bind 'timer list' => sub {
     print( CRAP "Active timers:" );
     foreach my $name ( keys %timers ) {
+        my $msg = "$name = $timers{$name}->{'command'} every $timers{$name}->{'interval'}s";
         if ( $timers{$name}->{repeat} == -1 ) {
-            print( CRAP "$name = $timers{$name}->{'command'} (until stopped)");
+            print( CRAP "$msg (until stopped)");
         }
         else {
-            print( CRAP "$name = $timers{$name}->{'command'} ($timers{$name}->{'repeat'} repeats left)" );
+            print( CRAP "$msg ($timers{$name}->{'repeat'} repeats left)" );
         }
     }
     print( CRAP "End of /timer list" );