From 316c0efb5d5f2adcbf4c2ab608a7e99561ac9002 Mon Sep 17 00:00:00 2001 From: Egor Tensin Date: Thu, 17 Sep 2026 08:51:11 +0500 Subject: app: don't import things that are in the Prelude now --- app/AddPath.hs | 3 +-- app/ListPaths.hs | 2 -- app/RemovePath.hs | 3 +-- app/SetEnv.hs | 6 ++---- app/UnsetEnv.hs | 6 ++---- 5 files changed, 6 insertions(+), 14 deletions(-) diff --git a/app/AddPath.hs b/app/AddPath.hs index 3e8bbd8..4262a6e 100644 --- a/app/AddPath.hs +++ b/app/AddPath.hs @@ -10,9 +10,8 @@ module Main (main) where import Control.Monad (when, void) import Control.Monad.Trans.Except (catchE, runExceptT, throwE) import Data.List (nub) -import Data.Monoid ((<>)) import Data.Version (showVersion) -import System.IO.Error (ioError, isDoesNotExistError) +import System.IO.Error (isDoesNotExistError) import Options.Applicative diff --git a/app/ListPaths.hs b/app/ListPaths.hs index b7d9c37..b950eb7 100644 --- a/app/ListPaths.hs +++ b/app/ListPaths.hs @@ -11,11 +11,9 @@ import Control.Monad (filterM) import Control.Monad.Trans.Class (lift) import Control.Monad.Trans.Except (runExceptT) import Data.Maybe (fromMaybe) -import Data.Monoid ((<>)) import Data.Version (showVersion) import System.Directory (doesDirectoryExist) import System.Environment (lookupEnv) -import System.IO.Error (ioError) import Options.Applicative diff --git a/app/RemovePath.hs b/app/RemovePath.hs index 6954359..7de6fd4 100644 --- a/app/RemovePath.hs +++ b/app/RemovePath.hs @@ -9,9 +9,8 @@ module Main (main) where import Control.Monad (void, when) import Control.Monad.Trans.Except (catchE, runExceptT, throwE) -import Data.Monoid ((<>)) import Data.Version (showVersion) -import System.IO.Error (ioError, isDoesNotExistError) +import System.IO.Error (isDoesNotExistError) import Options.Applicative diff --git a/app/SetEnv.hs b/app/SetEnv.hs index ac8fa93..8985b76 100644 --- a/app/SetEnv.hs +++ b/app/SetEnv.hs @@ -7,11 +7,9 @@ module Main (main) where -import Control.Monad (void) +import Control.Monad (void) import Control.Monad.Trans.Except (runExceptT) -import Data.Monoid ((<>)) -import Data.Version (showVersion) -import System.IO.Error (ioError) +import Data.Version (showVersion) import Options.Applicative diff --git a/app/UnsetEnv.hs b/app/UnsetEnv.hs index c1e904d..d7ba0bc 100644 --- a/app/UnsetEnv.hs +++ b/app/UnsetEnv.hs @@ -7,11 +7,9 @@ module Main (main) where -import Control.Monad (void) +import Control.Monad (void) import Control.Monad.Trans.Except (runExceptT) -import Data.Monoid ((<>)) -import Data.Version (showVersion) -import System.IO.Error (ioError) +import Data.Version (showVersion) import Options.Applicative -- cgit v1.3