← All posts tagged yesod

жуйк выручай, ща у меня морда треснет от натуги, как в йесоде сделать из EntityField Tag (Key Tag) просто PersistValue?
пример кода:
getTagR tagId = do
tags <- (runDB $ rawSql "select ?? from tag where tag.id = ?" [tagId]) :: Handler [Entity Tag]
...

решил в качестве дз повторить на йесоде ruhaskell.org, и вот написал такой код, для того что бы ссылки разделялись запятой
$with categoriesCount <- length categories
$forall (Entity categoryId category, ix) <- zip categories ints
<a href=@{CategoryR categoryId}>
#{categoryTitle category}
<span .badge-for-tag-link>1
$if ix < (categoriesCount — 1)
, #
помимо удивления, что в гамлете нельзя использовать [0..], появился вопрос: можно ли это сделать прилично?