Mercurial > emacs
changeset 75384:0906bcead2e0
(describe-variable): Don't suppress display of
buffer local value when the value is "large".
| author | Martin Rudalics <rudalics@gmx.at> |
|---|---|
| date | Tue, 23 Jan 2007 07:16:11 +0000 |
| parents | 86da7b53d8e7 |
| children | 1fe35405176b |
| files | lisp/help-fns.el |
| diffstat | 1 files changed, 6 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/help-fns.el Tue Jan 23 00:57:48 2007 +0000 +++ b/lisp/help-fns.el Tue Jan 23 07:16:11 2007 +0000 @@ -553,7 +553,11 @@ ;; of a symbol. (set-syntax-table emacs-lisp-mode-syntax-table) (goto-char val-start-pos) - (delete-region (point) (progn (end-of-line) (point))) + ;; The line below previously read as + ;; (delete-region (point) (progn (end-of-line) (point))) + ;; which suppressed display of the buffer local value for + ;; large values. + (when (looking-at "value is") (replace-match "")) (save-excursion (insert "\n\nValue:") (set (make-local-variable 'help-button-cache) @@ -563,7 +567,7 @@ 'action help-button-cache 'follow-link t 'help-echo "mouse-2, RET: show value") - (insert ".\n\n"))) + (insert ".\n"))) ;; Mention if it's an alias (let* ((alias (condition-case nil