fixed bug with multiple media names in admin interface

This commit is contained in:
nek0 2015-02-20 03:51:55 +01:00
parent 92059a966a
commit 1d8b75bfb9

View file

@ -7,7 +7,7 @@ $newline always
$forall (Entity mId m) <- media $forall (Entity mId m) <- media
<article class="item" data-width=#{mediumThumbWidth m}> <article class="item" data-width=#{mediumThumbWidth m}>
<a href=@{AdminMediumSettingsR mId}>#{mediumTitle m} <a href=@{AdminMediumSettingsR mId}>
<figure class="thumbnail"> <figure class="thumbnail">
<img src=@{StaticR $ StaticRoute (drop 2 $ map T.pack $ splitDirectories $ mediumThumb m) []}> <img src=@{StaticR $ StaticRoute (drop 2 $ map T.pack $ splitDirectories $ mediumThumb m) []}>
<figcaption>#{mediumTitle m} <figcaption>#{mediumTitle m}