procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(ff-special-constructs): Delete the Ada entry.

Browse source
This commit is contained in:
Richard M. Stallman 2003-05-19 14:46:49 +00:00
parent 1db354061f
commit fbf2dd6136
1 changed files with 0 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

10
lisp/find-file.el
View file

@ -188,14 +188,6 @@ To override this, give an argument to `ff-find-other-file'."
("^\#\\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 @@ and the name of the file passed in."
(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 ()