Mercurial > emacs
changeset 103611:6f6def36a946
* help-fns.el (describe-function-1): Correctly locate adviced
functions in hyperlink (Bug#2438).
| author | Chong Yidong <cyd@stupidchicken.com> |
|---|---|
| date | Sun, 28 Jun 2009 05:06:56 +0000 |
| parents | 9f150a229376 |
| children | 25fc47c9b012 |
| files | lisp/ChangeLog lisp/help-fns.el |
| diffstat | 2 files changed, 6 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Sun Jun 28 04:54:06 2009 +0000 +++ b/lisp/ChangeLog Sun Jun 28 05:06:56 2009 +0000 @@ -1,3 +1,8 @@ +2009-03-28 Juri Linkov <juri@jurta.org> + + * help-fns.el (describe-function-1): Correctly locate adviced + functions in hyperlink (Bug#2438). + 2009-06-28 Chong Yidong <cyd@stupidchicken.com> * files.el (trash-directory): Change default to nil.
--- a/lisp/help-fns.el Sun Jun 28 04:54:06 2009 +0000 +++ b/lisp/help-fns.el Sun Jun 28 05:06:56 2009 +0000 @@ -406,7 +406,7 @@ (with-current-buffer standard-output (save-excursion (re-search-backward "`\\([^`']+\\)'" nil t) - (help-xref-button 1 'help-function-def real-function file-name)))) + (help-xref-button 1 'help-function-def function file-name)))) (princ ".") (with-current-buffer (help-buffer) (fill-region-as-paragraph (save-excursion (goto-char pt1) (forward-line 0) (point))