ambrevar/shell: Fix %cmd<-> to %cmd- renaming.

2021-01-20 12:31:53 +01:00 · 2021-01-20 12:31:53 +01:00 · ee2c3268e1
parent efd35e8e9f
commit ee2c3268e1
1 changed files with 1 additions and 1 deletions
--- a/.local/share/common-lisp/source/ambrevar/shell.lisp
+++ b/.local/share/common-lisp/source/ambrevar/shell.lisp
@ -202,7 +202,7 @@ Example:
    (apply #'cmd:$cmd cmd (append butlast-args
                                  (list :input last-arg)))))

-(defun %cmd<-> (final-caller &rest args)
+(defun %cmd- (final-caller &rest args)
  "See `cmd<->'."
  (let ((arg-lists (sera:split-sequence :<> args)))
    (sera:nlet call ((arg-lists arg-lists)