ambrevar/shell: Fix %cmd- to use :- instead of :<>.

master
Pierre Neidhardt 2021-01-24 19:22:44 +01:00
parent 080a051f8d
commit f0c05a77b3
1 changed files with 2 additions and 2 deletions

View File

@ -180,8 +180,8 @@ Example:
(list :input last-arg)))))
(defun %cmd- (final-caller &rest args)
"See `cmd<->'."
(let ((arg-lists (sera:split-sequence :<> args)))
"See `cmd-'."
(let ((arg-lists (sera:split-sequence :- args)))
(sera:nlet call ((arg-lists arg-lists)
(last-result-stream nil))
(let* ((args (first arg-lists)))