# HG changeset patch # User Claus Gittinger # Date 1031135357 -7200 # Node ID 91a7b38eb142f2efa2807b6dee9b7cfad8e2a915 # Parent 613c56ad49d9b8cb9afaf0331687901df3c6018e slight code beautification; diff -r 613c56ad49d9 -r 91a7b38eb142 UISelectionPanel.st --- a/UISelectionPanel.st Wed Sep 04 12:27:09 2002 +0200 +++ b/UISelectionPanel.st Wed Sep 04 12:29:17 2002 +0200 @@ -1586,21 +1586,18 @@ update:something with:aParameter from:changedObject "one of my models changed its value " - |channel label topView| + |channel label| (channel := self clientSpec) == changedObject ifTrue:[ - topView := builder window topView. - (label := channel value) notNil ifTrue:[ - topView label:label name, ' '. + label := label name. ] ifFalse:[ - topView label:'Widget Gallery ' - ] + label := 'Widget Gallery' + ]. + builder window topView label:(label , ' ') ]. super update:something with:aParameter from:changedObject. - - ! ! !UISelectionPanel methodsFor:'drag & drop'!