2014-09-07 04:56:34 +00:00
|
|
|
$newline always
|
2016-09-02 13:55:50 +00:00
|
|
|
<div .subheader .item>
|
|
|
|
<h1>Albums
|
|
|
|
$if null albums
|
|
|
|
<p>There are no albums yet
|
2014-09-07 04:56:34 +00:00
|
|
|
|
2015-01-11 19:06:44 +00:00
|
|
|
$forall (Entity aId a) <- albums
|
2016-09-02 13:55:50 +00:00
|
|
|
<div .item>
|
2015-02-20 02:46:55 +00:00
|
|
|
<a href=@{AdminAlbumSettingsR aId}>
|
2015-10-19 14:31:10 +00:00
|
|
|
<figure>
|
2015-01-11 19:06:44 +00:00
|
|
|
$if (albumSamplePic a) == Nothing
|
|
|
|
<img src="/static/img/album.jpg">
|
|
|
|
$else
|
|
|
|
<img src=#{T.pack $ fromJust $ albumSamplePic a}>
|
|
|
|
<figcaption>#{albumTitle a}
|