diff --git a/lisp/play/zone.el b/lisp/play/zone.el
index e3a9507f1cc..1e8e0cbab55 100644
--- a/lisp/play/zone.el
+++ b/lisp/play/zone.el
@@ -312,7 +312,7 @@ run a specific program.  The program must be a member of
                 (insert " ")))
           (forward-char 1)))
       (setq i (1+ i))
-      (sit-for 0 2)))
+      (sit-for 0.002)))
   (zone-pgm-jitter))
 
 (defun zone-pgm-explode ()