haskell/yesod
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Workaround for GHC warnings (#252)

Browse Source
This commit is contained in:
Luite Stegeman 2012-02-03 14:04:03 +01:00
parent 87c75eddac
commit 9905011721
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
yesod-newsfeed/Yesod/AtomFeed.hs
View File

@ -75,11 +75,11 @@ entryTemplate arg =
atomLink :: Route m
-> String -- ^ title
-> GWidget s m ()
atomLink u title = addHamletHead
atomLink r title = addHamletHead
#if __GLASGOW_HASKELL__ >= 700
[hamlet|
#else
[$hamlet|
#endif
<link href=@{u} type=#{S8.unpack typeAtom} rel="alternate" title=#{title}
<link href=@{r} type=#{S8.unpack typeAtom} rel="alternate" title=#{title}
|]

4
yesod-newsfeed/Yesod/RssFeed.hs
View File

@ -72,11 +72,11 @@ entryTemplate arg =
rssLink :: Route m
-> String -- ^ title
-> GWidget s m ()
rssLink u title = addHamletHead
rssLink r title = addHamletHead
#if __GLASGOW_HASKELL__ >= 700
[hamlet|
#else
[$hamlet|
#endif
<link href=@{u} type=#{S8.unpack typeRss} rel="alternate" title=#{title}
<link href=@{r} type=#{S8.unpack typeRss} rel="alternate" title=#{title}
|]