--- a/Depth8Image.st	Thu Nov 16 17:25:25 1995 +0100
+++ b/Depth8Image.st	Thu Nov 16 17:35:48 1995 +0100
@@ -34,7 +34,7 @@
 !
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Depth8Image.st,v 1.30 1995-11-11 15:49:30 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Depth8Image.st,v 1.31 1995-11-16 16:35:33 cg Exp $'
 !
 
 documentation
@@ -1119,9 +1119,11 @@
 			    ].
 			    devColor isNil ifTrue:[
 				gcRound == 1 ifTrue:[
-				    'D8IMAGE: force GC for possible color reclamation.' infoPrintNL.
-				    ObjectMemory incrementalGC; finalize.
-				    devColor := color nearestOn:aDevice error:error.
+				    CollectGarbageWhenRunningOutOfColors ifTrue:[
+					'D8IMAGE: force GC for possible color reclamation.' infoPrintNL.
+					ObjectMemory incrementalGC; finalize.
+					devColor := color nearestOn:aDevice error:error.
+				    ].
 				    gcRound := 2
 				]
 			    ]

--- a/Image.st	Thu Nov 16 17:25:25 1995 +0100
+++ b/Image.st	Thu Nov 16 17:35:48 1995 +0100
@@ -42,7 +42,7 @@
 !
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Image.st,v 1.45 1995-11-11 15:51:14 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Image.st,v 1.46 1995-11-16 16:35:48 cg Exp $'
 !
 
 documentation
@@ -203,7 +203,8 @@
 	self initializeFileFormatTable
     ].
 
-    CollectGarbageWhenRunningOutOfColors := true
+"/    CollectGarbageWhenRunningOutOfColors := true
+    CollectGarbageWhenRunningOutOfColors := false
 !
 
 initializeFileFormatTable