--- a/PluggableSet.st	Sun Mar 03 00:26:40 2019 +0100
+++ b/PluggableSet.st	Tue Mar 05 12:30:21 2019 +0100
@@ -72,20 +72,6 @@
     ^ self new hashWith:hashFunctionArg compareWith:compareFunctionArg
 ! !
 
-!PluggableSet methodsFor:'Compatibility-Squeak'!
-
-copyWithout:anElement
-    "return a new collection consisting of a copy of the receiver, with
-     ALL elements equal to elementToSkip are left out.
-     No error is reported, if elementToSkip is not in the collection."
-
-    ^ self reject:[:each | compareFunction value:each value:anElement]
-
-    "
-     #(1 2 3 4 5 6 7) asSet copyWithout:5
-    "
-! !
-
 !PluggableSet methodsFor:'accessing'!
 
 hashWith:hashFunctionArg compareWith:compareFunctionArg 
@@ -122,6 +108,20 @@
     "
 ! !
 
+!PluggableSet methodsFor:'copying'!
+
+copyWithout:anElement
+    "return a new collection consisting of a copy of the receiver, with
+     ALL elements equal to elementToSkip are left out.
+     No error is reported, if elementToSkip is not in the collection."
+
+    ^ self reject:[:each | compareFunction value:each value:anElement]
+
+    "
+     #(1 2 3 4 5 6 7) asSet copyWithout:5
+    "
+! !
+
 !PluggableSet methodsFor:'private'!
 
 collisionsFor:key