yesod-dsl-0.2.0: codegen/default-filter-fields.cg
case defaultFilterJson of
Just xs -> mapM_ (\fjm -> case FS.f_field fjm of
~{fields}
_ -> return ()
) xs
Nothing -> return ()
case defaultFilterJson of
Just xs -> mapM_ (\fjm -> case FS.f_field fjm of
~{fields}
_ -> return ()
) xs
Nothing -> return ()