]> git.eshelyaron.com Git - emacs.git/commitdiff
(Fdefalias): Change argument name and doc string.
authorRichard M. Stallman <rms@gnu.org>
Thu, 26 Dec 1996 22:41:42 +0000 (22:41 +0000)
committerRichard M. Stallman <rms@gnu.org>
Thu, 26 Dec 1996 22:41:42 +0000 (22:41 +0000)
src/data.c

index 4357fa79c0a2de2c1c62ee3fd0c37c281c06165d..e64dcf800b3cefbdd64b9ef251f35685b8dcf38c 100644 (file)
@@ -646,24 +646,24 @@ DEFUN ("fset", Ffset, Sfset, 2, 2, 0,
 }
 
 DEFUN ("defalias", Fdefalias, Sdefalias, 2, 2, 0,
-  "Set SYMBOL's function definition to NEWDEF, and return NEWDEF.\n\
+  "Set SYMBOL's function definition to DEFINITION, and return DEFINITION.\n\
 Associates the function with the current load file, if any.")
-  (symbol, newdef)
-     register Lisp_Object symbol, newdef;
+  (symbol, definition)
+     register Lisp_Object symbol, definition;
 {
   CHECK_SYMBOL (symbol, 0);
   if (!NILP (Vautoload_queue) && !EQ (XSYMBOL (symbol)->function, Qunbound))
     Vautoload_queue = Fcons (Fcons (symbol, XSYMBOL (symbol)->function),
                             Vautoload_queue);
-  XSYMBOL (symbol)->function = newdef;
+  XSYMBOL (symbol)->function = definition;
   /* Handle automatic advice activation */
   if (CONSP (XSYMBOL (symbol)->plist) && !NILP (Fget (symbol, Qad_advice_info)))
     {
       call2 (Qad_activate, symbol, Qnil);
-      newdef = XSYMBOL (symbol)->function;
+      definition = XSYMBOL (symbol)->function;
     }
   LOADHIST_ATTACH (symbol);
-  return newdef;
+  return definition;
 }
 
 DEFUN ("setplist", Fsetplist, Ssetplist, 2, 2, 0,