Simplify ‘delete-trailing-whitespace’ by not treating \n as whitespace

[gnu-emacs] / lisp / help-fns.el

diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index 97c8df2298aef6768f8a44b171852217921a24b0..9464c0b0d9700ed83659853d883479029fea8f4c 100644 (file)
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -571,7 +571,8 @@ FILE is the file where FUNCTION was probably defined."
                real-function))
         (aliased (or (symbolp def)
                      ;; Advised & aliased function.
-                     (and advised (symbolp real-function))))
+                     (and advised (symbolp real-function)
+                          (not (eq 'autoload (car-safe def))))))
         (real-def (cond
                    (aliased (let ((f real-function))
                               (while (and (fboundp f)