From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 14 Oct 2002 01:25:16 +0000 (+0000)
Subject: (ff-related-file-alist): New alias.
X-Git-Tag: ttn-vms-21-2-B4~12850
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f7583fb625909cb0b23bd1267492d2df2459dd88;p=emacs.git

(ff-related-file-alist): New alias.
(ff-find-related-file): New alias.
---

diff --git a/lisp/find-file.el b/lisp/find-file.el
index 8d8a282501d..79ff1a6ab47 100644
--- a/lisp/find-file.el
+++ b/lisp/find-file.el
@@ -202,6 +202,7 @@ Specifies how to recognise special constructs such as include files
 etc. and an associated method for extracting the filename from that
 construct.")
 
+(defvaralias 'ff-related-file-alist 'ff-other-file-alist)
 (defcustom ff-other-file-alist 'cc-other-file-alist
   "*Alist of extensions to find given the current file's extension.
 
@@ -311,6 +312,9 @@ If optional IN-OTHER-WINDOW is non-nil, find the file in another window."
     (ff-find-the-other-file in-other-window)
     (setq ff-ignore-include ignore)))
 
+;;;###
+(defalias 'ff-find-related-file 'ff-find-other-file)
+
 ;;;###autoload
 (defun ff-find-other-file (&optional in-other-window ignore-include)
   "Find the header or source file corresponding to this file.