From 246e7278f4770c87277c9e8aeedfba17547859d8 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Sun, 10 May 2015 15:41:41 -0400 Subject: generalied elem/notElem in ghc 7.10 require some additional type signatures when using OverloadedStrings --- Remote/Tahoe.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Remote/Tahoe.hs') diff --git a/Remote/Tahoe.hs b/Remote/Tahoe.hs index 56bf66427..bc4789e57 100644 --- a/Remote/Tahoe.hs +++ b/Remote/Tahoe.hs @@ -177,7 +177,7 @@ getSharedConvergenceSecret configdir = go (60 :: Int) v <- catchMaybeIO (readFile f) case v of Just s | "\n" `isSuffixOf` s || "\r" `isSuffixOf` s -> - return $ takeWhile (`notElem` "\n\r") s + return $ takeWhile (`notElem` ("\n\r" :: String)) s _ -> do threadDelaySeconds (Seconds 1) go (n - 1) -- cgit v1.2.3