Mercurial > emacs
changeset 51096:0a061fbe2420
(ff-special-constructs): Delete the Ada entry.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Mon, 19 May 2003 14:46:49 +0000 |
| parents | 8b14c07986ec |
| children | 37a69a2f1992 |
| files | lisp/find-file.el |
| diffstat | 1 files changed, 0 insertions(+), 10 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/find-file.el Mon May 19 14:46:06 2003 +0000 +++ b/lisp/find-file.el Mon May 19 14:46:49 2003 +0000 @@ -188,14 +188,6 @@ ("^\#\\s *\\(include\\|import\\)\\s +[<\"]\\(.*\\)[>\"]" . (lambda () (setq fname (buffer-substring (match-beginning 2) (match-end 2))))) - - ;; Ada import - ("^with[ \t]+\\([a-zA-Z0-9_\\.]+\\)" . - (lambda () - (setq fname (buffer-substring (match-beginning 1) (match-end 1))) - (require 'ada-mode) - (setq fname (concat (ada-make-filename-from-adaname fname) - ada-spec-suffix)))) ) "*A list of regular expressions for `ff-find-file'. Specifies how to recognise special constructs such as include files @@ -944,8 +936,6 @@ (defvar ff-function-name nil "Name of the function we are in.") -;(eval-when-compile (require 'ada-mode)) - ;; bind with (setq ff-pre-load-hook 'ff-which-function-are-we-in) ;; (defun ff-which-function-are-we-in ()