[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/help-fns.el [emacs-unicode-2]
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/help-fns.el [emacs-unicode-2] |
Date: |
Thu, 14 Oct 2004 05:15:49 -0400 |
Index: emacs/lisp/help-fns.el
diff -c emacs/lisp/help-fns.el:1.34.4.3 emacs/lisp/help-fns.el:1.34.4.4
*** emacs/lisp/help-fns.el:1.34.4.3 Sat Sep 4 09:14:25 2004
--- emacs/lisp/help-fns.el Thu Oct 14 08:50:01 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))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/help-fns.el [emacs-unicode-2],
Miles Bader <=