--- feed-0.3.9.2-orig/Text/Feed/Query.hs 2013-10-28 02:48:21.000000000 +1100 +++ feed-0.3.9.2/Text/Feed/Query.hs 2015-04-04 11:48:36.759173147 +1100 @@ -1,3 +1,4 @@ +{-# LANGUAGE CPP #-} -------------------------------------------------------------------- -- | -- Module : Text.Feed.Query @@ -62,7 +63,12 @@ import Data.Maybe -- for getItemPublishDate rfc822 date parsing. +#if MIN_VERSION_time(1,5,0) +import System.Locale ( rfc822DateFormat, iso8601DateFormat ) +import Data.Time ( defaultTimeLocale ) +#else import System.Locale ( rfc822DateFormat, iso8601DateFormat, defaultTimeLocale ) +#endif import Data.Time.Format ( ParseTime, parseTime ) feedItems :: Feed.Feed -> [Feed.Item]