changelog shortlog graph tags branches changeset file revisions annotate raw help

Mercurial > core / lisp/bin/rdb.lisp

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)