--- GUI.pm.20050706	2005-07-06 10:40:21.945625000 +0100
+++ GUI.pm	2005-07-07 10:58:29.539375000 +0100
@@ -2638,12 +2638,12 @@
     $self->{-handle} = $window->{-handle};
     $self->{-interval} = $elapse;
 
+    # Store name in timers hash
+    $window->{-timers}->{$id} = $name;
+    # Add Timer into parent hash.
+    $window->{$name} = $self;
     # Only if perl is circular ref-safe
     if ($] > 5.006) {
-      # Store name in timers hash
-      $window->{-timers}->{$id} = $name;
-      # Add Timer into parent hash.
-      $window->{$name} = $self;
       $self->{-window} = \$window;
     }