aboutsummaryrefslogtreecommitdiffstatshomepage
path: root/apps/AddPath.hs
diff options
context:
space:
mode:
Diffstat (limited to 'apps/AddPath.hs')
-rw-r--r--apps/AddPath.hs5
1 files changed, 3 insertions, 2 deletions
diff --git a/apps/AddPath.hs b/apps/AddPath.hs
index 7e5ae65..571012d 100644
--- a/apps/AddPath.hs
+++ b/apps/AddPath.hs
@@ -65,8 +65,9 @@ addPath options = runExceptT doAddPath >>= either ioError return
skipPrompt = optYes options
- emptyIfMissing e | isDoesNotExistError e = return ""
- | otherwise = throwE e
+ emptyIfMissing e
+ | isDoesNotExistError e = return ""
+ | otherwise = throwE e
doAddPath = do
oldValue <- Env.query profile varName `catchE` emptyIfMissing