Mocked reponse headers manipulation added.

- #addAll:
- #at:add:
- #at:put:
- #at:put:ifPresentMerge:

src/Znock/ZnockBase.class.st

@@ -60,6 +60,9 @@ ZnockBase >> forwardedSelectors [
 		#handleResponseMessage: ->
 		#(addCookie: entity: headers: resetEntity: setLocation: setWWWAuthenticate: statusLine:).
 
+		#handleResponseHeadersMessage: ->
+		#(addAll: at:add: at:put: at:put:ifPresentMerge:).
+
 	} asDictionary
 ]
 
@@ -90,6 +93,12 @@ ZnockBase >> handleResponseCreationMessage: aMessage [
 	^ self response: (aMessage sendTo: ZnResponse)
 ]
 
+{ #category : #building }
+ZnockBase >> handleResponseHeadersMessage: aMessage [
+	self response.
+	^ aMessage sendTo: builtClient response headers
+]
+
 { #category : #building }
 ZnockBase >> handleResponseMessage: aMessage [
 	self response.