13 lines
487 B
Text
Executable file
13 lines
487 B
Text
Executable file
$newline always
|
|
<div id="header" class="item" data-width="400">
|
|
<div class="inner">
|
|
<h1>Tag #{tag}
|
|
$if null media
|
|
There are no media tagged with #{tag}
|
|
|
|
$forall Just (Entity mId m) <- media
|
|
<article class="item" data-width=#{mediumThumbWidth m}>
|
|
<a href=@{MediumR mId}>
|
|
<figure class="thumbnail">
|
|
<img src=@{StaticR $ StaticRoute (drop 2 $ map T.pack $ splitDirectories $ mediumThumb m) []} title=#{mediumTitle m}>
|
|
<figcapion>#{mediumTitle m}
|