From f0c05a77b355c117b4076b8f86621d840ee2231e Mon Sep 17 00:00:00 2001 From: Pierre Neidhardt Date: Sun, 24 Jan 2021 19:22:44 +0100 Subject: [PATCH] ambrevar/shell: Fix %cmd- to use :- instead of :<>. --- .local/share/common-lisp/source/ambrevar/shell.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/.local/share/common-lisp/source/ambrevar/shell.lisp b/.local/share/common-lisp/source/ambrevar/shell.lisp index bfe4a0bc..79971952 100644 --- a/.local/share/common-lisp/source/ambrevar/shell.lisp +++ b/.local/share/common-lisp/source/ambrevar/shell.lisp @@ -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)))