mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-23 07:19:15 +00:00
Code Issues Releases Activity

(cc-other-file-alist): Bring it in line with cc-mode's auto-mode-alist entries and use \' instead of $.

Browse Source
This commit is contained in:
Daniel Pfeiffer 2004-10-26 21:39:34 +00:00
parent 4456f9649b
commit 7179694039
1 changed files with 17 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

30
lisp/find-file.el
View File

@ -57,7 +57,7 @@
;; format above can be changed to include a function to be called when the
;; current file matches the regexp:
;;
;; '(("\\.cc$" cc-function)
;; '(("\\.cc$" cc--function)
;; ("\\.hh$" hh-function))
;;
;; These functions must return a list consisting of the possible names of the
@ -239,22 +239,26 @@ the preceding slash. The star represents all the subdirectories except
:group 'ff)
(defcustom cc-other-file-alist
'(
("\\.cc$" (".hh" ".h"))
("\\.hh$" (".cc" ".C"))
'(("\\.cc\\'" (".hh" ".h"))
("\\.hh\\'" (".cc" ".C"))
("\\.c$" (".h"))
("\\.h$" (".c" ".cc" ".C" ".CC" ".cxx" ".cpp"))
("\\.c\\'" (".h"))
("\\.h\\'" (".c" ".cc" ".C" ".CC" ".cxx" ".cpp"))
("\\.C$" (".H" ".hh" ".h"))
("\\.H$" (".C" ".CC"))
("\\.C\\'" (".H" ".hh" ".h"))
("\\.H\\'" (".C" ".CC"))
("\\.CC$" (".HH" ".H" ".hh" ".h"))
("\\.HH$" (".CC"))
("\\.CC\\'" (".HH" ".H" ".hh" ".h"))
("\\.HH\\'" (".CC"))
("\\.cxx$" (".hh" ".h"))
("\\.cpp$" (".hh" ".h"))
)
("\\.c\\+\\+\\'" (".h++" ".hh" ".h"))
("\\.h\\+\\+\\'" (".c++"))
("\\.cpp\\'" (".hpp" ".hh" ".h"))
("\\.hpp\\'" (".cpp"))
("\\.cxx\\'" (".hxx" ".hh" ".h"))
("\\.hxx\\'" (".cxx")))
"*Alist of extensions to find given the current file's extension.
This list should contain the most used extensions before the others,