Function: vi-char-argument
vi-char-argument is an interactive and byte-compiled function defined
in vi.el.gz.
Signature
(vi-char-argument ARG)
Documentation
Get following character (could be any CHAR) as part of the prefix argument.
Possible prefix-arg cases are nil, INTEGER, (nil . CHAR) or (INTEGER . CHAR).
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/obsolete/vi.el.gz
(defun vi-char-argument (arg)
"Get following character (could be any CHAR) as part of the prefix argument.
Possible prefix-arg cases are nil, INTEGER, (nil . CHAR) or (INTEGER . CHAR)."
(interactive "P")
(let ((char (read-char)))
(cond ((null arg) (setq prefix-arg (cons nil char)))
((integerp arg) (setq prefix-arg (cons arg char)))
; This can happen only if the user changed his/her mind for CHAR,
; Or there are some leading "universal-argument"s
(t (setq prefix-arg (cons (car arg) char))))))