# HG changeset patch
# User Micha¸«³l Cadilhac <michael.cadilhac@lrde.org>
# Date 1189416753 0
# Node ID b51e2df52bfb2f88107855001e9e8e7184a6438b
# Parent  1e77801815722e8e9df5736e2eb546fa6b7471f6
(Fcall_interactively): Comment fixes.

diff -r 1e7780181572 -r b51e2df52bfb src/callint.c
--- a/src/callint.c	Mon Sep 10 04:02:09 2007 +0000
+++ b/src/callint.c	Mon Sep 10 09:32:33 2007 +0000
@@ -329,9 +329,7 @@
   /* If k or K discard an up-event, save it here so it can be retrieved with U */
   up_event = Qnil;
 
-  /* Decode the kind of function.  Either handle it and return,
-     or go to `lose' if not interactive, or set either STRING or SPECS.  */
-
+  /* Set SPECS to the interactive form, or barf if not interactive.  */
   {
     Lisp_Object form;
     GCPRO2 (function, prefix_arg);
@@ -343,7 +341,7 @@
       wrong_type_argument (Qcommandp, function);
   }
 
-  /* If either SPECS or STRING is set to a string, use it.  */
+  /* If SPECS is set to a string, use it as an interactive prompt.  */
   if (STRINGP (specs))
     {
       /* Make a copy of string so that if a GC relocates specs,