diff --git a/source/Stargate-Model-Tests/CachingDirectivesBuilderTest.class.st b/source/Stargate-Model-Tests/CachingDirectivesBuilderTest.class.st
index 060d26d..1204c46 100644
--- a/source/Stargate-Model-Tests/CachingDirectivesBuilderTest.class.st
+++ b/source/Stargate-Model-Tests/CachingDirectivesBuilderTest.class.st
@@ -45,13 +45,20 @@ CachingDirectivesBuilderTest >> assertThereAre: aNumber directivesFrom: aBuilder
 	self assertExpiresHeaderFor: response with: aDuration
 ]
 
+{ #category : #'private - accessing' }
+CachingDirectivesBuilderTest >> requestContext [
+
+	^ HttpRequestContext new
+]
+
 { #category : #'private - accessing' }
 CachingDirectivesBuilderTest >> responseAffectedBy: directives [
 
-	| response |
+	| response resource |
 
-	response := ZnResponse ok: ( ZnStringEntity text: 'theResource' ).
-	directives do: [ :directive | directive cull: response cull: self cull: self ].
+	resource := 'theResource'.
+	response := ZnResponse ok: ( ZnStringEntity text: resource ).
+	directives do: [ :directive | directive cull: response cull: self requestContext cull: resource ].
 	^ response
 ]