A relational adapter for plone form gen