Tools__OrganizerCanvas.st
branchjv
changeset 16300 0566688a620d
parent 16213 f667b5b42a11
child 16571 cf319f2e56d0
equal deleted inserted replaced
16299:3f157c50fd66 16300:0566688a620d
  4859         selectedClasses value size ~~ 0 ifTrue:[
  4859         selectedClasses value size ~~ 0 ifTrue:[
  4860             (orgMode ~~ OrganizerCanvas organizerModeClassHierarchy
  4860             (orgMode ~~ OrganizerCanvas organizerModeClassHierarchy
  4861             and:[ orgMode ~~ OrganizerCanvas organizerModePackageDiagram ]) ifTrue:[
  4861             and:[ orgMode ~~ OrganizerCanvas organizerModePackageDiagram ]) ifTrue:[
  4862                 "/ if the organizerMode is project, avoid clobbering the project selection
  4862                 "/ if the organizerMode is project, avoid clobbering the project selection
  4863                 (orgMode ~~ OrganizerCanvas organizerModeProject
  4863                 (orgMode ~~ OrganizerCanvas organizerModeProject
  4864                 or:[ (self selectedProjects value includesAll:( selectedClasses value collect:[:each | each package] )) not ])  ifTrue:[
  4864                 "/ or:[ (self selectedProjects value includesAll:( selectedClasses value collect:[:each | each package] )) not ]
       
  4865                 or:[ (self selectedProjects value includes: self class nameListEntryForChanged)
       
  4866                 or:[ (self selectedProjects value includes: self class nameListEntryForALL) ]]
       
  4867                 ) ifTrue:[
  4865                     self updateOrganizationFromChangedClass.
  4868                     self updateOrganizationFromChangedClass.
  4866                 ].
  4869                 ].
  4867             ].
  4870             ].
  4868         ]
  4871         ]
  4869     ].
  4872     ].
  4895     ].
  4898     ].
  4896 
  4899 
  4897     super update:something with:aParameter from:changedObject
  4900     super update:something with:aParameter from:changedObject
  4898 
  4901 
  4899     "Modified: / 27-04-2010 / 16:58:31 / cg"
  4902     "Modified: / 27-04-2010 / 16:58:31 / cg"
       
  4903     "Modified: / 26-03-2014 / 10:17:29 / Jan Vrany <jan.vrany@fit.cvut.cz>"
  4900 !
  4904 !
  4901 
  4905 
  4902 updateCategorySelectionFromClasses
  4906 updateCategorySelectionFromClasses
  4903     |allEntry changedEntry oldSelectedCategories categories|
  4907     |allEntry changedEntry oldSelectedCategories categories|
  4904 
  4908 
  5199     ^ '$Header$'
  5203     ^ '$Header$'
  5200 !
  5204 !
  5201 
  5205 
  5202 version_CVS
  5206 version_CVS
  5203     ^ '$Header$'
  5207     ^ '$Header$'
       
  5208 !
       
  5209 
       
  5210 version_HG
       
  5211 
       
  5212     ^ '$Changeset: <not expanded> $'
  5204 ! !
  5213 ! !
  5205 
  5214