window title
authorClaus Gittinger <cg@exept.de>
Fri, 20 Jun 2008 11:39:04 +0200
changeset 2363 4c74ed85b3a4
parent 2362 a6a7ef98fdc3
child 2364 121c79884983
window title
UISelectionPanel.st
--- a/UISelectionPanel.st	Fri Jun 20 11:38:50 2008 +0200
+++ b/UISelectionPanel.st	Fri Jun 20 11:39:04 2008 +0200
@@ -1583,11 +1583,11 @@
 update:something with:aParameter from:changedObject
     "one of my models changed its value
     "
-    |channel label|
+    |label|
 
-    (channel := self clientSpec) == changedObject ifTrue:[
-        (label := channel value) notNil ifTrue:[
-            label := label name.
+    changedObject == self clientSpec  ifTrue:[
+        (label := changedObject value) notNil ifTrue:[
+            label := 'Widget Gallery: ' , label name.
         ] ifFalse:[
             label := 'Widget Gallery'
         ].