[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/find-file.el,v
From: |
Juanma Barranquero |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/find-file.el,v |
Date: |
Wed, 15 Oct 2008 15:32:26 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Juanma Barranquero <lektu> 08/10/15 15:32:25
Index: find-file.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/find-file.el,v
retrieving revision 1.38
retrieving revision 1.39
diff -u -b -r1.38 -r1.39
--- find-file.el 6 May 2008 07:57:36 -0000 1.38
+++ find-file.el 15 Oct 2008 15:32:25 -0000 1.39
@@ -130,54 +130,54 @@
:group 'find-file)
(defcustom ff-pre-find-hook nil
- "*List of functions to be called before the search for the file starts."
+ "List of functions to be called before the search for the file starts."
:type 'hook
:group 'ff)
(defcustom ff-pre-load-hook nil
- "*List of functions to be called before the other file is loaded."
+ "List of functions to be called before the other file is loaded."
:type 'hook
:group 'ff)
(defcustom ff-post-load-hook nil
- "*List of functions to be called after the other file is loaded."
+ "List of functions to be called after the other file is loaded."
:type 'hook
:group 'ff)
(defcustom ff-not-found-hook nil
- "*List of functions to be called if the other file could not be found."
+ "List of functions to be called if the other file could not be found."
:type 'hook
:group 'ff)
(defcustom ff-file-created-hook nil
- "*List of functions to be called if the other file needs to be created."
+ "List of functions to be called if the other file needs to be created."
:type 'hook
:group 'ff)
(defcustom ff-case-fold-search nil
- "*Non-nil means ignore cases in matches (see `case-fold-search').
+ "Non-nil means ignore cases in matches (see `case-fold-search').
If you have extensions in different cases, you will want this to be nil."
:type 'boolean
:group 'ff)
(defcustom ff-always-in-other-window nil
- "*If non-nil, find the corresponding file in another window by default.
+ "If non-nil, find the corresponding file in another window by default.
To override this, give an argument to `ff-find-other-file'."
:type 'boolean
:group 'ff)
(defcustom ff-ignore-include nil
- "*If non-nil, ignore `#include' lines."
+ "If non-nil, ignore `#include' lines."
:type 'boolean
:group 'ff)
(defcustom ff-always-try-to-create t
- "*If non-nil, always attempt to create the other file if it was not found."
+ "If non-nil, always attempt to create the other file if it was not found."
:type 'boolean
:group 'ff)
(defcustom ff-quiet-mode nil
- "*If non-nil, trace which directories are being searched."
+ "If non-nil, trace which directories are being searched."
:type 'boolean
:group 'ff)
@@ -200,7 +200,7 @@
(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.
+ "Alist of extensions to find given the current file's extension.
This list should contain the most used extensions before the others,
since the search algorithm searches sequentially through each
@@ -212,7 +212,7 @@
:group 'ff)
(defcustom ff-search-directories 'cc-search-directories
- "*List of directories to search for a specific file.
+ "List of directories to search for a specific file.
Set by default to `cc-search-directories', expanded at run-time.
@@ -237,7 +237,7 @@
(defcustom cc-search-directories
'("." "/usr/include" "/usr/local/include/*")
- "*See the description of the `ff-search-directories' variable."
+ "See the description of the `ff-search-directories' variable."
:type '(repeat directory)
:group 'ff)
@@ -262,7 +262,7 @@
("\\.cxx\\'" (".hxx" ".hh" ".h"))
("\\.hxx\\'" (".cxx")))
- "*Alist of extensions to find given the current file's extension.
+ "Alist of extensions to find given the current file's extension.
This list should contain the most used extensions before the others,
since the search algorithm searches sequentially through each directory
@@ -276,7 +276,7 @@
("\\.mi$" (".md")) ;; Modula-2 module definition
("\\.md$" (".mi")) ;; and implementation.
)
- "*See the description for the `ff-search-directories' variable."
+ "See the description for the `ff-search-directories' variable."
:type '(repeat (list regexp (choice (repeat string) function)))
:group 'ff)
@@ -611,8 +611,8 @@
(defun ff-get-file (search-dirs filename &optional suffix-list other-window)
"Find a file in the SEARCH-DIRS with the given FILENAME (or filename stub).
-If (optional) SUFFIX-LIST is nil, search for fname, otherwise search
-for fname with each of the given suffixes. Get the file or the buffer
+If (optional) SUFFIX-LIST is nil, search for FILENAME, otherwise search
+for FILENAME with each of the given suffixes. Get the file or the buffer
corresponding to the name of the first file found, or nil."
(let ((filename (ff-get-file-name search-dirs filename suffix-list)))
@@ -636,7 +636,7 @@
If (optional) SUFFIX-LIST is nil, search for FNAME-STUB, otherwise
search for FNAME-STUB with each of the given suffixes. Return the
name of the first file found."
- (let* (dirs ;; working copy of dirs to search
+ (let (dirs ;; working copy of dirs to search
dir ;; the current dir considered
file ;; filename being looked for
rest ;; pathname after first /*
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/find-file.el,v,
Juanma Barranquero <=