allow building with old feed lib, w/o pubdate
This commit is contained in:
parent
238a935f9c
commit
291847bf88
2 changed files with 5 additions and 1 deletions
|
@ -224,11 +224,15 @@ feedFile tmpl i extension = Utility.Format.format tmpl $ M.fromList
|
|||
fieldMaybe k Nothing = (k, "none")
|
||||
fieldMaybe k (Just v) = field k v
|
||||
|
||||
#if MIN_VERSION_feed(0,3,9)
|
||||
pubdate itm = case getItemPublishDate itm :: Maybe (Maybe UTCTime) of
|
||||
Just (Just d) -> Just $
|
||||
formatTime defaultTimeLocale "%F" d
|
||||
-- if date cannot be parsed, use the raw string
|
||||
_ -> replace "/" "-" <$> getItemPublishDateString itm
|
||||
#else
|
||||
pubdate _ = Nothing
|
||||
#endif
|
||||
|
||||
{- Called when there is a problem with a feed.
|
||||
- Throws an error if the feed is broken, otherwise shows a warning. -}
|
||||
|
|
|
@ -211,7 +211,7 @@ Executable git-annex
|
|||
CPP-Options: -DWITH_DNS
|
||||
|
||||
if flag(Feed)
|
||||
Build-Depends: feed (>= 0.3.9.2)
|
||||
Build-Depends: feed
|
||||
CPP-Options: -DWITH_FEED
|
||||
|
||||
if flag(Quvi)
|
||||
|
|
Loading…
Reference in a new issue