revision 560: | b9c64be96888 |
---|---|
parent 439: | ea4f008ad13f |
child 561: | 42bc1432f217 |
1.1--- a/lisp/bin/rdb.lisp Fri Jul 26 19:28:10 2024 -0400 1.2+++ b/lisp/bin/rdb.lisp Fri Jul 26 23:12:33 2024 -0400 1.3@@ -89,7 +89,7 @@ 1.4 1.5 (defmain () 1.6 (let ((*log-level* :info)) 1.7- (with-cli (opts cmds args) $cli 1.8+ (with-slots (opts cmds args) *cli* 1.9 ;; FIXME 2024-05-07: needs to be triggered explicitly - need to support 1.10 ;; running global opt thunks even when no arg present - macro key 1.11 (if (active-cmds $cli)