blob: 41f672c8f910d922bbfc9775992ec267911c149f (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
--- 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]
|
GitWeb
