12 lines
342 B
Text
Executable file
12 lines
342 B
Text
Executable file
$newline always
|
|
<div .subheader .item>
|
|
<h1>Media
|
|
$if null media
|
|
<p>There are no media yet
|
|
|
|
$forall (Entity mId m) <- media
|
|
<div .item>
|
|
<a href=@{AdminMediumSettingsR mId}>
|
|
<figure>
|
|
<img src=@{StaticR $ StaticRoute (drop 2 $ map T.pack $ splitDirectories $ mediumThumb m) []}>
|
|
<figcaption>#{mediumTitle m}
|