Mercurial > emacs

changeset 48984:13c2502ecdc8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(repeat-complex-command): Signal real error on failure.
author Richard M. Stallman <rms@gnu.org>
date Sat, 28 Dec 2002 21:23:23 +0000
parents 72ee05ebcd06
children dae8bb57e633
files lisp/simple.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/simple.el	Sat Dec 28 21:22:23 2002 +0000
+++ b/lisp/simple.el	Sat Dec 28 21:23:23 2002 +0000
@@ -702,7 +702,9 @@
 	  (or (equal newcmd (car command-history))
 	      (setq command-history (cons newcmd command-history)))
 	  (eval newcmd))
-      (ding))))
+      (if command-history
+	  (error "Argument %d is beyond length of command history" arg)
+	(error "There are no previous complex commands to repeat")))))
 
 (defvar minibuffer-history nil
   "Default minibuffer history list.