From 6543d5406c64bb00a58e74305ec9ca09a49faf0b Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Wed, 3 Apr 2013 03:52:41 -0400
Subject: hlint

---
 Creds.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'Creds.hs')

diff --git a/Creds.hs b/Creds.hs
index ee0a67398..4c6896663 100644
--- a/Creds.hs
+++ b/Creds.hs
@@ -92,7 +92,7 @@ getRemoteCredPair c storage = maybe fromcache (return . Just) =<< fromenv
 		Just credpair -> do
 			writeCacheCredPair credpair storage
 			return $ Just credpair
-		_ -> do error $ "bad creds"
+		_ -> error "bad creds"
 
 {- Gets a CredPair from the environment. -}
 getEnvCredPair :: CredPairStorage -> IO (Maybe CredPair)
-- 
cgit v1.2.3