emacs-pretest-bug
[Top][All Lists]
Advanced

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

Re: [BUG] describe-variable


From: martin rudalics
Subject: Re: [BUG] describe-variable
Date: Fri, 12 Jan 2007 08:52:29 +0100
User-agent: Mozilla Thunderbird 1.0 (Windows/20041206)

> In Emacs 22 evaluate:
>
> (setq myvar '((0) (1) (2) (3) (4) (5) (6) (7) (8) (9)))
>
> (make-local-variable 'myvar)
>
> (setq myvar 1)
>
> then do C-h v myvar <RET>.
>
> Help buffer output:
[...]
>
> Note the local value of 1 is not shown.

Would the below break anything else?

*** help-fns.el.~1.94.~ Sun Dec 24 22:38:56 2006
--- help-fns.el Fri Jan 12 08:46:02 2007
***************
*** 553,559 ****
                ;; of a symbol.
                (set-syntax-table emacs-lisp-mode-syntax-table)
                (goto-char val-start-pos)
!               (delete-region (point) (progn (end-of-line) (point)))
                (save-excursion
                  (insert "\n\nValue:")
                  (set (make-local-variable 'help-button-cache)
--- 553,559 ----
                ;; of a symbol.
                (set-syntax-table emacs-lisp-mode-syntax-table)
                (goto-char val-start-pos)
!               (when (looking-at "value is") (replace-match ""))
                (save-excursion
                  (insert "\n\nValue:")
                  (set (make-local-variable 'help-button-cache)
***************
*** 563,569 ****
                               'action help-button-cache
                               'follow-link t
                               'help-echo "mouse-2, RET: show value")
!               (insert ".\n\n")))

            ;; Mention if it's an alias
              (let* ((alias (condition-case nil
--- 563,569 ----
                               'action help-button-cache
                               'follow-link t
                               'help-echo "mouse-2, RET: show value")
!               (insert ".\n")))

            ;; Mention if it's an alias
              (let* ((alias (condition-case nil





reply via email to

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