hablo/test/Mock/Blog/URL.hs

16 lines
259 B
Haskell

module Mock.Blog.URL (
noCards
, simple
) where
import Blog.URL (URLs(..))
simple :: URLs
simple = URLs {
cards = Just "https://test.net"
, comments = Nothing
, rss = Nothing
}
noCards :: URLs
noCards = simple {cards = Nothing}