--- a/UIPainter.st	Mon Nov 05 16:48:27 2001 +0100
+++ b/UIPainter.st	Mon Nov 05 18:26:34 2001 +0100
@@ -2146,28 +2146,31 @@
     |spec cls meta sel|
 
     (self resolveName:specClass) isNil ifTrue:[
-	self askForSaving ifFalse: [^self]
+        self askForSaving ifFalse: [^self]
     ]. 
 
     spec := self specTool specification.
     cls := spec majorKey.
     cls isNil ifTrue:[
-	cls := specClass.
+        cls := specClass.
     ].
     (cls := self resolveName:cls inClass:(Smalltalk at: specClass asSymbol)) isNil ifTrue:[
-	spec majorKey isNil ifTrue:[
-	    ^ self warn:'Cannot find class (no majorKey specified)'.
-	].
-	^ self warn:'Cannot find class ', spec majorKey asBoldText, '!!'.
+        spec majorKey isNil ifTrue:[
+            ^ self warn:'Cannot find class (no majorKey specified).'.
+        ].
+        ^ self warn:('Cannot find class ', spec majorKey asBoldText, '.').
     ].
     sel := spec minorKey.
     meta := cls class whichClassIncludesSelector:sel.
     meta isNil ifTrue:[
-	^ self warn:'Cannot find selector #', (sel ? '') asBoldText, ' in class ', cls name asBoldText, '!!'
+        ^ self warn:'Cannot find selector #', (sel ? '') asBoldText, ' in class ', cls name asBoldText, '!!'
     ].
 
-    self class openOnClass:meta soleInstance andSelector:spec minorKey.
-
+    self class 
+        openOnClass:meta soleInstance 
+        andSelector:spec minorKey.
+
+    "Modified: / 5.11.2001 / 16:51:46 / cg"
 !
 
 openTabListEditor