on master help sign in
Satisfy older ghc
commit9229765a81c085661d622f4bdd1c09cfa996d6d1 authorLeonid Onokhov <sopvop@gmail.com> dateFri 28 Oct 2016, 14:33 (10 years ago) parent7cd9df3
1 file changed+2−2
katip/test/Katip/Tests/Format/Time.hs+2−2
katip/test/Katip/Tests/Format/Time.hs+2−2
@@ -77,5 +77,5 @@ newtype ArbUTCTime = ArbUTCTime {
7777 } deriving (Show)
7878
7979instance Arbitrary ArbUTCTime where
80− arbitrary = ArbUTCTime . posixSecondsToUTCTime . fromInteger
81− <$> arbitrary
80+ arbitrary = fmap (ArbUTCTime . posixSecondsToUTCTime . fromInteger)
81+ arbitrary