Fixed errors in clear protocol

Author: jvelilla

src/protocol/se_json_wire_protocol.e

@@ -1395,8 +1395,8 @@ feature -- Commands
 				resp := commnad_executor.element_value (a_session_id, an_id, a_name)
 				check_response (resp)
 				if not has_error then
-					if attached resp.value as l_value then
-						Result := l_value
+					if attached {JSON_STRING} resp.value as l_value then
+						Result := l_value.item
 					end
 				end
 			end
@@ -1735,7 +1735,7 @@ feature -- Commands
 						}
 					]"
 			end
-				
+
 			if commnad_executor.is_available then
 				if attached a_web_element as l_web_element  then
 					l_json.replace_substring_all ("$element", l_web_element.element)

src/protocol/se_json_wire_protocol_commands.e

@@ -356,7 +356,7 @@ feature
 
 	cmd_session_element_clear (sessionId: STRING_32; id: STRING_32): STRING_32
 		do
-			create Result.make_from_string (cmd_session_element_name_tmpl)
+			create Result.make_from_string (cmd_session_element_clear_tmpl)
 			Result.replace_substring_all ("$sessionId", sessionId)
 			Result.replace_substring_all ("$id", id)
 		end