(eshell-ls-decorated-name): Doc fix.

(eshell-ls-missing, eshell-ls-dired-initial-args, eshell-ls-use-in-dired):
Fix typos in docstrings.

1 files changed, 4 insertions, 5 deletions

diff --git a/lisp/eshell/em-ls.el b/lisp/eshell/em-ls.el
index 514138b6bc2..8ed49ccbd40 100644
--- a/lisp/eshell/em-ls.el
+++ b/lisp/eshell/em-ls.el
@@ -64,13 +64,13 @@ This is useful for enabling human-readable format (-h), for example."
   :group 'eshell-ls)
 
 (defcustom eshell-ls-dired-initial-args nil
-  "*If non-nil, args is included before any call to `ls' in dired.
+  "*If non-nil, args is included before any call to `ls' in Dired.
 This is useful for enabling human-readable format (-h), for example."
   :type '(repeat :tag "Arguments" string)
   :group 'eshell-ls)
 
 (defcustom eshell-ls-use-in-dired nil
-  "*If non-nil, use `eshell-ls' to read directories in dired."
+  "*If non-nil, use `eshell-ls' to read directories in Dired."
   :set (lambda (symbol value)
 	 (if value
 	     (unless (and (boundp 'eshell-ls-use-in-dired)
@@ -158,7 +158,7 @@ faster and conserves more memory."
 (defface eshell-ls-missing
   '((((class color) (background light)) (:foreground "Red" :weight bold))
     (((class color) (background dark)) (:foreground "Red" :weight bold)))
-  "*The face used for highlighting non-existant file names."
+  "*The face used for highlighting non-existent file names."
   :group 'eshell-ls)
 ;; backward-compatibility alias
 (put 'eshell-ls-missing-face 'face-alias 'eshell-ls-missing)
@@ -863,8 +863,7 @@ to use, and each member of which is the width of that column
 	(cons col-widths newfiles)))))
 
 (defun eshell-ls-decorated-name (file)
-  "Return FILE, possibly decorated.
-Use TRUENAME for predicate tests, if passed."
+  "Return FILE, possibly decorated."
   (if eshell-ls-use-colors
       (let ((face
 	     (cond