Added is_request_method (STRING): BOOLEAN to help users

2011-11-09 18:07:03 +01:00
parent 36493b4324
commit bc2e8b8ee2
1 changed files with 8 additions and 0 deletions
--- a/library/server/wsf/src/wsf_request.e
+++ b/library/server/wsf/src/wsf_request.e
@@ -111,6 +111,14 @@ feature -- Access: Input
 			Result := wgi_request.input
 		end

+feature -- Helper
+
+	is_request_method (m: READABLE_STRING_8): BOOLEAN
+			-- Is `m' the Current request_method?
+		do
+			Result := request_method.is_case_insensitive_equal (m)
+		end
+
 feature {NONE} -- Access: global variable

 	items_table: HASH_TABLE [WSF_VALUE, READABLE_STRING_8]