summaryrefslogtreecommitdiff
path: root/lisp/eshell/em-hist.el
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2013-09-18 19:38:25 -0700
committerGlenn Morris <rgm@gnu.org>2013-09-18 19:38:25 -0700
commit8e51b5d087612619a37e4fbb767d1dad8488f110 (patch)
treee57b14d94805166e1b2f6ccb348edb7d6683e4d3 /lisp/eshell/em-hist.el
parent0bc8d75810cd7ffbb768f6a734363977d6ce2007 (diff)
downloademacs-8e51b5d087612619a37e4fbb767d1dad8488f110.tar.gz
* eshell/em-hist.el (eshell-hist-parse-arguments): Remove unused arg `silent'.
Update callers.
Diffstat (limited to 'lisp/eshell/em-hist.el')
-rw-r--r--lisp/eshell/em-hist.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/eshell/em-hist.el b/lisp/eshell/em-hist.el
index 12ec8ce1f35..31eb1e1ff10 100644
--- a/lisp/eshell/em-hist.el
+++ b/lisp/eshell/em-hist.el
@@ -531,7 +531,7 @@ See also `eshell-read-history'."
((string= "%" ref)
(error "`%%' history word designator not yet implemented"))))
-(defun eshell-hist-parse-arguments (&optional silent b e)
+(defun eshell-hist-parse-arguments (&optional b e)
"Parse current command arguments in a history-code-friendly way."
(let ((end (or e (point)))
(begin (or b (save-excursion (eshell-bol) (point))))
@@ -571,7 +571,7 @@ See also `eshell-read-history'."
(defun eshell-expand-history-references (beg end)
"Parse and expand any history references in current input."
- (let ((result (eshell-hist-parse-arguments t beg end)))
+ (let ((result (eshell-hist-parse-arguments beg end)))
(when result
(let ((textargs (nreverse (nth 0 result)))
(posb (nreverse (nth 1 result)))
@@ -699,7 +699,7 @@ matched."
(here (point))
textargs)
(insert hist)
- (setq textargs (car (eshell-hist-parse-arguments nil here (point))))
+ (setq textargs (car (eshell-hist-parse-arguments here (point))))
(delete-region here (point))
(if (string= nth "*")
(if mth