Changed structure

examples/widgetapp/own_validator.e

@@ -18,7 +18,7 @@ feature {NONE}
 
 	make_own
 		do
-			error := "Input to long"
+			error := "Input too long"
 		end
 
 feature

examples/widgetapp/sample_page.e

@@ -44,10 +44,8 @@ feature
 			create cats_container.make_form_element ("Categories", cklist)
 			cats_container.add_validator (create {WSF_MIN_VALIDATOR [STRING]}.make_min_validator (1, "Choose at least one category"))
 			cats_container.add_validator (create {WSF_MAX_VALIDATOR [STRING]}.make_max_validator (1, "Choose at most one category"))
-
 			form.add_control (cats_container)
 			form.add_control (button1)
-
 			form.add_control (create {WSF_FORM_ELEMENT_CONTROL [STRING]}.make_form_element ("Result", textbox_result))
 			control := form
 		end

library/server/wsf_html/wsf_html-safe.ecf

@@ -21,6 +21,7 @@
 		<cluster name="form" location=".\form\" recursive="true"/>
 		<cluster name="webcontrol" location=".\webcontrol\">
 			<cluster name="validators" location=".\webcontrol\validators\"/>
+			<cluster name="input" location=".\webcontrol\input\"/>
 		</cluster>
 		<cluster name="widget" location=".\widget\" recursive="true"/>
 	</target>