Pretty Print

library/server/wsf_html/webcontrol/wsf_button_control.e

@@ -8,10 +8,14 @@ class
 	WSF_BUTTON_CONTROL
 
 inherit
+
 	WSF_CONTROL
+
 create
 	make
+
 feature {NONE}
+
 	make (n: STRING; v: STRING)
 		do
 			make_control
@@ -19,13 +23,15 @@ feature {NONE}
 			text := v
 			click_event := agent donothing
 		end
+
 feature
 
 		--UGLY HACK MUST BE REMOVED
+
 	donothing (p: WSF_PAGE_CONTROL)
 		do
-
 		end
+
 	handle_callback (event: STRING; cname: STRING; page: WSF_PAGE_CONTROL)
 		do
 			if Current.control_name = cname and attached click_event then
@@ -44,8 +50,10 @@ feature
 			Result.put (create {JSON_STRING}.make_json (text), create {JSON_STRING}.make_json ("text"))
 		end
 
-
 feature
+
 	text: STRING
+
 	click_event: PROCEDURE [ANY, TUPLE [WSF_PAGE_CONTROL]]
+
 end

library/server/wsf_html/webcontrol/wsf_control.e

@@ -6,13 +6,16 @@ note
 
 deferred class
 	WSF_CONTROL
+
 feature {NONE}
+
 	make_control
 		do
 			control_name := ""
 		end
 
 feature
+
 	control_name: STRING
 
 feature {WSF_PAGE_CONTROL}

library/server/wsf_html/webcontrol/wsf_page_control.e

@@ -33,7 +33,6 @@ feature
 
 feature
 
-
 	execute
 		local
 			event: detachable STRING
@@ -73,7 +72,6 @@ feature
 			if attached value then
 				Result := value.as_string.value
 			end
-
 		end
 
 feature {NONE}