diff --git a/web/CXM_form.anubis b/web/CXM_form.anubis index a0896a9..4420aef 100644 --- a/web/CXM_form.anubis +++ b/web/CXM_form.anubis @@ -242,7 +242,8 @@ public type CXM_Form_Field: label_for ( String label, HTML_Id id, HTML_In_Form input), - div (List(CoreAttrs), HTML_In_Form content), + div (List(CoreAttrs), List(HTML_In_Form) contents), + div (List(CoreAttrs), List(CXM_Form_Field) fields), partial (HTML_Partial_Content p_content), br, hr (List(CoreAttrs) options), @@ -410,6 +411,22 @@ public define CXM_Form_Field hr([]) . +public define CXM_Form_Field + div + ( + List(CoreAttrs) attrs, + HTML_In_Form content + )= + div(attrs, [content]) +. + +public define CXM_Form_Field + div + ( + HTML_In_Form content + )= + div([], [content]) +. //--- explanation field --------------------- // ////////////////////////////////////////////////////////// @@ -492,7 +509,7 @@ public define HTML_In_Form empty, title(t) then - literal("