[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/lisp/help-fns.el

From: Dan Nicolaescu
Subject: [Emacs-diffs] Changes to emacs/lisp/help-fns.el
Date: Sat, 29 Apr 2006 21:18:07 +0000

Index: emacs/lisp/help-fns.el
diff -u emacs/lisp/help-fns.el:1.86 emacs/lisp/help-fns.el:1.87
--- emacs/lisp/help-fns.el:1.86 Sat Feb 18 23:31:17 2006
+++ emacs/lisp/help-fns.el      Sat Apr 29 21:18:05 2006
@@ -630,6 +630,7 @@
                              (indirect-variable variable)
                            (error variable)))
                    (obsolete (get variable 'byte-obsolete-variable))
+                  (safe-var (get variable 'safe-local-variable))
                    (doc (or (documentation-property variable 
                             (documentation-property alias 
               (unless (eq alias variable)
@@ -641,6 +642,11 @@
                 (princ (if (stringp (car obsolete)) (car obsolete)
                          (format "use `%s' instead." (car obsolete))))
+             (when safe-var 
+               (princ "This variable is safe to use as a file local variable")
+               (princ (format " only if its value\nsatisfies the predicate 
+                              safe-var))
+               (terpri))
              (princ "Documentation:\n")
               (princ (or doc "Not documented as a variable.")))
            ;; Make a link to customize if this variable can be customized.

reply via email to

[Prev in Thread] Current Thread [Next in Thread]