aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/emacs-lisp/bytecomp.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index c0a93e86ec1..e21a7ccb4a0 100644
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -358,7 +358,7 @@ Elements of the list may be be:
358 358
359(defvar byte-compile-interactive-only-functions 359(defvar byte-compile-interactive-only-functions
360 '(beginning-of-buffer end-of-buffer replace-string replace-regexp 360 '(beginning-of-buffer end-of-buffer replace-string replace-regexp
361 insert-file) 361 insert-file insert-buffer insert-file-literally)
362 "List of commands that are not meant to be called from Lisp.") 362 "List of commands that are not meant to be called from Lisp.")
363 363
364(defvar byte-compile-not-obsolete-var nil 364(defvar byte-compile-not-obsolete-var nil
@@ -3353,11 +3353,11 @@ That command is designed for interactive use only" fn))
3353 "Execute forms in BODY, potentially guarded by CONDITION. 3353 "Execute forms in BODY, potentially guarded by CONDITION.
3354CONDITION is a variable whose value is a test in an `if' or `cond'. 3354CONDITION is a variable whose value is a test in an `if' or `cond'.
3355BODY is the code to compile first arm of the if or the body of the 3355BODY is the code to compile first arm of the if or the body of the
3356cond clause. If CONDITION's value is of the form (foundp 'foo) 3356cond clause. If CONDITION's value is of the form (fboundp 'foo)
3357or (boundp 'foo), the relevant warnings from BODY about foo's 3357or (boundp 'foo), the relevant warnings from BODY about foo's
3358being undefined will be suppressed. 3358being undefined will be suppressed.
3359 3359
3360If CONDITION's value is (not (featurep emacs)) or (featurep 'xemacs), 3360If CONDITION's value is (not (featurep 'emacs)) or (featurep 'xemacs),
3361that suppresses all warnings during execution of BODY." 3361that suppresses all warnings during execution of BODY."
3362 (declare (indent 1) (debug t)) 3362 (declare (indent 1) (debug t))
3363 `(let* ((fbound 3363 `(let* ((fbound