Tools__BrowserList.st
changeset 15265 5758c44359cd
parent 15222 0d92944a4a35
child 15306 2547928ef35d
equal deleted inserted replaced
15264:d44fd9c7c25c 15265:5758c44359cd
   336     "Created: / 18.2.2000 / 02:46:52 / cg"
   336     "Created: / 18.2.2000 / 02:46:52 / cg"
   337 !
   337 !
   338 
   338 
   339 hideUnloadedClasses
   339 hideUnloadedClasses
   340     hideUnloadedClasses isNil ifTrue:[
   340     hideUnloadedClasses isNil ifTrue:[
   341 	hideUnloadedClasses := false asValue.
   341         hideUnloadedClasses := ValueHolder with:false.
   342 	hideUnloadedClasses addDependent:self.
   342         hideUnloadedClasses addDependent:self.
   343     ].
   343     ].
   344     ^ hideUnloadedClasses.
   344     ^ hideUnloadedClasses.
   345 
   345 
   346     "Modified: / 18.2.2000 / 02:02:52 / cg"
   346     "Modified: / 18.2.2000 / 02:02:52 / cg"
   347     "Created: / 18.2.2000 / 17:36:30 / cg"
   347     "Created: / 18.2.2000 / 17:36:30 / cg"
   448     "Modified: / 18.8.2000 / 19:26:40 / cg"
   448     "Modified: / 18.8.2000 / 19:26:40 / cg"
   449 !
   449 !
   450 
   450 
   451 pseudoListLabelHolder
   451 pseudoListLabelHolder
   452     pseudoListLabelHolder isNil ifTrue:[
   452     pseudoListLabelHolder isNil ifTrue:[
   453 	pseudoListLabelHolder := '' asValue.
   453         pseudoListLabelHolder := ValueHolder with:''.
   454     ].
   454     ].
   455     ^ pseudoListLabelHolder
   455     ^ pseudoListLabelHolder
   456 !
   456 !
   457 
   457 
   458 selectionChangeCondition:aBlockOrValueHolder
   458 selectionChangeCondition:aBlockOrValueHolder
   500             ].
   500             ].
   501             holder notNil ifTrue:[
   501             holder notNil ifTrue:[
   502                 holder addDependent:self.
   502                 holder addDependent:self.
   503             ] ifFalse:[
   503             ] ifFalse:[
   504                 showAllClassesInNameSpaceOrganisation isNil ifTrue:[
   504                 showAllClassesInNameSpaceOrganisation isNil ifTrue:[
   505                     showAllClassesInNameSpaceOrganisation := false asValue.
   505                     showAllClassesInNameSpaceOrganisation := ValueHolder with:false.
   506                     showAllClassesInNameSpaceOrganisation addDependent:self.
   506                     showAllClassesInNameSpaceOrganisation addDependent:self.
   507                 ].
   507                 ].
   508                 holder := showAllClassesInNameSpaceOrganisation.
   508                 holder := showAllClassesInNameSpaceOrganisation.
   509             ].
   509             ].
   510         ].
   510         ].
   527     "Created: / 05-03-2007 / 16:47:13 / cg"
   527     "Created: / 05-03-2007 / 16:47:13 / cg"
   528 !
   528 !
   529 
   529 
   530 showClassPackages
   530 showClassPackages
   531     showClassPackages isNil ifTrue:[
   531     showClassPackages isNil ifTrue:[
   532 	showClassPackages := false asValue.
   532         showClassPackages := ValueHolder with:false.
   533 	showClassPackages addDependent:self.
   533         showClassPackages addDependent:self.
   534     ].
   534     ].
   535     ^ showClassPackages.
   535     ^ showClassPackages.
   536 
   536 
   537     "Modified: / 18.2.2000 / 02:02:52 / cg"
   537     "Modified: / 18.2.2000 / 02:02:52 / cg"
   538     "Created: / 18.2.2000 / 17:36:30 / cg"
   538     "Created: / 18.2.2000 / 17:36:30 / cg"
   548     ].
   548     ].
   549 !
   549 !
   550 
   550 
   551 showCoverageInformation
   551 showCoverageInformation
   552     showCoverageInformation isNil ifTrue:[
   552     showCoverageInformation isNil ifTrue:[
   553         showCoverageInformation := false asValue.
   553         showCoverageInformation := ValueHolder with:false.
   554         showCoverageInformation addDependent:self.
   554         showCoverageInformation addDependent:self.
   555     ].
   555     ].
   556     ^ showCoverageInformation.
   556     ^ showCoverageInformation.
   557 
   557 
   558     "Created: / 27-04-2010 / 16:13:16 / cg"
   558     "Created: / 27-04-2010 / 16:13:16 / cg"
   598     ].
   598     ].
   599 !
   599 !
   600 
   600 
   601 sortBy
   601 sortBy
   602     sortBy isNil ifTrue:[
   602     sortBy isNil ifTrue:[
   603 	sortBy := nil asValue.
   603         sortBy := ValueHolder with:nil.
   604 	sortBy addDependent:self.
   604         sortBy addDependent:self.
   605     ].
   605     ].
   606     ^ sortBy.
   606     ^ sortBy.
   607 
   607 
   608     "Created: / 25.2.2000 / 22:36:40 / cg"
   608     "Created: / 25.2.2000 / 22:36:40 / cg"
   609 !
   609 !
  2101 ! !
  2101 ! !
  2102 
  2102 
  2103 !BrowserList class methodsFor:'documentation'!
  2103 !BrowserList class methodsFor:'documentation'!
  2104 
  2104 
  2105 version
  2105 version
  2106     ^ '$Header: /cvs/stx/stx/libtool/Tools__BrowserList.st,v 1.80 2015-02-07 17:48:00 cg Exp $'
  2106     ^ '$Header: /cvs/stx/stx/libtool/Tools__BrowserList.st,v 1.81 2015-02-13 11:05:53 cg Exp $'
  2107 !
  2107 !
  2108 
  2108 
  2109 version_CVS
  2109 version_CVS
  2110     ^ '$Header: /cvs/stx/stx/libtool/Tools__BrowserList.st,v 1.80 2015-02-07 17:48:00 cg Exp $'
  2110     ^ '$Header: /cvs/stx/stx/libtool/Tools__BrowserList.st,v 1.81 2015-02-13 11:05:53 cg Exp $'
  2111 ! !
  2111 ! !
  2112 
  2112