summaryrefslogtreecommitdiff
path: root/lisp/help-fns.el
diff options
context:
space:
mode:
authorStefan Kangas <stefan@marxist.se>2022-07-24 09:55:01 +0200
committerStefan Kangas <stefan@marxist.se>2022-07-24 09:55:01 +0200
commita463dccdd0b33fd329419601eecddb109057233e (patch)
tree7cb5a254fe9e575ed344cff05d0be9ad83356647 /lisp/help-fns.el
parent279eb4e6ab0fb99cacdb504d37953d9630fae8b4 (diff)
parentb4067394dcf33d64e0372bf553cec5b6f9c4af1c (diff)
downloademacs-a463dccdd0b33fd329419601eecddb109057233e.tar.gz
Merge from origin/emacs-28
b4067394dc Set `default-directory' of Tramp archive connection buffer 2529e82002 ; * doc/lispref/functions.texi (Declare Form): Fix typo. 54c4ceb009 Update the documentation of 'declare' forms 7263631dca Fix bookmark support for Help functions in native-compilat... # Conflicts: # lisp/help.el
Diffstat (limited to 'lisp/help-fns.el')
-rw-r--r--lisp/help-fns.el10
1 files changed, 3 insertions, 7 deletions
diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index efee44f7b30..768023b54c2 100644
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -266,13 +266,9 @@ handling of autoloaded functions."
(current-buffer)))
(help-buffer-under-preparation t))
- (help-setup-xref
- (list (lambda (function buffer)
- (let ((describe-function-orig-buffer
- (if (buffer-live-p buffer) buffer)))
- (describe-function function)))
- function describe-function-orig-buffer)
- (called-interactively-p 'interactive))
+ (help-setup-xref (list #'describe-function--helper
+ function describe-function-orig-buffer)
+ (called-interactively-p 'interactive))
(save-excursion
(with-help-window (help-buffer)