summaryrefslogtreecommitdiff
path: root/lisp/eshell/em-dirs.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/eshell/em-dirs.el')
-rw-r--r--lisp/eshell/em-dirs.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/eshell/em-dirs.el b/lisp/eshell/em-dirs.el
index 3104bb11b17..43bc3ffaa6f 100644
--- a/lisp/eshell/em-dirs.el
+++ b/lisp/eshell/em-dirs.el
@@ -178,7 +178,7 @@ thing again."
Thus, this does not include the current directory.")
(defvar eshell-last-dir-ring nil
- "The last directory that eshell was in.")
+ "The last directory that Eshell was in.")
;;; Functions:
@@ -267,7 +267,7 @@ Thus, this does not include the current directory.")
(char-to-string (char-before))))
(defun eshell-parse-drive-letter ()
- "An argument beginning X:[^/] is a drive letter reference."
+ "An argument beginning with X:[^/] is a drive letter reference."
(when (and (not eshell-current-argument)
(looking-at "\\([A-Za-z]:\\)\\([^/\\\\]\\|\\'\\)"))
(goto-char (match-end 1))
@@ -517,7 +517,7 @@ in the minibuffer:
msg)))
(defun eshell-read-last-dir-ring ()
- "Sets the buffer's `eshell-last-dir-ring' from a history file."
+ "Set the buffer's `eshell-last-dir-ring' from a history file."
(let ((file eshell-last-dir-ring-file-name))
(cond
((or (null file)
@@ -545,7 +545,7 @@ in the minibuffer:
(setq eshell-last-dir-ring ring))))))
(defun eshell-write-last-dir-ring ()
- "Writes the buffer's `eshell-last-dir-ring' to a history file."
+ "Write the buffer's `eshell-last-dir-ring' to a history file."
(let ((file eshell-last-dir-ring-file-name))
(cond
((or (null file)