(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 8d8a282501d6c5cfb92692d7b2398c752409d48f..79ff1a6ab47a9e2a1f8d3d45ee058366bba14949 100644 (file)
--- 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.