# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1226592107 0
# Node ID 53e1b713e51f8d37d417ca9669156bf2232c5346
# Parent  a84ee30498a7970f8ea942b0986cb9a7801480f8
* files.el (project-settings-file, locate-dominating-file):
  Fix typos in docstrings.
  (find-file-visit-truename): Remove * from defcustom docstring.

diff -r a84ee30498a7 -r 53e1b713e51f lisp/ChangeLog
--- a/lisp/ChangeLog	Thu Nov 13 15:18:38 2008 +0000
+++ b/lisp/ChangeLog	Thu Nov 13 16:01:47 2008 +0000
@@ -1,3 +1,9 @@
+2008-11-13  Juanma Barranquero  <lekktu@gmail.com>
+
+	* files.el (project-settings-file, locate-dominating-file):
+	Fix typos in docstrings.
+	(find-file-visit-truename): Remove * from defcustom docstring.
+
 2008-11-13  T. V. Raman  <raman@users.sourceforge.net>  (tiny change)
 
 	* files.el (project-settings-file): New variable.
diff -r a84ee30498a7 -r 53e1b713e51f lisp/files.el
--- a/lisp/files.el	Thu Nov 13 15:18:38 2008 +0000
+++ b/lisp/files.el	Thu Nov 13 16:01:47 2008 +0000
@@ -154,7 +154,7 @@
   :group 'find-file)
 
 (defcustom find-file-visit-truename nil
-  "*Non-nil means visit a file under its truename.
+  "Non-nil means visit a file under its truename.
 The truename of a file is found by chasing all links
 both at the file level and at the levels of the containing directories."
   :type 'boolean
@@ -757,12 +757,12 @@
 
 (defun locate-dominating-file (file name)
   "Look up the directory hierarchy from FILE for a file named NAME.
-Stop at the first parent directory containing a file NAME return the directory.
-Return nil if not found."
+Stop at the first parent directory containing a file NAME,
+and return the directory.  Return nil if not found."
   ;; We used to use the above locate-dominating-files code, but the
   ;; directory-files call is very costly, so we're much better off doing
   ;; multiple calls using the code in here.
-  ;; 
+  ;;
   ;; Represent /home/luser/foo as ~/foo so that we don't try to look for
   ;; `name' in /home or in /.
   (setq file (abbreviate-file-name file))
@@ -3203,11 +3203,12 @@
       (push (cons class list) project-class-alist))))
 
 (defcustom project-settings-file ".dir-settings.el"
-  "Settings file for per-project settings. Set this to nil if you dont want  to load project-specific settings."
+  "Settings file for per-project settings.
+Set this to nil if you don't want to load project-specific settings."
   :type '(choice
-       (const  :tag "Ignore" nil)
-       (file :tag "File"))
-:group 'files)
+	  (const :tag "Ignore" nil)
+	  (file :tag "File"))
+  :group 'files)
 
 (defun project-find-settings-file (file)
   "Find the settings file for FILE.