Fixed HTTP_DATE for GMT+ offset (integer value)

library/network/protocol/http/src/http_date.e

@@ -551,6 +551,7 @@ feature {NONE} -- Implementation
 							err := True
 						end
 						if not err then
+							i := i + 1
 							from until i > n or else not s[i].is_digit loop
 								t.extend (s[i].as_upper)
 								i := i + 1

library/network/protocol/http/tests/http_date_test_set.e

@@ -22,7 +22,6 @@ feature -- Test routines
 			d: HTTP_DATE
 		do
 			s := "Sun, 06 Nov 1994 08:49:37 GMT"
-
 			create d.make_from_string (s)
 			assert ("RFC 1123", not d.has_error and then d.string.same_string (s))
 			create d.make_from_timestamp (d.timestamp)
@@ -40,6 +39,14 @@ feature -- Test routines
 			assert ("ANSI format", d.has_error)
 
 
+
+			-- Tolerance ...
+			s := "Sun, 06 Nov 1994 09:49:37 GMT+1"
+
+			create d.make_from_string (s)
+			assert ("RFC 1123", not d.has_error and then d.string.same_string ("Sun, 06 Nov 1994 08:49:37 GMT"))
+
+
 		end
 
 end