comparison lisp/ffap.el @ 26725:7e3e0c11f5b6

Autoload the ffap alias directly.

26724:8dbcefccbde4

     ((signal 'file-error (list "Opening file buffer"
				"no such file or directory"
				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)


;;; Menu support (`ffap-menu'):

(defvar ffap-menu-regexp nil
  "*If non-nil, overrides `ffap-next-regexp' during `ffap-menu'.

26725:7e3e0c11f5b6

     ((signal 'file-error (list "Opening file buffer"
				"no such file or directory"
				filename))))))

;; Shortcut: allow {M-x ffap} rather than {M-x find-file-at-point}.
;;;###autoload(defalias 'ffap 'find-file-at-point)

;;; Menu support (`ffap-menu'):

(defvar ffap-menu-regexp nil
  "*If non-nil, overrides `ffap-next-regexp' during `ffap-menu'.