aboutsummaryrefslogtreecommitdiffstats
path: root/src/eval.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/eval.c')
-rw-r--r--src/eval.c9
1 files changed, 4 insertions, 5 deletions
diff --git a/src/eval.c b/src/eval.c
index df44c87dc25..c56be10c5a0 100644
--- a/src/eval.c
+++ b/src/eval.c
@@ -544,11 +544,10 @@ thinking of using it for any other purpose, it is quite likely that
544you're making a mistake. Think: what do you want to do when the 544you're making a mistake. Think: what do you want to do when the
545command is called from a keyboard macro? 545command is called from a keyboard macro?
546 546
547This function is meant for implementing advice and other 547Instead of using this function, it is sometimes cleaner to give your
548function-modifying features. Instead of using this, it is sometimes 548function an extra optional argument whose `interactive' spec specifies
549cleaner to give your function an extra optional argument whose 549non-nil unconditionally (\"p\" is a good way to do this), or via
550`interactive' spec specifies non-nil unconditionally (\"p\" is a good 550\(not (or executing-kbd-macro noninteractive)). */)
551way to do this), or via (not (or executing-kbd-macro noninteractive)). */)
552 (Lisp_Object kind) 551 (Lisp_Object kind)
553{ 552{
554 return ((INTERACTIVE || !EQ (kind, intern ("interactive"))) 553 return ((INTERACTIVE || !EQ (kind, intern ("interactive")))