forked from Github/emacs
; Rename 'eshell-flatten-args' token to 'eshell-splice-immediately'
This is for symmetry with 'eshell-splice-args' (which performs a splice later on). Since this is just an internal symbol not exposed to users, changing it is safe. * lisp/eshell/esh-arg.el (eshell-parse-arguments, eshell-finish-arg): Use 'eshell-splice-immediately'.
This commit is contained in:
parent
e63ef66c57
commit
b8eef7b8c1
1 changed files with 4 additions and 2 deletions
|
|
@ -301,7 +301,8 @@ argument list in place of the value of the current argument."
|
|||
(setq eshell-current-argument (car arguments))
|
||||
(cl-assert (and (not eshell-arg-listified)
|
||||
(not eshell-current-modifiers)))
|
||||
(setq eshell-current-argument (cons 'eshell-flatten-args arguments))))
|
||||
(setq eshell-current-argument
|
||||
(cons 'eshell-splice-immediately arguments))))
|
||||
(throw 'eshell-arg-done t))
|
||||
|
||||
(defun eshell-quote-argument (string)
|
||||
|
|
@ -342,7 +343,8 @@ Point is left at the end of the arguments."
|
|||
(buffer-substring here (point-max))))
|
||||
(when arg
|
||||
(nconc args
|
||||
(if (eq (car-safe arg) 'eshell-flatten-args)
|
||||
(if (eq (car-safe arg)
|
||||
'eshell-splice-immediately)
|
||||
(cdr arg)
|
||||
(list arg))))))))
|
||||
(throw 'eshell-incomplete (if (listp delim)
|
||||
|
|
|
|||
Loading…
Reference in a new issue