Tools_OrganizerCanvas.st
changeset 8743 49ab1a31fb79
parent 8736 24b4731900f9
child 8755 061ebdd98078
--- a/Tools_OrganizerCanvas.st	Mon Sep 21 22:46:34 2009 +0200
+++ b/Tools_OrganizerCanvas.st	Mon Sep 21 22:46:53 2009 +0200
@@ -3359,13 +3359,13 @@
 updateNameSpaceLabel
     |box|
 
-    box := self builder componentAt:#NameSpaceFilterComboBox.
+    box := self componentAt:#NameSpaceFilterComboBox.
     box notNil ifTrue:[
-	"/ new code: ExtComboBox uses always an EditField
-	box editor contents:nameSpaceFilterSelection value first.        
-
-	"/ old code: readOnly ExtComboBox used a Label
-	"/ box menuField label:nameSpaceFilterSelection value first
+        "/ new code: ExtComboBox uses always an EditField
+        box editor contents:nameSpaceFilterSelection value first.        
+
+        "/ old code: readOnly ExtComboBox used a Label
+        "/ box menuField label:nameSpaceFilterSelection value first
     ]
 !
 
@@ -4901,5 +4901,5 @@
 !OrganizerCanvas class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_OrganizerCanvas.st,v 1.36 2009-09-21 13:56:48 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_OrganizerCanvas.st,v 1.37 2009-09-21 20:46:53 cg Exp $'
 ! !