--- a/Color.st	Fri Feb 05 17:09:52 2010 +0100
+++ b/Color.st	Tue Feb 09 14:40:38 2010 +0100
@@ -178,7 +178,7 @@
             round == 1 ifTrue:[
                 'Color [info]: collect garbage to reclaim colors' infoPrintCR.
                 ObjectMemory performLowSpaceCleanup.
-                ObjectMemory garbageCollect.
+                ObjectMemory garbageCollect; finalize.
                 round := 2.
                 devClr := clr exactOn:aDevice.
            ].
@@ -3772,7 +3772,6 @@
     "Modified: 11.7.1996 / 18:20:14 / cg"
 ! !
 
-
 !Color methodsFor:'Compatibility-ST80'!
 
 asDevicePaintOn:aDevice
@@ -5558,11 +5557,11 @@
 !Color class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Color.st,v 1.218 2009-10-24 15:33:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Color.st,v 1.219 2010-02-09 13:40:38 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview/Color.st,v 1.218 2009-10-24 15:33:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Color.st,v 1.219 2010-02-09 13:40:38 stefan Exp $'
 ! !
 
 Color initialize!