2020-12-13 20:09:23 +01:00
|
|
|
module Mock.Blog.URL (
|
|
|
|
noCards
|
|
|
|
, simple
|
|
|
|
) where
|
|
|
|
|
2021-03-13 22:45:45 +01:00
|
|
|
import Blog.URL (URLs(..))
|
2020-12-13 20:09:23 +01:00
|
|
|
|
2021-03-13 22:45:45 +01:00
|
|
|
simple :: URLs
|
|
|
|
simple = URLs {
|
2020-12-13 20:09:23 +01:00
|
|
|
cards = Just "https://test.net"
|
|
|
|
, comments = Nothing
|
|
|
|
, rss = Nothing
|
|
|
|
}
|
|
|
|
|
2021-03-13 22:45:45 +01:00
|
|
|
noCards :: URLs
|
2020-12-13 20:09:23 +01:00
|
|
|
noCards = simple {cards = Nothing}
|