aboutsummaryrefslogtreecommitdiffhomepage
path: root/src/Main.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Main.hs')
-rw-r--r--src/Main.hs6
1 files changed, 4 insertions, 2 deletions
diff --git a/src/Main.hs b/src/Main.hs
index daf31dd..0fdb194 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -73,9 +73,11 @@ main = do
then doCron
else if length args == 1 && head args == "--refresh-emacs"
then refreshEmacsEventCache
- else maybe
+ else do
+ maybeParse <- cmdLineReminder args
+ maybe
(error "srem: invalid input")
- appendUserReminder $ cmdLineReminder args
+ appendUserReminder maybeParse
localHMD :: IO (Hour, Minute, Day)
localHMD = do