From: Jim Porter Date: Mon, 12 Dec 2022 04:19:57 +0000 (-0800) Subject: ; Rename 'eshell-flatten-args' token to 'eshell-splice-immediately' X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b8eef7b8c1066cf446ca1b37d3fd5c1ea3e3ab07;p=emacs.git ; 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'. --- diff --git a/lisp/eshell/esh-arg.el b/lisp/eshell/esh-arg.el index 0b175be713e..87121196715 100644 --- a/lisp/eshell/esh-arg.el +++ b/lisp/eshell/esh-arg.el @@ -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)