--- a/UIPainter.st	Tue Jan 27 21:29:56 1998 +0100
+++ b/UIPainter.st	Wed Jan 28 12:06:18 1998 +0100
@@ -2721,7 +2721,7 @@
 
 preSnapshot
 
-    Images removeAll
+    Images notNil ifTrue: [Images removeAll]
 ! !
 
 !UIPainter::TreeView methodsFor:'accessing'!