diff -r b70597d2a39b -r d48281345935 UIPainter.st --- 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'!