diff options
| author | Eli Zaretskii <eliz@gnu.org> | 2005-04-16 15:28:10 +0000 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2005-04-16 15:28:10 +0000 |
| commit | ccb9871da323d805da12934a4be39442ae0852c6 (patch) | |
| tree | c6e8eb15f9a20f9611a2e592d2ce95afb42e93c4 /lisp/repeat.el | |
| parent | 3d70f2795c497ee64a5295a9368b601667586b6f (diff) | |
| download | emacs-ccb9871da323d805da12934a4be39442ae0852c6.tar.gz | |
(repeat): Invoke pre-command-hook and post-command-hook.
Diffstat (limited to 'lisp/repeat.el')
| -rw-r--r-- | lisp/repeat.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/repeat.el b/lisp/repeat.el index aa73c869675..5f0811d355c 100644 --- a/lisp/repeat.el +++ b/lisp/repeat.el @@ -284,7 +284,9 @@ can be modified by the global variable `repeat-on-final-keystroke'." ;; does not alter it. (let ((real-last-command real-last-command)) (execute-kbd-macro real-last-command)) - (call-interactively real-last-command))))) + (run-hooks 'pre-command-hook) + (call-interactively real-last-command) + (run-hooks 'post-command-hook))))) (when repeat-repeat-char ;; A simple recursion here gets into trouble with max-lisp-eval-depth ;; on long sequences of repetitions of a command like `forward-word' |