diff --git a/repository/Zinc-HTTP.package/ZnCookie.class/instance/isInDomain..st b/repository/Zinc-HTTP.package/ZnCookie.class/instance/isInDomain..st
index 4d5cc436..6ec6cf5d 100644
--- a/repository/Zinc-HTTP.package/ZnCookie.class/instance/isInDomain..st
+++ b/repository/Zinc-HTTP.package/ZnCookie.class/instance/isInDomain..st
@@ -2,6 +2,6 @@ testing
 isInDomain: urlObject
 	| domain |
 	domain := (self domain beginsWith: '.')
-		ifTrue: [ self domain copyFrom: 2 to: self domain size ]
+		ifTrue: [ self domain allButFirst ]
 		ifFalse: [ self domain ].
-	^ urlObject host includesSubstring: domain
\ No newline at end of file
+	^ urlObject host includesSubstring: domain