mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-02-16 17:24:23 +00:00
; 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'.
This commit is contained in:
parent
cabb496d6e
commit
61226605f6
1 changed files with 2 additions and 2 deletions
|
|
@ -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
|
||||
|
|
|
|||
Loading…
Reference in a new issue