aboutsummaryrefslogtreecommitdiffstatshomepage
path: root/app/AddPath.hs
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--app/AddPath.hs3
1 files changed, 1 insertions, 2 deletions
diff --git a/app/AddPath.hs b/app/AddPath.hs
index 209e28c..27ec0ed 100644
--- a/app/AddPath.hs
+++ b/app/AddPath.hs
@@ -91,8 +91,7 @@ addPath options = runExceptT doAddPath >>= either ioError return
let destPaths = appendPaths srcPaths $ filter (`notElem` srcPaths) newPaths
let destPathsJoined = WindowsEnv.pathJoin $ map pathOriginal destPaths
let destValue = WindowsEnv.Value destExpandable destPathsJoined
- when (srcValue /= destValue) $ do
- promptAndEngrave srcValue destValue
+ when (srcValue /= destValue) $ promptAndEngrave srcValue destValue
promptAndEngrave oldValue newValue = do
let promptAnd = if skipPrompt