diff options
| author |  Joey Hess <joey@kitenet.net> | 2014-08-10 15:30:55 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2014-08-10 15:30:55 -0400 |
| commit | f0728e2a4ab342addf589fab180835843d1bb060 (patch) | |
| tree | 3db4340331a9663239a6a0a0c038413c8318a847 /Utility/Gpg.hs | |
| parent | f7fe5cd59b99cbc1de0b7c74f41b603add94cedd (diff) | |
fix windows build
Diffstat (limited to 'Utility/Gpg.hs')
| -rw-r--r-- | Utility/Gpg.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Utility/Gpg.hs b/Utility/Gpg.hs index dfca82778..69a47c78f 100644 --- a/Utility/Gpg.hs +++ b/Utility/Gpg.hs @@ -119,8 +119,8 @@ feedRead params passphrase feeder reader = do #else -- store the passphrase in a temp file for gpg withTmpFile "gpg" $ \tmpfile h -> do - hPutStr h passphrase - hClose h + liftIO $ hPutStr h passphrase + liftIO $ hClose h let passphrasefile = [Param "--passphrase-file", File tmpfile] go $ passphrasefile ++ params #endif |