- (sqlite:execute-one-row-m-v db "select id, name, cover_id from albums where id = ?" album-id)
+ (sqlite:execute-one-row-m-v db "select name, cover_id from albums where id = ?" album-id)
(when name
(let ((photos (iter (for (id path title w h hidden)
in-sqlite-query "select p.id, p.path, ap.description, p.width, p.height, ap.hidden from photos p inner join album_photos ap on ap.photo_id = p.id where ap.album_id = ? and (ap.hidden is null or ? is not null) order by ap.idx"
