17 lines
293 B
Haskell
17 lines
293 B
Haskell
|
module Mock.Blog.Skin (
|
||
|
|
simple
|
||
|
|
) where
|
||
|
|
|
||
|
|
import Blog.Skin (Skin(..))
|
||
|
|
import Prelude hiding (head)
|
||
|
|
|
||
|
|
simple :: Skin
|
||
|
|
simple = Skin {
|
||
|
|
banner = Nothing
|
||
|
|
, cardImage = Nothing
|
||
|
|
, favicon = Nothing
|
||
|
|
, head = Nothing
|
||
|
|
, previewArticlesCount = 3
|
||
|
|
, previewLinesCount = 10
|
||
|
|
}
|