--- a/Collection.st	Fri Jan 16 13:53:46 2009 +0100
+++ b/Collection.st	Fri Jan 16 14:06:15 2009 +0100
@@ -2349,27 +2349,6 @@
      since not enough elements are in the collection"
 
     ^ NotEnoughElementsSignal raise
-!
-
-showWhereWeCameFrom
-    "show the stack backtrace: at least 4 levels, or until the first 
-     send to a non-collection object (because we want to know,
-     which non-collection send invoked a bad collection-method)."
-
-    |con count|
-
-    con := thisContext sender sender.
-    count := 0.
-    [
-        ('    from ' , con printString) errorPrintCR.
-        con := con sender.
-        count := count + 1.
-    ] doWhile:[con notNil and:[count < 4 or:[con receiver isCollection]]].
-
-
-    "
-      #() asSet add:nil
-    "
 ! !
 
 !Collection methodsFor:'growing'!
@@ -3361,7 +3340,7 @@
 !Collection class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Collection.st,v 1.214 2009-01-16 12:53:46 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Collection.st,v 1.215 2009-01-16 13:06:15 cg Exp $'
 ! !
 
 Collection initialize!