yesod-dsl-0.2.0: codegen/default-filter.cg
do
f <- lookupGetParam "filter"
let f' = (maybe Nothing (decode . LBS.fromChunks . (:[]) . encodeUtf8) f) :: Maybe [FS.Filter]
return $ maybe [] (concatMap toDefaultFilter~{entityName e}) f'
do
f <- lookupGetParam "filter"
let f' = (maybe Nothing (decode . LBS.fromChunks . (:[]) . encodeUtf8) f) :: Maybe [FS.Filter]
return $ maybe [] (concatMap toDefaultFilter~{entityName e}) f'