[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 61226605f6: ; Fix sit-for calling convention in zone.el
From: |
Stefan Kangas |
Subject: |
master 61226605f6: ; Fix sit-for calling convention in zone.el |
Date: |
Fri, 28 Oct 2022 16:35:24 -0400 (EDT) |
branch: master
commit 61226605f6bfe5d0a4d9d63bda7f0eae634d9ec8
Author: Stefan Kangas <stefankangas@gmail.com>
Commit: Stefan Kangas <stefankangas@gmail.com>
; Fix sit-for calling convention in zone.el
* lisp/play/zone.el (zone-pgm-2nd-putz-with-case)
(zone-pgm-putz-with-case): Don't use obsolete calling convention for
'sit-for'.
---
lisp/play/zone.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/lisp/play/zone.el b/lisp/play/zone.el
index 1e8e0cbab5..a470f23dfe 100644
--- a/lisp/play/zone.el
+++ b/lisp/play/zone.el
@@ -347,7 +347,7 @@ run a specific program. The program must be a member of
(upcase i)))
(setq i (+ i (1+ (random 5)))))
(translate-region (point-min) (point-max) tbl)
- (sit-for 0 2))))
+ (sit-for 0.002))))
(defun zone-pgm-putz-with-case ()
(goto-char (point-min))
@@ -359,7 +359,7 @@ run a specific program. The program must be a member of
'downcase-region) (1- np) np)
(setq np (+ np (1+ (random 5))))))
(goto-char (point-min))
- (sit-for 0 2)))
+ (sit-for 0.002)))
;;;; rotating
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 61226605f6: ; Fix sit-for calling convention in zone.el,
Stefan Kangas <=