cleanup setEnv & unsetEnv

1 files changed, 2 insertions, 0 deletions

diff --git a/testkiki/testkiki.hs b/testkiki/testkiki.hs
index 11653f2..aa93e2c 100644
--- a/testkiki/testkiki.hs
+++ b/testkiki/testkiki.hs
@@ -106,6 +106,7 @@ doTests tkConfig = hspec $ do
             setEnv "GNUPGHOME" (gnupghome config)
             let args' = args ++ ["--chroot=" ++ chroot config]
             readProcess "./dist/build/kiki/kiki" args' ""
+            unsetEnv "GNUPGHOME"
 
         kiki'No'Env'No'Home config args = do
             let args' = args ++ ["--chroot=" ++ chroot config]
@@ -119,6 +120,7 @@ doTests tkConfig = hspec $ do
             setEnv "GNUPGHOME" (gnupghome config)
             let args' = args ++ ["--chroot=" ++ chroot config,"--home=" ++ gnupghome config]
             readProcess "./dist/build/kiki/kiki" args' ""
+            unsetEnv "GNUPGHOME"
 
         -- UTILS
         isInfixOf sub str = let (_,match) = B.breakSubstring (B.pack sub) (B.pack str)