diff options
author | Logan Hunt <loganhunt@simponic.xyz> | 2022-05-29 21:31:48 -0700 |
---|---|---|
committer | Logan Hunt <loganhunt@simponic.xyz> | 2022-05-29 21:31:48 -0700 |
commit | edeab2d09444e02a2eeb3adb2bf7933a2851c5b3 (patch) | |
tree | 774027b0b7f31f457a4f01eb977ed8922bcfaf6a /main.lisp | |
parent | 088a03c2e788127c5b8606d0a6a1956ff58e4ec1 (diff) | |
download | lispruns-edeab2d09444e02a2eeb3adb2bf7933a2851c5b3.tar.gz lispruns-edeab2d09444e02a2eeb3adb2bf7933a2851c5b3.zip |
Get a timer on the screen finally
Diffstat (limited to 'main.lisp')
-rw-r--r-- | main.lisp | 7 |
1 files changed, 4 insertions, 3 deletions
@@ -11,9 +11,10 @@ :arg-parser #'identity)) (defun main () - (let ((options (opts:get-opts))) + (let ((options (opts:get-opts)) + (category (car (mito:select-dao 'category)))) (when-option (options :import) - (import-config (getf options :import)))) - (run-ui)) + (import-config (getf options :import))) + (run-ui category))) (main) |