Autoload the ffap alias directly.

1 files changed, 1 insertions, 6 deletions

diff --git a/lisp/ffap.el b/lisp/ffap.el
index 785cd2376e0..0bec1d7a1ff 100644
--- a/lisp/ffap.el
+++ b/lisp/ffap.el
@@ -1351,12 +1351,7 @@ See <ftp://ftp.mathcs.emory.edu/pub/mic/emacs/> for latest version."
                                 filename))))))
 
 ;; Shortcut: allow {M-x ffap} rather than {M-x find-file-at-point}.
-;; The defun is for autoload.el; the defalias takes over at load time.
-;;;###autoload
-(defun ffap (&optional filename)
-  "A short alias for the find-file-at-point command.")
-(defalias 'ffap 'find-file-at-point)
-
+;;;###autoload(defalias 'ffap 'find-file-at-point)
 
 ;;; Menu support (`ffap-menu'):