Tools__VariableList.st
changeset 11461 ec732c9b79f6
parent 11360 491ac5f4cbca
child 11586 3a33f4f9c9b6
equal deleted inserted replaced
11460:0669e11fb7fb 11461:ec732c9b79f6
   669         newSelection size > 0 ifTrue:[
   669         newSelection size > 0 ifTrue:[
   670             "/ force change (for dependents)
   670             "/ force change (for dependents)
   671             "/ selectedVariablesHolder value:nil.
   671             "/ selectedVariablesHolder value:nil.
   672             selectedVariablesHolder 
   672             selectedVariablesHolder 
   673                 setValue:newSelection;
   673                 setValue:newSelection;
   674                 changed.
   674                 removeDependent:self;
       
   675                 changed;
       
   676                 addDependent:self.
   675         ] ifFalse:[
   677         ] ifFalse:[
   676             prevSelection := selectedVariablesHolder value.
   678             prevSelection := selectedVariablesHolder value.
   677             selectedVariablesHolder value:nil.
   679             selectedVariablesHolder value:nil.
   678         ].
   680         ].
   679         (prevSelection size > 0 or:[newSelection size > 0
   681         (prevSelection size > 0 or:[newSelection size > 0
   689             ].
   691             ].
   690     showWarningAboutMissingEntryInXmlSpec := false.
   692     showWarningAboutMissingEntryInXmlSpec := false.
   691     listValid := true.
   693     listValid := true.
   692 
   694 
   693     "Modified: / 05-08-2011 / 12:34:47 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   695     "Modified: / 05-08-2011 / 12:34:47 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   694     "Modified: / 04-03-2012 / 13:29:11 / cg"
   696     "Modified: / 23-03-2012 / 15:55:47 / cg"
   695 ! !
   697 ! !
   696 
   698 
   697 !VariableList::VariableEntry class methodsFor:'instance creation'!
   699 !VariableList::VariableEntry class methodsFor:'instance creation'!
   698 
   700 
   699 application: app class: aClass name: aString
   701 application: app class: aClass name: aString
   817 ! !
   819 ! !
   818 
   820 
   819 !VariableList class methodsFor:'documentation'!
   821 !VariableList class methodsFor:'documentation'!
   820 
   822 
   821 version_CVS
   823 version_CVS
   822     ^ '$Header: /cvs/stx/stx/libtool/Tools__VariableList.st,v 1.16 2012-03-05 10:04:04 cg Exp $'
   824     ^ '$Header: /cvs/stx/stx/libtool/Tools__VariableList.st,v 1.17 2012-03-23 14:56:52 cg Exp $'
   823 ! !
   825 ! !