mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-01 08:17:38 +00:00
Code Issues Releases Activity

(Fcalled_interactively_p): Rename from Fcall_interactive_p.

Browse Source 
(syms_of_eval): Defsubr it.
This commit is contained in:
Kim F. Storm 2004-11-02 10:00:14 +00:00
parent ca28104dfd
commit 4b664e7618
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/eval.c
View File

@ -562,7 +562,7 @@ unconditionally for that argument. (`p' is a good way to do this.) */)
} }
DEFUN ("called-interactively-p", Fcall_interactive_p, Scall_interactive_p, 0, 0, 0, DEFUN ("called-interactively-p", Fcalled_interactively_p, Scalled_interactively_p, 0, 0, 0,
doc: /* Return t if the function using this was called with call-interactively. doc: /* Return t if the function using this was called with call-interactively.
This is used for implementing advice and other function-modifying This is used for implementing advice and other function-modifying
features of Emacs. features of Emacs.
@ -3470,6 +3470,7 @@ The value the function returns is not used. */);
defsubr (&Scondition_case); defsubr (&Scondition_case);
defsubr (&Ssignal); defsubr (&Ssignal);
defsubr (&Sinteractive_p); defsubr (&Sinteractive_p);
defsubr (&Scalled_interactively_p);
defsubr (&Scommandp); defsubr (&Scommandp);
defsubr (&Sautoload); defsubr (&Sautoload);
defsubr (&Seval); defsubr (&Seval);