Fixed creation procedures (make)

draft/library/wsf_js_widget/kernel/webcontrol/wsf_button_control.e

@@ -10,13 +10,16 @@ class
 inherit
 
 	WSF_CONTROL
+		rename
+			make as make_control
+		end
 
 create
-	make_button
+	make
 
 feature {NONE} -- Initialization
 
-	make_button (n: STRING; t: STRING)
+	make (n: STRING; t: STRING)
 			-- Initialize with specified control name and text
 		do
 			make_control (n, "button")

draft/library/wsf_js_widget/kernel/webcontrol/wsf_control.e

@@ -10,19 +10,21 @@ deferred class
 inherit
 
 	WSF_STATELESS_CONTROL
+		rename
+			make as make_stateless_control
 		redefine
 			render_tag
 		end
 
 feature {NONE} -- Initialization
 
-	make_control (n, a_tag_name: STRING)
+	make (n, a_tag_name: STRING)
 			-- Initialize with specified control name and tag
 		require
 			not n.is_empty
 			not a_tag_name.is_empty
 		do
-			make (a_tag_name)
+			make_stateless_control (a_tag_name)
 			control_name := n
 			create state_changes.make
 			create actions.make_array

draft/library/wsf_js_widget/kernel/webcontrol/wsf_form_control.e

@@ -10,15 +10,18 @@ class
 inherit
 
 	WSF_MULTI_CONTROL [WSF_CONTROL]
+		rename
+			make as make_multi_control
+		end
 
 	WSF_VALIDATABLE
 
 create
-	make_form_control
+	make
 
 feature {NONE} -- Initialization
 
-	make_form_control (n: STRING)
+	make (n: STRING)
 			-- Initialize
 		do
 			make_multi_control (n)

draft/library/wsf_js_widget/kernel/webcontrol/wsf_form_element_control.e

@@ -10,6 +10,8 @@ class
 inherit
 
 	WSF_CONTROL
+		rename
+			make as make_control
 		redefine
 			read_state_changes,
 			load_state,
@@ -19,17 +21,17 @@ inherit
 	WSF_VALIDATABLE
 
 create
-	make_form_element, make_form_element_with_validators
+	make, make_with_validators
 
 feature {NONE} -- Initialization
 
-	make_form_element (a_label: STRING; c: WSF_VALUE_CONTROL [G])
+	make (a_label: STRING; c: WSF_VALUE_CONTROL [G])
 			-- Initialize form element control with a specific label and value control
 		do
-			make_form_element_with_validators (a_label, c, create {ARRAYED_LIST [WSF_VALIDATOR [G]]}.make (0))
+			make_with_validators (a_label, c, create {ARRAYED_LIST [WSF_VALIDATOR [G]]}.make (0))
 		end
 
-	make_form_element_with_validators (a_label: STRING; c: WSF_VALUE_CONTROL [G]; v: LIST [WSF_VALIDATOR [G]])
+	make_with_validators (a_label: STRING; c: WSF_VALUE_CONTROL [G]; v: LIST [WSF_VALIDATOR [G]])
 			-- Initialize form element control with a specific label, value control and list of validators
 		do
 			make_control (c.control_name + "_container", "div")

draft/library/wsf_js_widget/kernel/webcontrol/wsf_html_control.e

@@ -10,16 +10,17 @@ class
 inherit
 
 	WSF_VALUE_CONTROL [STRING]
+	rename make as make_value_control end
 
 create
-	make_html
+	make
 
 feature {NONE} -- Initialization
 
-	make_html (n, t, v: STRING)
+	make (n, t, v: STRING)
 			-- Initialize
 		do
-			make_control (n, t)
+			make_value_control (n, t)
 			html := v
 		end
 

draft/library/wsf_js_widget/kernel/webcontrol/wsf_multi_control.e

@@ -10,6 +10,8 @@ class
 inherit
 
 	WSF_CONTROL
+		rename
+			make as make_control
 		redefine
 			full_state,
 			read_state_changes,
@@ -17,11 +19,11 @@ inherit
 		end
 
 create
-	make_multi_control, make_with_tag_name
+	make, make_with_tag_name
 
 feature {NONE} -- Initialization
 
-	make_multi_control (n: STRING)
+	make (n: STRING)
 			-- Initialize with specified control name and default tag "div"
 		do
 			make_with_tag_name (n, "div")
@@ -130,7 +132,7 @@ feature -- Change
 	add_control (c: G)
 			-- Add a control to this multi control
 		do
-				controls.extend (c)
+			controls.extend (c)
 		end
 
 feature -- Properties

draft/library/wsf_js_widget/kernel/webcontrol/wsf_page_control.e

@@ -11,7 +11,7 @@ inherit
 
 	WSF_CONTROL
 		rename
-			make as make_wsf_control
+			make as make_control
 		redefine
 			full_state,
 			read_state_changes