diff options
author | Egor Tensin <Egor.Tensin@gmail.com> | 2017-06-11 05:37:27 +0300 |
---|---|---|
committer | Egor Tensin <Egor.Tensin@gmail.com> | 2017-06-11 05:37:27 +0300 |
commit | 742c541568f05d160784ace2024ee7256e3bd189 (patch) | |
tree | 1825605080aecab732ac59245dc762f4248945c7 /app/RemovePath.hs | |
parent | windows-env.cabal: fix formatting (diff) | |
download | windows-env-742c541568f05d160784ace2024ee7256e3bd189.tar.gz windows-env-742c541568f05d160784ace2024ee7256e3bd189.zip |
refactoring
Diffstat (limited to 'app/RemovePath.hs')
-rw-r--r-- | app/RemovePath.hs | 2 |
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 |