Merge pull request #129 from vonbecmann/patch-1

use allButFirst
svenvc · Nov 13, 2023 · a9f195e · a9f195e
2 parents 37b5ede + b1b44ce
commit a9f195e
Showing 1 changed file with 2 additions and 2 deletions.
diff --git 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
+	^ urlObject host includesSubstring: domain