[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/find-file.el
From: |
Richard M. Stallman |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/find-file.el |
Date: |
Mon, 19 May 2003 10:46:49 -0400 |
Index: emacs/lisp/find-file.el
diff -c emacs/lisp/find-file.el:1.22 emacs/lisp/find-file.el:1.23
*** emacs/lisp/find-file.el:1.22 Tue Feb 4 06:19:31 2003
--- emacs/lisp/find-file.el Mon May 19 10:46:49 2003
***************
*** 188,201 ****
("^\#\\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
--- 188,193 ----
***************
*** 943,950 ****
;; The regexps are Ada specific.
(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)
;;
--- 935,940 ----
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/find-file.el,
Richard M. Stallman <=