Mercurial > emacs
comparison lisp/find-file.el @ 47860:621b10466c9a
(ff-related-file-alist): New alias.
(ff-find-related-file): New alias.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Mon, 14 Oct 2002 01:25:16 +0000 |
parents | 27533450eb3b |
children | 8b3977d58df6 |
comparison
equal
deleted
inserted
replaced
47859:f15b9906481d | 47860:621b10466c9a |
---|---|
200 "*A list of regular expressions for `ff-find-file'. | 200 "*A list of regular expressions for `ff-find-file'. |
201 Specifies how to recognise special constructs such as include files | 201 Specifies how to recognise special constructs such as include files |
202 etc. and an associated method for extracting the filename from that | 202 etc. and an associated method for extracting the filename from that |
203 construct.") | 203 construct.") |
204 | 204 |
205 (defvaralias 'ff-related-file-alist 'ff-other-file-alist) | |
205 (defcustom ff-other-file-alist 'cc-other-file-alist | 206 (defcustom ff-other-file-alist 'cc-other-file-alist |
206 "*Alist of extensions to find given the current file's extension. | 207 "*Alist of extensions to find given the current file's extension. |
207 | 208 |
208 This list should contain the most used extensions before the others, | 209 This list should contain the most used extensions before the others, |
209 since the search algorithm searches sequentially through each | 210 since the search algorithm searches sequentially through each |
308 (interactive "P") | 309 (interactive "P") |
309 (let ((ignore ff-ignore-include)) | 310 (let ((ignore ff-ignore-include)) |
310 (setq ff-ignore-include t) | 311 (setq ff-ignore-include t) |
311 (ff-find-the-other-file in-other-window) | 312 (ff-find-the-other-file in-other-window) |
312 (setq ff-ignore-include ignore))) | 313 (setq ff-ignore-include ignore))) |
314 | |
315 ;;;### | |
316 (defalias 'ff-find-related-file 'ff-find-other-file) | |
313 | 317 |
314 ;;;###autoload | 318 ;;;###autoload |
315 (defun ff-find-other-file (&optional in-other-window ignore-include) | 319 (defun ff-find-other-file (&optional in-other-window ignore-include) |
316 "Find the header or source file corresponding to this file. | 320 "Find the header or source file corresponding to this file. |
317 Being on a `#include' line pulls in that file. | 321 Being on a `#include' line pulls in that file. |