eidolon/templates/home.hamlet

19 lines
606 B
Text
Raw Normal View History

$doctype 5
<div id="header" class="item" data-width="400">
<div class="inner">
<h1>Eidolon
<p>
A simple gallery System in Haskell and Yesod
$forall (Entity mediumId medium) <- recentMedia
<article class="item" data-width=#{mediumThumbWidth medium}>
<a href=@{MediumR mediumId}>
<figure>
<img src=@{StaticR $ StaticRoute (drop 2 $ map T.pack $ splitDirectories $ mediumThumb medium) []}>
<figcaption>#{mediumTitle medium}
2015-02-11 23:15:07 +00:00
$if nextMedia
<div id="header" class="item" data-width="400">
<div class="inner">
<p>
<a href=@{PageR 1}>
older