Mercurial > emacs
comparison lisp/ffap.el @ 103729:f78c4d81bda4
(ffap-version): Make it an obsolete alias for emacs-version.
(top-level): Move provide to the end.
author | Glenn Morris <rgm@gnu.org> |
---|---|
date | Mon, 06 Jul 2009 00:49:25 +0000 |
parents | a9dc0e7c3f2b |
children | 7193abeb1062 |
comparison
equal
deleted
inserted
replaced
103728:fa5324a603a4 | 103729:f78c4d81bda4 |
---|---|
104 ;; * use the font-lock machinery | 104 ;; * use the font-lock machinery |
105 | 105 |
106 | 106 |
107 ;;; Code: | 107 ;;; Code: |
108 | 108 |
109 (provide 'ffap) | 109 (define-obsolete-variable-alias 'ffap-version 'emacs-version "23.2") |
110 | |
111 ;; Please do not delete this variable, it is checked in bug reports. | |
112 (defconst ffap-version "1.9-fsf <97/06/25 13:21:41 mic>" | |
113 "The version of ffap: \"Major.Minor-Build <Timestamp>\"") | |
114 | |
115 | 110 |
116 (defgroup ffap nil | 111 (defgroup ffap nil |
117 "Find file or URL at point." | 112 "Find file or URL at point." |
118 :link '(url-link :tag "URL" "ftp://ftp.mathcs.emory.edu/pub/mic/emacs/") | 113 :link '(url-link :tag "URL" "ftp://ftp.mathcs.emory.edu/pub/mic/emacs/") |
119 :group 'matching | 114 :group 'matching |
1915 "Evaluate the forms in variable `ffap-bindings'." | 1910 "Evaluate the forms in variable `ffap-bindings'." |
1916 (interactive) | 1911 (interactive) |
1917 (eval (cons 'progn ffap-bindings))) | 1912 (eval (cons 'progn ffap-bindings))) |
1918 | 1913 |
1919 | 1914 |
1915 (provide 'ffap) | |
1920 | 1916 |
1921 ;; arch-tag: 9dd3e88a-5dec-4607-bd57-60ae9ede8ebc | 1917 ;; arch-tag: 9dd3e88a-5dec-4607-bd57-60ae9ede8ebc |
1922 ;;; ffap.el ends here | 1918 ;;; ffap.el ends here |