X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/e333157cba3b4ffd7c25f8210a6aa5a21ae10de7..001d88b62ecb8163a148656acb103b354ce7613a:/lisp/simple.el

diff --git a/lisp/simple.el b/lisp/simple.el
index a757876328..06d1b927e1 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -1443,8 +1443,8 @@ result of expression evaluation."
     (minibuffer-with-setup-hook
         (lambda ()
           ;; FIXME: call emacs-lisp-mode?
-          (add-function :before-until (local 'eldoc-documentation-function)
-                        #'elisp-eldoc-documentation-function)
+          (add-hook 'eldoc-documentation-functions
+                    #'elisp-eldoc-documentation-function nil t)
           (add-hook 'completion-at-point-functions
                     #'elisp-completion-at-point nil t)
           (run-hooks 'eval-expression-minibuffer-setup-hook))