diff --git a/Handler/AlbumSettings.hs b/Handler/AlbumSettings.hs index b717c28..d96f198 100644 --- a/Handler/AlbumSettings.hs +++ b/Handler/AlbumSettings.hs @@ -80,7 +80,7 @@ albumSettingsForm album albumId = renderDivs $ Album where media = do entities <- runDB $ selectList [MediumAlbum ==. albumId] [Desc MediumTitle] - optionsPairs $ map (\med -> (mediumTitle $ entityVal med, mediumPath (entityVal med))) entities + optionsPairs $ map (\med -> (mediumTitle $ entityVal med, mediumThumb (entityVal med))) entities getAlbumDeleteR :: AlbumId -> Handler Html getAlbumDeleteR albumId = do diff --git a/templates/tagMedia.hamlet b/templates/tagMedia.hamlet index ea6f226..ab9f3af 100644 --- a/templates/tagMedia.hamlet +++ b/templates/tagMedia.hamlet @@ -10,5 +10,5 @@ $else