diff options
Diffstat (limited to '')
| -rw-r--r-- | apps/AddPath.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/apps/AddPath.hs b/apps/AddPath.hs index 1f80f70..1b27b84 100644 --- a/apps/AddPath.hs +++ b/apps/AddPath.hs @@ -53,7 +53,7 @@ addPath :: Options -> IO () addPath options = do oldValue <- Env.query profile varName let oldPaths = Env.pathSplit $ fromMaybe "" oldValue - let newPaths = union oldPaths pathsToAdd + let newPaths = oldPaths `union` pathsToAdd when (length oldPaths /= length newPaths) $ do let newValue = Env.pathJoin newPaths let promptAnd = if skipPrompt |