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

[Stefan Monnier]

Index: emacs/lisp/help-fns.el
diff -c emacs/lisp/help-fns.el:1.33 emacs/lisp/help-fns.el:1.34
*** emacs/lisp/help-fns.el:1.33 Tue May  6 09:54:21 2003
--- emacs/lisp/help-fns.el      Tue May 13 14:35:16 2003
***************
*** 1,6 ****
  ;;; help-fns.el --- Complex help functions
  
! ;; Copyright (C) 1985, 1986, 1993, 1994, 1998, 1999, 2000, 2001, 2002
  ;;   Free Software Foundation, Inc.
  
  ;; Maintainer: FSF
--- 1,6 ----
  ;;; help-fns.el --- Complex help functions
  
! ;; Copyright (C) 1985, 1986, 1993, 1994, 1998, 1999, 2000, 2001, 2002, 2003
  ;;   Free Software Foundation, Inc.
  
  ;; Maintainer: FSF
***************
*** 410,416 ****
                      (delete-region (1- from) from)))))
            (terpri)
            (when (local-variable-p variable)
!             (princ (format "Local in buffer %s; " (buffer-name)))
              (if (not (default-boundp variable))
                  (princ "globally void")
                (let ((val (default-value variable)))
--- 410,419 ----
                      (delete-region (1- from) from)))))
            (terpri)
            (when (local-variable-p variable)
!             (princ (format "%socal in buffer %s; "
!                            (if (get variable 'permanent-local)
!                                "Permanently l" "L")
!                            (buffer-name)))
              (if (not (default-boundp variable))
                  (princ "globally void")
                (let ((val (default-value variable)))