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

[Daniel Pfeiffer]

Index: emacs/lisp/help-fns.el
diff -c emacs/lisp/help-fns.el:1.55 emacs/lisp/help-fns.el:1.56
*** emacs/lisp/help-fns.el:1.55 Thu Sep  2 16:37:22 2004
--- emacs/lisp/help-fns.el      Wed Oct 13 18:54:21 2004
***************
*** 552,560 ****
                    (forward-line 1)
                  (forward-sexp 1)
                  (delete-region (point) (progn (end-of-line) (point)))
-                 (insert " value is shown below.\n\n")
                  (save-excursion
!                   (insert "\n\nValue:"))))
              ;; Add a note for variables that have been make-var-buffer-local.
              (when (and (local-variable-if-set-p variable)
                         (or (not (local-variable-p variable))
--- 552,566 ----
                    (forward-line 1)
                  (forward-sexp 1)
                  (delete-region (point) (progn (end-of-line) (point)))
                  (save-excursion
!                   (insert "\n\nValue:")
!                   (set (make-local-variable 'help-button-cache)
!                        (point-marker)))
!                 (insert " value is shown ")
!                 (insert-button "below"
!                                'action help-button-cache
!                                'help-echo "mouse-2, RET: show value")
!                 (insert ".\n\n")))
              ;; Add a note for variables that have been make-var-buffer-local.
              (when (and (local-variable-if-set-p variable)
                         (or (not (local-variable-p variable))