From ad50a502a16b5cbc96c6a83565ae29abca60782e Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sat, 16 Jul 2005 19:04:57 +0000 Subject: (byte-compile-maybe-guarded): Doc fix. --- lisp/emacs-lisp/bytecomp.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'lisp/emacs-lisp/bytecomp.el') diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el index 92d594945a3..c0a93e86ec1 100644 --- a/lisp/emacs-lisp/bytecomp.el +++ b/lisp/emacs-lisp/bytecomp.el @@ -3353,12 +3353,12 @@ That command is designed for interactive use only" fn)) "Execute forms in BODY, potentially guarded by CONDITION. CONDITION is a variable whose value is a test in an `if' or `cond'. BODY is the code to compile first arm of the if or the body of the -cond clause. If CONDITION's value is of the form `(foundp 'foo)' -or `(boundp 'foo)', the relevant warnings from BODY about foo +cond clause. If CONDITION's value is of the form (foundp 'foo) +or (boundp 'foo), the relevant warnings from BODY about foo's being undefined will be suppressed. -If CONDITION's value is `(featurep 'xemacs)', that suppresses all -warnings during execution of BODY." +If CONDITION's value is (not (featurep emacs)) or (featurep 'xemacs), +that suppresses all warnings during execution of BODY." (declare (indent 1) (debug t)) `(let* ((fbound (if (eq 'fboundp (car-safe ,condition)) -- cgit v1.2.3