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

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