--- a/UIPainter.st	Wed Mar 03 22:57:39 2004 +0100
+++ b/UIPainter.st	Fri Mar 05 13:44:07 2004 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1995-1998 by eXept Software AG
 	      All Rights Reserved
@@ -3235,7 +3237,7 @@
     painter gridParameters:gridPara.
     painter gridShown: (settings at: #GridShown ifAbsent:false).
     painter gridAlign: (settings at: #GridAlign ifAbsent:false).
-    painter shown ifTrue:[painter clear].
+    painter shown ifTrue:[painter clearView].
 
     cls notNil ifTrue:[
         self setClass:cls selector:sel.
@@ -3527,7 +3529,7 @@
     bindings at:#vspace      put:((gridPara at:2) asValue).
 
     (self openDialogInterface:#dialogSpecForDefiningGridParameters withBindings:bindings) ifFalse:[
-	^ self
+        ^ self
     ].
 
     hspace := (bindings at:#hspace) value ? 5.
@@ -3548,7 +3550,7 @@
     settings at: #GridAlign  put: (bindings at:#alignToGrid) value.
     settings at: #HGridSpace put: hspace.
     settings at: #VGridSpace put: vspace.
-    painter clear.
+    painter clearView.
 
     "Modified: / 4.2.1999 / 15:36:34 / cg"
 !