changeset 650: |
692dfd7f02d0 |
parent 649: |
6e5006dfe7b8 |
child 651: |
af486e0a40c9 |
author: |
Richard Westhaver <ellis@rwest.io> |
date: |
Fri, 13 Sep 2024 20:30:55 -0400 |
files: |
lisp/bin/homer.lisp lisp/bin/organ.lisp lisp/bin/packy.lisp |
description: |
update with-cli syntax |
1.1--- a/lisp/bin/homer.lisp Thu Sep 12 22:38:22 2024 -0400
1.2+++ b/lisp/bin/homer.lisp Fri Sep 13 20:30:55 2024 -0400
1.3@@ -198,7 +198,7 @@
1.4
1.5 (defun run ()
1.6 (let ((*log-level* :info))
1.7- (with-cli (opts cmds args) *cli*
1.8+ (with-cli (*cli* opts cmds args) (cli:args)
1.9 (init-homer-vars)
1.10 (load-homerc)
1.11 (do-cmd *cli*)
2.1--- a/lisp/bin/organ.lisp Thu Sep 12 22:38:22 2024 -0400
2.2+++ b/lisp/bin/organ.lisp Fri Sep 13 20:30:55 2024 -0400
2.3@@ -57,7 +57,7 @@
2.4
2.5 (defun run ()
2.6 (let ((*log-level* :info))
2.7- (with-cli (*cli* opts cmds args) ()
2.8+ (with-cli (*cli* opts cmds args) (cli:args)
2.9 (do-cmd *cli*)
2.10 (debug-opts *cli*))))
2.11
3.1--- a/lisp/bin/packy.lisp Thu Sep 12 22:38:22 2024 -0400
3.2+++ b/lisp/bin/packy.lisp Fri Sep 13 20:30:55 2024 -0400
3.3@@ -26,7 +26,7 @@
3.4
3.5 (defun run ()
3.6 (let ((*log-level* :info))
3.7- (with-cli (opts cmds args) *cli*
3.8+ (with-cli (*cli* opts cmds args) (cli:args)
3.9 (do-cmd *cli*)
3.10 (debug-opts *cli*))))
3.11