# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 1113665229 0
# Node ID d5d321d5c34f40b9fe7428ab82f4570896137cdf
# Parent  18a28b7d3930247e82633e962bf8fec1fd836d3e
(repeat): Invoke pre-command-hook and post-command-hook.

diff -r 18a28b7d3930 -r d5d321d5c34f lisp/repeat.el
--- a/lisp/repeat.el	Sat Apr 16 15:22:12 2005 +0000
+++ b/lisp/repeat.el	Sat Apr 16 15:27:09 2005 +0000
@@ -284,7 +284,9 @@
 	      ;; 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'