diff --git a/Monadoro.cabal b/Monadoro.cabal
--- a/Monadoro.cabal
+++ b/Monadoro.cabal
@@ -5,7 +5,7 @@
 -- see: https://github.com/sol/hpack
 
 name:           Monadoro
-version:        0.3.1.0
+version:        0.3.2.0
 synopsis:       A minimalistic CLI Pomodoro timer.
 description:    A Pomodoro timer with two modes: single-pomodoro (default), and four-pomodoro (`--session`).
 category:       Tools
diff --git a/app/Main.hs b/app/Main.hs
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -11,12 +11,12 @@
 
 
 main :: IO ()
-main = getArgs >>= parseArgs
+main = getArgs >>= parse
 
-parseArgs :: [String] -> IO ()
-parseArgs xs
-  | xs `containsEither` ["--help", "-h"]    = showUsage
-  | xs `containsEither` ["--version", "-v"] = printVersion
-  | xs `containsEither` ["--session", "-s"] = runSession xs
-  | xs `containsEither` ["--man", "-m"]     = showManual
-  | otherwise                               = runPomodoros xs
+parse :: [String] -> IO ()
+parse args
+  | args `containsEither` ["--help", "-h"]    = showUsage
+  | args `containsEither` ["--version", "-v"] = printVersion
+  | args `containsEither` ["--session", "-s"] = runSession args
+  | args `containsEither` ["--man", "-m"]     = showManual
+  | otherwise                                 = runPomodoros args