diff options
Diffstat (limited to 'lisp/help-fns.el')
| -rw-r--r-- | lisp/help-fns.el | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/lisp/help-fns.el b/lisp/help-fns.el index 2b75e7fd053..69555feb170 100644 --- a/lisp/help-fns.el +++ b/lisp/help-fns.el @@ -642,10 +642,12 @@ it is displayed along with the global value." (princ (if (stringp (car obsolete)) (car obsolete) (format "use `%s' instead." (car obsolete)))) (terpri)) - (when safe-var - (princ "This variable is safe to use as a file local variable") - (princ (format " only if its value\nsatisfies the predicate `%s'.\n" - safe-var)) + (when safe-var + (princ "This variable is safe as a file local variable ") + (princ "if its value\nsatisfies the predicate ") + (princ (if (byte-code-function-p safe-var) + "which is byte-compiled expression.\n" + (format "`%s'.\n" safe-var))) (terpri)) (princ "Documentation:\n") (princ (or doc "Not documented as a variable."))) |