eidolon/templates/home.hamlet

16 lines
473 B
Text
Raw Normal View History

$doctype 5
2016-08-31 19:37:20 +00:00
<div .subheader .item>
2016-08-30 12:22:00 +00:00
<h1>Eidolon
<p>
A simple gallery System in Haskell and Yesod
2016-08-31 19:37:20 +00:00
$forall (Entity mediumId medium) <- recentMedia
2017-03-21 23:48:18 +00:00
<div .item>
2016-08-31 19:37:20 +00:00
<a href=@{MediumR mediumId}>
<figure>
<img src=@{StaticR $ StaticRoute (drop 2 $ map T.pack $ splitDirectories $ mediumThumb medium) []} title=#{mediumTitle medium}>
<figcaption>#{mediumTitle medium}
$if nextMedia
2017-03-21 23:48:18 +00:00
<div .item .subheader>
<a .pagin href=@{PageR 1}>
older