remove debug print
This commit is contained in:
parent
9e0bafd70b
commit
cd15f6fa48
1 changed files with 0 additions and 1 deletions
1
Creds.hs
1
Creds.hs
|
@ -75,7 +75,6 @@ setRemoteCredPair' mkval parseconfig encsetup c gc storage mcreds = case mcreds
|
|||
| embedCreds pc -> do
|
||||
let key = credPairRemoteField storage
|
||||
localcache creds
|
||||
liftIO $ print ("set creds", key, creds)
|
||||
storeconfig creds key =<< remoteCipher pc gc
|
||||
| otherwise -> do
|
||||
localcache creds
|
||||
|
|
Loading…
Reference in a new issue