Allow niladic blocks in #will:.

src/Znock/ZnockExpectation.class.st

@@ -20,7 +20,7 @@ ZnockExpectation >> customizeResponseBlock: anObject [
 
 { #category : #operations }
 ZnockExpectation >> customizeResponseFromRequest: aZnRequest [
-	customizeResponseBlock ifNotNil: [ customizeResponseBlock value: aZnRequest value: response ]
+	customizeResponseBlock ifNotNil: [ customizeResponseBlock cull: aZnRequest cull: response ]
 ]
 
 { #category : #accessing }