From f93127268106297eeaf29ea0389973b31f23a206 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Wed, 11 Dec 2013 00:18:58 -0400 Subject: [PATCH] syntax --- Logs/Transfer.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Logs/Transfer.hs b/Logs/Transfer.hs index a278fce356..97ec088950 100644 --- a/Logs/Transfer.hs +++ b/Logs/Transfer.hs @@ -359,7 +359,7 @@ readTransferInfo :: Maybe PID -> String -> Maybe TransferInfo readTransferInfo mpid s = TransferInfo <$> time #ifdef mingw32_HOST_OS - <*> pure $ if isJust mpid then mpid else mpid' + <*> pure (if isJust mpid then mpid else mpid') #else <*> pure mpid #endif