mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

* lisp/eshell: Fix history substitution error

Browse source 
Fixes: debbugs:18960

* lisp/eshell/em-hist.el (eshell-hist-parse-word-designator):
Return args joined with " ".
* lisp/eshell/em-pred.el (eshell-parse-modifiers): Correct docstring.
(eshell-hist-parse-modifier): Pass mod a list instead of a string.
This commit is contained in:
Samer Masterson 2015-02-24 14:03:54 -05:00 • committed by Stefan Monnier
parent feb49cb7a4
commit 450bebaec9
4 changed files with 22 additions and 14 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/eshell/em-hist.el
View file

@ -724,7 +724,7 @@ matched."
(setq nth (eshell-hist-word-reference nth)))
(unless (numberp mth)
(setq mth (eshell-hist-word-reference mth)))
(cons (mapconcat 'identity (eshell-sublist textargs nth mth) "")
(cons (mapconcat 'identity (eshell-sublist textargs nth mth) " ")
end))))
(defun eshell-hist-parse-modifier (hist reference)
@ -737,7 +737,7 @@ matched."
(goto-char (point-min))
(let ((modifiers (cdr (eshell-parse-modifiers))))
(dolist (mod modifiers)
(setq hist (funcall mod hist)))
(setq hist (car (funcall mod (list hist)))))
hist))
(delete-region here (point)))))