From 573e2ebf4975c80f413d4c3ed03d973443449beb Mon Sep 17 00:00:00 2001 From: Igor Pashev Date: Sun, 8 Sep 2019 17:44:24 +0200 Subject: Use Control.Applicative explicitly --- src/Main.hs | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) diff --git a/src/Main.hs b/src/Main.hs index 09aeb99..8cd83cc 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -2,14 +2,13 @@ module Main ( main ) where +import Control.Applicative ((<**>), (<|>), optional, some) import System.Exit (exitFailure) import System.IO (hPutStrLn, stderr) import Data.Time.Calendar (Day) import Options.Applicative ( Parser - , (<**>) - , (<|>) , argument , auto , execParser @@ -21,10 +20,8 @@ import Options.Applicative , long , metavar , option - , optional , short , showDefault - , some , value ) -- cgit v1.2.3