Function: repeat-pre-hook

repeat-pre-hook is a byte-compiled function defined in repeat.el.gz.

Signature

(repeat-pre-hook)

Documentation

Function run before commands to handle repeatable keys.

Source Code

;; Defined in /usr/src/emacs/lisp/repeat.el.gz
(defun repeat-pre-hook ()
  "Function run before commands to handle repeatable keys."
  (when (and repeat-mode repeat-keep-prefix repeat-in-progress
             (not prefix-arg) current-prefix-arg)
    (let ((map (repeat-get-map)))
      ;; Only when repeat-post-hook will activate the same map
      (when (repeat-check-map map)
        ;; Optimize to use less logic in the function `repeat-get-map'
        ;; for the next call: when called again from `repeat-post-hook'
        ;; it will use the variable `repeat-map'.
        (setq repeat-map map)
        ;; Preserve universal argument
        (setq prefix-arg current-prefix-arg)))))