Mock response creation messages taking url.

 
All selectors from class-side ZnRequest can now be used
to create mock response.

src/Znock/ZnockBase.class.st

@@ -59,6 +59,9 @@ ZnockBase >> forwardedSelectors [
 		#handleResponseCreationFromRequestMessage: ->
 		#(#badRequest: badRequest:entity: methodNotAllowed: methodNotAllowed:entity:).
 
+		#handleResponseCreationFromUrlMessage: ->
+		#(#created: created:entity: notFound: notFound:entity: redirect: redirect:entity:).
+
 		#handleResponseMessage: ->
 		#(addCookie: entity: headers: resetEntity: setLocation: setWWWAuthenticate: statusLine:).
 
@@ -80,6 +83,15 @@ ZnockBase >> handleResponseCreationFromRequestMessage: aMessage [
 		res customizeFrom: (aMessage sendTo: ZnResponse) ]
 ]
 
+{ #category : #building }
+ZnockBase >> handleResponseCreationFromUrlMessage: aMessage [
+	aMessage argument ifNotNil: [ ^ self handleResponseCreationMessage: aMessage ].
+	self response: self newCleanResponse.
+	builtClient customizeResponseBlock: [ :req :res | 
+		aMessage argument: req url.
+		res customizeFrom: (aMessage sendTo: ZnResponse) ]
+]
+
 { #category : #building }
 ZnockBase >> handleResponseCreationMessage: aMessage [
 	^ self response: (aMessage sendTo: ZnResponse)