Autoload the ffap alias directly.

32fd7972 · Dave Love · cded5ed3 · 32fd7972
Commit 32fd7972 authored Dec 06, 1999 by Dave Love
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 6 deletions

lisp/ffap.el lisp/ffap.el +1 -6

No files found.
--- 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'):