aboutsummaryrefslogtreecommitdiffstatshomepage
path: root/app/RemovePath.hs
diff options
context:
space:
mode:
authorEgor Tensin <Egor.Tensin@gmail.com>2017-06-11 05:37:27 +0300
committerEgor Tensin <Egor.Tensin@gmail.com>2017-06-11 05:37:27 +0300
commit742c541568f05d160784ace2024ee7256e3bd189 (patch)
tree1825605080aecab732ac59245dc762f4248945c7 /app/RemovePath.hs
parentwindows-env.cabal: fix formatting (diff)
downloadwindows-env-742c541568f05d160784ace2024ee7256e3bd189.tar.gz
windows-env-742c541568f05d160784ace2024ee7256e3bd189.zip
refactoring
Diffstat (limited to 'app/RemovePath.hs')
-rw-r--r--app/RemovePath.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/app/RemovePath.hs b/app/RemovePath.hs
index 2d0d47c..23cabb7 100644
--- a/app/RemovePath.hs
+++ b/app/RemovePath.hs
@@ -85,6 +85,6 @@ removePath options = runExceptT doRemovePath >>= either ioError return
let newValue = WindowsEnv.VarValue (WindowsEnv.varValueExpandable oldValue) (WindowsEnv.pathJoin newPaths)
let promptAnd = if skipPrompt
then withoutPrompt
- else withPrompt $ oldNewMessage profile varName (show oldValue) (show newValue)
+ else withPrompt $ oldNewMessage profile varName oldValue newValue
let engrave = WindowsEnv.engrave profile varName newValue
void $ promptAnd engrave