diff options
Diffstat (limited to 'app/AddPath.hs')
| -rw-r--r-- | app/AddPath.hs | 3 |
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 |