summaryrefslogtreecommitdiff
path: root/main.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'main.lisp')
-rw-r--r--main.lisp7
1 files changed, 4 insertions, 3 deletions
diff --git a/main.lisp b/main.lisp
index 1404b25..8cafce9 100644
--- a/main.lisp
+++ b/main.lisp
@@ -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)