$doctype 5
A simple gallery System in Haskell and Yesod $forall (Entity mediumId medium) <- recentMedia #{mediumTitle medium} $if nextMedia older
older