[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] trunk r114383: * eshell/em-hist.el (eshell-hist-parse-argu
From: |
Glenn Morris |
Subject: |
[Emacs-diffs] trunk r114383: * eshell/em-hist.el (eshell-hist-parse-arguments): Remove unused arg `silent'. |
Date: |
Thu, 19 Sep 2013 02:38:31 +0000 |
User-agent: |
Bazaar (2.6b2) |
------------------------------------------------------------
revno: 114383
revision-id: address@hidden
parent: address@hidden
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Wed 2013-09-18 19:38:25 -0700
message:
* eshell/em-hist.el (eshell-hist-parse-arguments): Remove unused arg `silent'.
Update callers.
modified:
lisp/ChangeLog changelog-20091113204419-o5vbwnq5f7feedwu-1432
lisp/eshell/em-hist.el emhist.el-20091113204419-o5vbwnq5f7feedwu-1857
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2013-09-19 02:28:20 +0000
+++ b/lisp/ChangeLog 2013-09-19 02:38:25 +0000
@@ -1,5 +1,8 @@
2013-09-19 Glenn Morris <address@hidden>
+ * eshell/em-hist.el (eshell-hist-parse-arguments):
+ Remove unused arg `silent'. Update callers.
+
* eshell/em-ls.el (eshell-ls-use-in-dired): Use `symbol' arg.
Fix (f)boundp mix-up.
=== modified file 'lisp/eshell/em-hist.el'
--- a/lisp/eshell/em-hist.el 2013-09-18 01:48:00 +0000
+++ b/lisp/eshell/em-hist.el 2013-09-19 02:38:25 +0000
@@ -531,7 +531,7 @@
((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 @@
(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 @@
(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
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] trunk r114383: * eshell/em-hist.el (eshell-hist-parse-arguments): Remove unused arg `silent'.,
Glenn Morris <=