diff options
-rw-r--r-- | Logs/Transfer.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Logs/Transfer.hs b/Logs/Transfer.hs index a278fce35..97ec08895 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 |