yesod-dsl-0.1.1.5: codegen/read-input-object-fields.cg

    e~{show pId} <- do
~{maybeSelectExisting e fields fr}
        return $ ~{entityName e} {
~{indent 16 $ mapFields e fields} 
            }