--- a/UIPainter.st	Mon Jul 28 10:36:04 1997 +0200
+++ b/UIPainter.st	Mon Jul 28 10:37:01 1997 +0200
@@ -1233,12 +1233,12 @@
     |cls aspect editor|
 
     specClass isNil ifTrue:[
-        ^ self information:'no class yet'.
+        ^ self information:'no application class defined yet'.
     ].
     (cls := specClass) isBehavior ifFalse:[
         cls := Smalltalk at:specClass asSymbol.
         cls isNil ifTrue:[
-            ^ self information:'no class yet'
+            ^ self information:'no application class defined yet'
         ]
     ].
 
@@ -1248,7 +1248,10 @@
         ] ifFalse:[
             aspect := treeView propertySelected.
             aspect notNil ifTrue:[
-                aspect := aspect view asMenu.
+                Object errorSignal handle:[:ex |
+                ] do:[
+                    aspect := aspect view asMenu.
+                ]
             ]
         ].
         
@@ -1258,7 +1261,7 @@
         editor openModalOnClass:cls andSelector:aspect
     ]
 
-
+    "Modified: 28.7.1997 / 10:36:36 / cg"
 ! !
 
 !UIPainter methodsFor:'active help'!