From edeab2d09444e02a2eeb3adb2bf7933a2851c5b3 Mon Sep 17 00:00:00 2001 From: Logan Hunt Date: Sun, 29 May 2022 21:31:48 -0700 Subject: Get a timer on the screen finally --- main.lisp | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) (limited to 'main.lisp') 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) -- cgit v1.2.3-70-g09d2