diff options
Diffstat (limited to 'lisp/autoarg.el')
| -rw-r--r-- | lisp/autoarg.el | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/lisp/autoarg.el b/lisp/autoarg.el index c0307aa92b1..d41527775f4 100644 --- a/lisp/autoarg.el +++ b/lisp/autoarg.el @@ -1,4 +1,4 @@ -;;; autoarg.el --- make digit keys supply prefix args +;;; autoarg.el --- make digit keys supply prefix args -*- lexical-binding: t -*- ;; Copyright (C) 1998, 2000-2020 Free Software Foundation, Inc. @@ -59,9 +59,8 @@ ;; (define-key autoarg-mode-map [?\r] 'autoarg-terminate) (defvar autoarg-kp-digits - (let (alist) - (dotimes (i 10 alist) - (push (cons (intern (format "kp-%d" i)) i) alist)))) + (mapcar (lambda (i) (cons (intern (format "kp-%d" i)) i)) + (reverse (number-sequence 0 9)))) (defun autoarg-kp-digit-argument (arg) "Part of the numeric argument for the next command, like `digit-argument'." |