From 4937ba2ecea2260527ec2bbfa12e743765a9888d Mon Sep 17 00:00:00 2001
From: Egor Tensin <Egor.Tensin@gmail.com>
Date: Mon, 12 Jun 2017 03:49:42 +0300
Subject: setenv: crap, another bug

I don't know what's happening.
The latest string of commits is basically broken at every point.
I'll tag as soon as I decide it's safe to use, which probably will
become the default mode of development (instead of _every_ commit
representing a working version).
---
 app/SetEnv.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'app')

diff --git a/app/SetEnv.hs b/app/SetEnv.hs
index 258bc2e..e77b05a 100644
--- a/app/SetEnv.hs
+++ b/app/SetEnv.hs
@@ -66,7 +66,7 @@ setEnv options = runExceptT doSetEnv >>= either ioError return
 
     doSetEnv = do
         expanded <- WindowsEnv.expand varValue
-        let expandable = expanded == varValue
+        let expandable = expanded /= varValue
         let newValue = WindowsEnv.Value expandable varValue
         promptAndEngrave newValue
 
-- 
cgit v1.2.3