diff -r 0582767018d7 -r 1a7921b6c104 UIPainter.st --- a/UIPainter.st Mon Dec 03 12:25:20 2007 +0100 +++ b/UIPainter.st Wed Dec 05 11:54:52 2007 +0100 @@ -3896,7 +3896,7 @@ aspects at:#superclassNameChannel put:(specSuperclassName ? 'ApplicationModel') asValue. (self openDialogInterface:#dialogSpecForDefiningClassAndSelector) ifTrue:[ - specClassName := readFromModelKeyed value:#classNameChannel. + specClassName := readFromModelKeyed value:#classNameChannel. specSelector := readFromModelKeyed value:#methodNameChannel. specSuperclassName := readFromModelKeyed value:#superclassNameChannel.