diff options
Diffstat (limited to 'src/Utility/CmdLineRem.hs')
-rw-r--r-- | src/Utility/CmdLineRem.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Utility/CmdLineRem.hs b/src/Utility/CmdLineRem.hs index 46d6340..cdb72c9 100644 --- a/src/Utility/CmdLineRem.hs +++ b/src/Utility/CmdLineRem.hs @@ -78,6 +78,7 @@ parseRelativeTime exp = [h, "h", m, "m", ""] -> sequenceT (readMaybe h, readMaybe m) [h, "h", ""] -> sequenceT (readMaybe h, Just 0) [m, "m", ""] -> sequenceT (Just 0, readMaybe m) + [m] -> sequenceT (Just 0, readMaybe m) _ -> Nothing parseAbsoluteTime :: String -> Maybe (Hour, Minute) |