Function: autoarg-kp-digit-argument

autoarg-kp-digit-argument is an interactive and byte-compiled function defined in autoarg.el.gz.

Signature

(autoarg-kp-digit-argument ARG)

Documentation

Part of the numeric argument for the next command, like digit-argument.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/obsolete/autoarg.el.gz
(defun autoarg-kp-digit-argument (arg)
  "Part of the numeric argument for the next command, like `digit-argument'."
  (interactive "P")
  (let ((digit (cdr (assq last-command-event autoarg-kp-digits))))
    (cond ((integerp arg)
	   (setq prefix-arg (+ (* arg 10)
			       (if (< arg 0) (- digit) digit))))
	  ((eq arg '-)
	   ;; Treat -0 as just -, so that -01 will work.
	   (setq prefix-arg (if (zerop digit) '- (- digit))))
	  (t
	   (setq prefix-arg digit))))
  (setq overriding-terminal-local-map universal-argument-map))