Mercurial > emacs

changeset 71826:e80165512dee

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Fcall_interactively): Remove loop around wrong_type_argument.
author Kim F. Storm <storm@cua.dk>
date Wed, 12 Jul 2006 13:14:38 +0000
parents 7db6ed27e18f
children 5e4428007299
files src/callint.c
diffstat 1 files changed, 2 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- a/src/callint.c	Wed Jul 12 13:14:26 2006 +0000
+++ b/src/callint.c	Wed Jul 12 13:14:38 2006 +0000
@@ -314,8 +314,6 @@
   /* Save this now, since use of minibuffer will clobber it. */
   prefix_arg = Vcurrent_prefix_arg;
 
- retry:
-
   if (SYMBOLP (function))
     enable = Fget (function, Qenable_recursive_minibuffers);
   else
@@ -334,8 +332,7 @@
   up_event = Qnil;
 
   /* Decode the kind of function.  Either handle it and return,
-     or go to `lose' if not interactive, or go to `retry'
-     to specify a different function, or set either STRING or SPECS.  */
+     or go to `lose' if not interactive, or set either STRING or SPECS.  */
 
   if (SUBRP (fun))
     {
@@ -343,8 +340,7 @@
       if (!string)
 	{
 	lose:
-	  function = wrong_type_argument (Qcommandp, function);
-	  goto retry;
+	  wrong_type_argument (Qcommandp, function);
 	}
     }
   else if (COMPILEDP (fun))