Tools_OrganizerCanvas.st
author Claus Gittinger <cg@exept.de>
Mon, 20 Oct 2008 16:44:59 +0200
changeset 8359 14d4c965c940
parent 8012 c17bd358835f
child 8411 c992abf0f065
permissions -rw-r--r--
halt
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     1
"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     2
 COPYRIGHT (c) 2000 by eXept Software AG
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     3
	      All Rights Reserved
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     4
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     5
 This software is furnished under a license and may be used
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     6
 only in accordance with the terms of that license and with the
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     7
 inclusion of the above copyright notice.   This software may not
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     8
 be provided or otherwise made available to, or used by, any
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     9
 other person.  No title to or ownership of the software is
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    10
 hereby transferred.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    11
"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    12
"{ Package: 'stx:libtool' }"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    13
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    14
"{ NameSpace: Tools }"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    15
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    16
NavigatorModel subclass:#OrganizerCanvas
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    17
	instanceVariableNames:'projectListSlaveMode namespaceListSlaveMode categoryListSlaveMode
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    18
		classInheritanceListSlaveMode classListSlaveMode
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    19
		classHierarchyListSlaveMode organizerMode metaToggle
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    20
		notMetaToggle meta classList classCategoryDoubleClickChannel
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    21
		classDoubleClickChannel classGeneratorHolder
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    22
		classGeneratorHolderFromClassCategory
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    23
		classGeneratorHolderFromClassHierarchy
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    24
		classGeneratorHolderFromProject classGeneratorHolderFromNamespace
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    25
		classCategoryListMenuHolder categoryListShown
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    26
		classCategoryListUpdateTrigger classListUpdateTrigger
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    27
		classListMenuHolder classHierarchyListMenuHolder
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    28
		projectListMenuHolder variablesMenuHolder filterClassVars
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    29
		variableFilter packageFilter nameSpaceFilter hidePrivateClasses
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    30
		hideUnloadedClasses showClassPackages immediateUpdate
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    31
		metaToggleLabelHolder selectedCategories selectedClasses
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    32
		selectedNamespaces selectedProjects selectionChangeCondition
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
    33
		nameSpaceFilterSelection markApplicationsHolder
7886
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
    34
		sortVariablesByName showAllClassesInNameSpaceView
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
    35
		showMethodInheritance showMethodComplexity showMethodTypeIcon
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
    36
		methodVisibilityHolder'
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    37
	classVariableNames:''
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    38
	poolDictionaries:''
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    39
	category:'Interface-Browsers-New'
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    40
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    41
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    42
!OrganizerCanvas class methodsFor:'documentation'!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    43
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    44
copyright
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    45
"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    46
 COPYRIGHT (c) 2000 by eXept Software AG
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    47
	      All Rights Reserved
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    48
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    49
 This software is furnished under a license and may be used
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    50
 only in accordance with the terms of that license and with the
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    51
 inclusion of the above copyright notice.   This software may not
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    52
 be provided or otherwise made available to, or used by, any
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    53
 other person.  No title to or ownership of the software is
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    54
 hereby transferred.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    55
"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    56
! !
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    57
6734
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
    58
!OrganizerCanvas class methodsFor:'constants'!
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
    59
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
    60
organizerModeCategory
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
    61
    ^ #category
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
    62
!
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
    63
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
    64
organizerModeClassHierarchy
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
    65
    ^ #classHierarchy
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
    66
!
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
    67
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
    68
organizerModeClassInheritance
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
    69
    ^ #classInheritance
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
    70
!
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
    71
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
    72
organizerModeHierarchy
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
    73
    ^ #hierarchy
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
    74
!
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
    75
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
    76
organizerModeNamespace
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
    77
    ^ #namespace
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
    78
!
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
    79
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
    80
organizerModeProject
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
    81
    ^ #project
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
    82
! !
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
    83
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    84
!OrganizerCanvas class methodsFor:'interface specs'!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    85
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    86
embeddedNameSpaceListSpec
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    87
    "This resource specification was automatically generated
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    88
     by the UIPainter of ST/X."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    89
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    90
    "Do not manually edit this!! If it is corrupted,
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    91
     the UIPainter may not be able to read the specification."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    92
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    93
    "
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    94
     UIPainter new openOnClass:OrganizerCanvas andSelector:#embeddedNameSpaceListSpec
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    95
     OrganizerCanvas new openInterface:#embeddedNameSpaceListSpec
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    96
    "
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    97
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    98
    <resource: #canvas>
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    99
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   100
    ^ 
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   101
     #(#FullSpec
5592
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   102
	#name: #embeddedNameSpaceListSpec
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   103
	#window: 
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   104
       #(#WindowSpec
5592
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   105
	  #label: 'Organizer'
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   106
	  #name: 'Organizer'
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   107
	  #min: #(#Point 0 0)
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   108
	  #max: #(#Point 1024 721)
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   109
	  #bounds: #(#Rectangle 218 175 518 475)
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   110
	)
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   111
	#component: 
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   112
       #(#SpecCollection
5592
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   113
	  #collection: #(
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   114
	   #(#SubCanvasSpec
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   115
	      #name: 'NamespaceList2'
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   116
	      #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   117
	      #level: 1
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   118
	      #majorKey: #'NamespaceList'
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   119
	      #subAspectHolders: 
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   120
	     #(#Array
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   121
                
5592
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   122
	       #(#SubChannelInfoSpec
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   123
		  #subAspect: #doubleClickChannel
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   124
		  #aspect: #nameSpaceFilterDoubleClickChannel
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   125
		) 
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   126
	       #(#SubChannelInfoSpec
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   127
		  #subAspect: #forceGeneratorTrigger
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   128
		  #aspect: #forceNamespaceGeneratorTrigger
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   129
		)
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   130
                
5592
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   131
	       #(#SubChannelInfoSpec
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   132
		  #subAspect: #hideUnloadedClasses
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   133
		  #aspect: #hideUnloadedClasses
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   134
		) 
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   135
	       #(#SubChannelInfoSpec
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   136
		  #subAspect: #immediateUpdate
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   137
		  #aspect: #immediateUpdate
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   138
		)
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   139
                
5592
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   140
	       #(#SubChannelInfoSpec
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   141
		  #subAspect: #menuHolder
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   142
		  #aspect: #nameSpaceListMenuHolder
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   143
		) 
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   144
	       #(#SubChannelInfoSpec
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   145
		  #subAspect: #organizerMode
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   146
		  #aspect: #organizerMode
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   147
		)
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   148
                
5592
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   149
	       #(#SubChannelInfoSpec
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   150
		  #subAspect: #outGeneratorHolder
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   151
		  #aspect: #classGeneratorHolder
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   152
		) 
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   153
	       #(#SubChannelInfoSpec
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   154
		  #subAspect: #selectedNamespaces
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   155
		  #aspect: #nameSpaceFilterSelection
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   156
		)
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   157
                
5592
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   158
	       #(#SubChannelInfoSpec
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   159
		  #subAspect: #selectionChangeCondition
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   160
		  #aspect: #selectionChangeCondition
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   161
		) 
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   162
	       #(#SubChannelInfoSpec
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   163
		  #subAspect: #slaveMode
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   164
		  #aspect: #popUpNameSpaceListSlaveMode
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   165
		)
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   166
                
5592
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   167
	       #(#SubChannelInfoSpec
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   168
		  #subAspect: #updateTrigger
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   169
		  #aspect: #nameSpaceListUpdateTrigger
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   170
		)
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   171
	      )
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   172
	      #createNewApplication: true
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   173
	      #createNewBuilder: true
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   174
	      #postBuildCallback: #nameSpaceListWidgetWasBuilt:
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   175
	    )
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   176
	   )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   177
         
5592
d9730a8d7c52 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 5591
diff changeset
   178
	)
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   179
      )
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   180
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   181
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   182
windowSpec
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   183
    ^ self windowSpecNonHierarchical
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   184
    "/ ^ self windowSpecHierarchical
6908
28d1f5f21f55 use the linear project list (for now)
Claus Gittinger <cg@exept.de>
parents: 6905
diff changeset
   185
7077
2fdff8e7fd9d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6922
diff changeset
   186
    "
2fdff8e7fd9d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6922
diff changeset
   187
     self openInterface:#windowSpec
2fdff8e7fd9d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6922
diff changeset
   188
     self openInterface:#windowSpecWithoutMetaToggles
2fdff8e7fd9d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6922
diff changeset
   189
    "
2fdff8e7fd9d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6922
diff changeset
   190
2fdff8e7fd9d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6922
diff changeset
   191
    "Modified: / 03-09-2006 / 10:47:15 / cg"
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   192
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   193
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   194
windowSpecHierarchical
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   195
    "This resource specification was automatically generated
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   196
     by the UIPainter of ST/X."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   197
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   198
    "Do not manually edit this!! If it is corrupted,
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   199
     the UIPainter may not be able to read the specification."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   200
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   201
    "
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   202
     UIPainter new openOnClass:OrganizerCanvas andSelector:#windowSpec
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   203
     OrganizerCanvas new openInterface:#windowSpec
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   204
     OrganizerCanvas open
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   205
    "
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   206
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   207
    <resource: #canvas>
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   208
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   209
    ^ 
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   210
     #(#FullSpec
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   211
        #name: #windowSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   212
        #window: 
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   213
       #(#WindowSpec
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   214
          #label: 'Organizer'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   215
          #name: 'Organizer'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   216
          #min: #(#Point 0 0)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   217
          #max: #(#Point 1024 721)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   218
          #bounds: #(#Rectangle 16 46 316 346)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   219
        )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   220
        #component: 
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   221
       #(#SpecCollection
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   222
          #collection: #(
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   223
           #(#VariableHorizontalPanelSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   224
              #name: 'CategoryNameSpaceAndProjectPanel'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   225
              #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   226
              #visibilityChannel: #classHierarchyOrInheritanceNotShown
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   227
              #barWidth: 2
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   228
              #showHandle: false
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   229
              #component: 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   230
             #(#SpecCollection
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   231
                #collection: #(
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   232
                 #(#ViewSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   233
                    #name: 'LeftBox'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   234
                    #component: 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   235
                   #(#SpecCollection
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   236
                      #collection: #(
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   237
                       #(#ViewSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   238
                          #name: 'ClassCategoryAndNamespaceFilterBox'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   239
                          #layout: #(#LayoutFrame 0 0 0 0 0 1 0 1)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   240
                          #visibilityChannel: #categoryListShown
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   241
                          #component: 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   242
                         #(#SpecCollection
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   243
                            #collection: #(
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   244
                             #(#SubCanvasSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   245
                                #name: 'ClassCategoryList'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   246
                                #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 -25 1.0)
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   247
"/                                #majorKey: #'ClassCategoryList'
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   248
                                #majorKey: #'HierarchicalClassCategoryList'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   249
                                #subAspectHolders: 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   250
                               #(#Array
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   251
                                  
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   252
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   253
                                    #subAspect: #doubleClickChannel
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   254
                                    #aspect: #classCategoryDoubleClickChannel
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   255
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   256
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   257
                                    #subAspect: #forceGeneratorTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   258
                                    #aspect: #forceClassCategoryGeneratorTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   259
                                  )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   260
                                  
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   261
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   262
                                    #subAspect: #hideUnloadedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   263
                                    #aspect: #hideUnloadedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   264
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   265
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   266
                                    #subAspect: #immediateUpdate
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   267
                                    #aspect: #immediateUpdate
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   268
                                  )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   269
                                  
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   270
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   271
                                    #subAspect: #menuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   272
                                    #aspect: #classCategoryListMenuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   273
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   274
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   275
                                    #subAspect: #organizerMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   276
                                    #aspect: #organizerMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   277
                                  )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   278
                                  
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   279
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   280
                                    #subAspect: #outGeneratorHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   281
                                    #aspect: #classGeneratorHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   282
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   283
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   284
                                    #subAspect: #selectedCategories
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   285
                                    #aspect: #selectedCategories
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   286
                                  )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   287
                                  
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   288
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   289
                                    #subAspect: #selectionChangeCondition
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   290
                                    #aspect: #selectionChangeCondition
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   291
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   292
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   293
                                    #subAspect: #slaveMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   294
                                    #aspect: #categoryListSlaveMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   295
                                  )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   296
                                  
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   297
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   298
                                    #subAspect: #updateTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   299
                                    #aspect: #classCategoryListUpdateTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   300
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   301
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   302
                                    #subAspect: #nameSpaceFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   303
                                    #aspect: #nameSpaceFilterSelection
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   304
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   305
                                )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   306
                                #createNewApplication: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   307
                                #createNewBuilder: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   308
                              )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   309
                             #(#ExtendedComboBoxSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   310
                                #name: 'NameSpaceFilterComboBox'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   311
                                #layout: #(#LayoutFrame 0 0 -25 1 0 1 0 1)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   312
                                #tabable: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   313
                                #model: #nameSpaceFilterSelectedNameSpace
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   314
                                #menuWidgetHolder: #nameSpaceListWidgetHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   315
                                #miniScrollerHorizontal: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   316
                                #menuSelector: #nameSpaceFilterPopUpMenu
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   317
                              )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   318
                             )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   319
                           
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   320
                          )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   321
                        )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   322
                       #(#SubCanvasSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   323
                          #name: 'NamespaceList'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   324
                          #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   325
                          #initiallyInvisible: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   326
                          #visibilityChannel: #nameSpaceListShown
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   327
                          #majorKey: #'NamespaceList'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   328
                          #subAspectHolders: 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   329
                         #(#Array
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   330
                            
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   331
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   332
                              #subAspect: #doubleClickChannel
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   333
                              #aspect: #nameSpaceDoubleClickChannel
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   334
                            ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   335
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   336
                              #subAspect: #forceGeneratorTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   337
                              #aspect: #forceNamespaceGeneratorTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   338
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   339
                            
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   340
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   341
                              #subAspect: #hideUnloadedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   342
                              #aspect: #hideUnloadedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   343
                            ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   344
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   345
                              #subAspect: #immediateUpdate
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   346
                              #aspect: #immediateUpdate
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   347
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   348
                            
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   349
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   350
                              #subAspect: #menuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   351
                              #aspect: #nameSpaceListMenuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   352
                            ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   353
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   354
                              #subAspect: #organizerMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   355
                              #aspect: #organizerMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   356
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   357
                            
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   358
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   359
                              #subAspect: #outGeneratorHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   360
                              #aspect: #classGeneratorHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   361
                            ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   362
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   363
                              #subAspect: #selectedNamespaces
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   364
                              #aspect: #selectedNamespaces
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   365
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   366
                            
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   367
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   368
                              #subAspect: #selectionChangeCondition
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   369
                              #aspect: #selectionChangeCondition
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   370
                            ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   371
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   372
                              #subAspect: #slaveMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   373
                              #aspect: #nameSpaceListSlaveMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   374
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   375
                            
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   376
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   377
                              #subAspect: #updateTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   378
                              #aspect: #nameSpaceListUpdateTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   379
                            )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   380
                          )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   381
                          #createNewApplication: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   382
                          #createNewBuilder: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   383
                        )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   384
                       #(#SubCanvasSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   385
                          #name: 'ProjectList'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   386
                          #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   387
                          #initiallyInvisible: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   388
                          #visibilityChannel: #projectListShown
6908
28d1f5f21f55 use the linear project list (for now)
Claus Gittinger <cg@exept.de>
parents: 6905
diff changeset
   389
"/                          #majorKey: #'HierarchicalProjectList'
28d1f5f21f55 use the linear project list (for now)
Claus Gittinger <cg@exept.de>
parents: 6905
diff changeset
   390
                          #majorKey: #'ProjectList'
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   391
                          #subAspectHolders: 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   392
                         #(#Array
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   393
                            
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   394
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   395
                              #subAspect: #doubleClickChannel
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   396
                              #aspect: #projectDoubleClickChannel
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   397
                            ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   398
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   399
                              #subAspect: #forceGeneratorTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   400
                              #aspect: #forceProjectGeneratorTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   401
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   402
                            
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   403
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   404
                              #subAspect: #hideUnloadedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   405
                              #aspect: #hideUnloadedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   406
                            ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   407
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   408
                              #subAspect: #immediateUpdate
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   409
                              #aspect: #immediateUpdate
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   410
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   411
                            
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   412
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   413
                              #subAspect: #menuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   414
                              #aspect: #projectListMenuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   415
                            ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   416
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   417
                              #subAspect: #organizerMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   418
                              #aspect: #organizerMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   419
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   420
                            
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   421
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   422
                              #subAspect: #outGeneratorHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   423
                              #aspect: #classGeneratorHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   424
                            ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   425
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   426
                              #subAspect: #selectedProjects
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   427
                              #aspect: #selectedProjects
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   428
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   429
                            
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   430
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   431
                              #subAspect: #selectionChangeCondition
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   432
                              #aspect: #selectionChangeCondition
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   433
                            ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   434
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   435
                              #subAspect: #slaveMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   436
                              #aspect: #projectListSlaveMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   437
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   438
                            
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   439
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   440
                              #subAspect: #updateTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   441
                              #aspect: #projectListUpdateTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   442
                            )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   443
                          )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   444
                          #createNewApplication: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   445
                          #createNewBuilder: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   446
                        )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   447
                       )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   448
                     
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   449
                    )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   450
                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   451
                 #(#ViewSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   452
                    #name: 'RightBox'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   453
                    #component: 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   454
                   #(#SpecCollection
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   455
                      #collection: #(
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   456
                       #(#VariableVerticalPanelSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   457
                          #name: 'ClassAndVariablesPanel'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   458
                          #layout: #(#LayoutFrame 0 0 0 0 0 1 -25 1)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   459
                          #showHandle: false
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   460
                          #snapMode: #both
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   461
                          #handlePosition: #left
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   462
                          #component: 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   463
                         #(#SpecCollection
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   464
                            #collection: #(
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   465
                             #(#SubCanvasSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   466
                                #name: 'ClassList'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   467
                                #majorKey: #'ClassList'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   468
                                #minorKey: #windowSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   469
                                #subAspectHolders: 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   470
                               #(#Array
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   471
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   472
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   473
                                    #subAspect: #doubleClickChannel
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   474
                                    #aspect: #classDoubleClickChannel
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   475
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   476
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   477
                                    #subAspect: #markApplicationsHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   478
                                    #aspect: #markApplicationsHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   479
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   480
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   481
                                    #subAspect: #immediateUpdate
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   482
                                    #aspect: #immediateUpdate
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   483
                                  )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   484
                                  
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   485
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   486
                                    #subAspect: #showClassPackages
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   487
                                    #aspect: #showClassPackages
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   488
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   489
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   490
                                    #subAspect: #inGeneratorHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   491
                                    #aspect: #classGeneratorHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   492
                                  )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   493
                                  
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   494
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   495
                                    #subAspect: #menuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   496
                                    #aspect: #classListMenuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   497
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   498
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   499
                                    #subAspect: #meta
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   500
                                    #aspect: #meta
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   501
                                  )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   502
                                  
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   503
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   504
                                    #subAspect: #organizerMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   505
                                    #aspect: #organizerMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   506
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   507
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   508
                                    #subAspect: #outGeneratorHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   509
                                    #aspect: #outGeneratorHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   510
                                  )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   511
                                  
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   512
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   513
                                    #subAspect: #packageFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   514
                                    #aspect: #packageFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   515
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   516
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   517
                                    #subAspect: #nameSpaceFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   518
                                    #aspect: #nameSpaceFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   519
                                  )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   520
                                  
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   521
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   522
                                    #subAspect: #selectedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   523
                                    #aspect: #selectedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   524
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   525
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   526
                                    #subAspect: #selectionChangeCondition
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   527
                                    #aspect: #selectionChangeCondition
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   528
                                  )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   529
                                  
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   530
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   531
                                    #subAspect: #slaveMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   532
                                    #aspect: #classListSlaveMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   533
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   534
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   535
                                    #subAspect: #updateTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   536
                                    #aspect: #classListUpdateTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   537
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   538
                                )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   539
                                #createNewApplication: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   540
                                #createNewBuilder: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   541
                              )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   542
                             #(#SubCanvasSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   543
                                #name: 'VariableList'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   544
                                #majorKey: #'VariableList'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   545
                                #subAspectHolders: 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   546
                               #(#Array
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   547
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   548
                                    #subAspect: #doubleClickChannel
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   549
                                    #aspect: #variableDoubleClickChannel
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   550
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   551
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   552
                                    #subAspect: #classHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   553
                                    #aspect: #selectedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   554
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   555
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   556
                                    #subAspect: #menuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   557
                                    #aspect: #variablesMenuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   558
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   559
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   560
                                    #subAspect: #selectedVariables
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   561
                                    #aspect: #variableFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   562
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   563
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   564
                                    #subAspect: #showClassVarsInVariableList
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   565
                                    #aspect: #filterClassVars
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   566
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   567
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   568
                                    #subAspect: #sortVariablesByName
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   569
                                    #aspect: #sortVariablesByName
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   570
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   571
                                )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   572
                                #createNewApplication: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   573
                                #createNewBuilder: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   574
                              )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   575
                             )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   576
                           
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   577
                          )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   578
                          #handles: #(#Any 0.5 1.0)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   579
                        )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   580
                       #(#UISubSpecification
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   581
                          #name: 'MetaToggleSpec2'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   582
                          #layout: #(#LayoutFrame 0 0 -25 1 0 1 0 1)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   583
                          #minorKey: #metaSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   584
                        )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   585
                       )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   586
                     
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   587
                    )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   588
                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   589
                 )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   590
               
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   591
              )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   592
              #handles: #(#Any 0.5 1.0)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   593
            )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   594
           #(#ViewSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   595
              #name: 'ClassHierarchyOrInheritanceBox'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   596
              #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   597
              #initiallyInvisible: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   598
              #visibilityChannel: #classHierarchyOrInheritanceShown
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   599
              #component: 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   600
             #(#SpecCollection
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   601
                #collection: #(
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   602
                 #(#VariableVerticalPanelSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   603
                    #name: 'VariableVerticalPanel2'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   604
                    #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 -25 1.0)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   605
                    #showHandle: false
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   606
                    #snapMode: #both
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   607
                    #handlePosition: #left
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   608
                    #component: 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   609
                   #(#SpecCollection
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   610
                      #collection: #(
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   611
                       #(#ViewSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   612
                          #name: 'HierarchyOrInheritanceBox'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   613
                          #component: 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   614
                         #(#SpecCollection
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   615
                            #collection: #(
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   616
                             #(#SubCanvasSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   617
                                #name: 'ClassHierarchyList'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   618
                                #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   619
                                #visibilityChannel: #classHierarchyShown
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   620
                                #majorKey: #'HierarchicalClassList'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   621
                                #subAspectHolders: 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   622
                               #(#Array
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   623
                                  
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   624
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   625
                                    #subAspect: #doubleClickChannel
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   626
                                    #aspect: #classDoubleClickChannel
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   627
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   628
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   629
                                    #subAspect: #forceGeneratorTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   630
                                    #aspect: #forceClassInheritanceGeneratorTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   631
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   632
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   633
                                    #subAspect: #hideUnloadedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   634
                                    #aspect: #hideUnloadedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   635
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   636
               #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   637
                  #subAspect: #markApplicationsHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   638
                  #aspect: #markApplicationsHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   639
                ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   640
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   641
                                    #subAspect: #showClassPackages
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   642
                                    #aspect: #showClassPackages
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   643
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   644
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   645
                                    #subAspect: #immediateUpdate
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   646
                                    #aspect: #immediateUpdate
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   647
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   648
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   649
                                    #subAspect: #menuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   650
                                    #aspect: #classInheritanceListMenuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   651
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   652
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   653
                                    #subAspect: #meta
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   654
                                    #aspect: #meta
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   655
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   656
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   657
                                    #subAspect: #organizerMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   658
                                    #aspect: #organizerMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   659
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   660
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   661
                                    #subAspect: #outGeneratorHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   662
                                    #aspect: #outGeneratorHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   663
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   664
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   665
                                    #subAspect: #packageFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   666
                                    #aspect: #packageFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   667
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   668
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   669
                                    #subAspect: #nameSpaceFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   670
                                    #aspect: #nameSpaceFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   671
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   672
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   673
                                    #subAspect: #selectedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   674
                                    #aspect: #selectedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   675
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   676
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   677
                                    #subAspect: #selectionChangeCondition
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   678
                                    #aspect: #selectionChangeCondition
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   679
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   680
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   681
                                    #subAspect: #slaveMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   682
                                    #aspect: #classHierarchyListSlaveMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   683
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   684
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   685
                                    #subAspect: #topClassHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   686
                                    #aspect: #classHierarchyTopClass
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   687
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   688
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   689
                                    #subAspect: #updateTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   690
                                    #aspect: #classHierarchyUpdateTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   691
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   692
                                )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   693
                                #createNewApplication: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   694
                                #createNewBuilder: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   695
                              )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   696
                             #(#SubCanvasSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   697
                                #name: 'ClassInheritanceList'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   698
                                #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   699
                                #visibilityChannel: #classInheritanceShown
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   700
                                #majorKey: #'InheritanceClassList'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   701
                                #subAspectHolders: 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   702
                               #(#Array
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   703
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   704
                                    #subAspect: #doubleClickChannel
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   705
                                    #aspect: #classDoubleClickChannel
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   706
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   707
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   708
                                    #subAspect: #forceGeneratorTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   709
                                    #aspect: #forceClassInheritanceGeneratorTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   710
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   711
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   712
                                    #subAspect: #hideUnloadedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   713
                                    #aspect: #hideUnloadedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   714
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   715
               #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   716
                  #subAspect: #markApplicationsHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   717
                  #aspect: #markApplicationsHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   718
                ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   719
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   720
                                    #subAspect: #showClassPackages
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   721
                                    #aspect: #showClassPackages
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   722
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   723
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   724
                                    #subAspect: #immediateUpdate
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   725
                                    #aspect: #immediateUpdate
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   726
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   727
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   728
                                    #subAspect: #menuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   729
                                    #aspect: #classInheritanceListMenuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   730
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   731
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   732
                                    #subAspect: #meta
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   733
                                    #aspect: #meta
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   734
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   735
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   736
                                    #subAspect: #organizerMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   737
                                    #aspect: #organizerMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   738
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   739
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   740
                                    #subAspect: #outGeneratorHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   741
                                    #aspect: #outGeneratorHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   742
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   743
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   744
                                    #subAspect: #packageFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   745
                                    #aspect: #packageFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   746
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   747
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   748
                                    #subAspect: #nameSpaceFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   749
                                    #aspect: #nameSpaceFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   750
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   751
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   752
                                    #subAspect: #selectedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   753
                                    #aspect: #selectedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   754
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   755
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   756
                                    #subAspect: #selectionChangeCondition
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   757
                                    #aspect: #selectionChangeCondition
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   758
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   759
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   760
                                    #subAspect: #slaveMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   761
                                    #aspect: #classInheritanceListSlaveMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   762
                                  )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   763
                                  
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   764
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   765
                                    #subAspect: #topClassHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   766
                                    #aspect: #classHierarchyTopClass
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   767
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   768
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   769
                                    #subAspect: #updateTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   770
                                    #aspect: #classHierarchyUpdateTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   771
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   772
                                )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   773
                                #createNewApplication: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   774
                                #createNewBuilder: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   775
                              )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   776
                             )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   777
                           
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   778
                          )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   779
                        )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   780
                       #(#SubCanvasSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   781
                          #name: 'VariableList2'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   782
                          #majorKey: #'VariableList'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   783
                          #subAspectHolders: 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   784
                         #(#Array
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   785
                            
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   786
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   787
                              #subAspect: #doubleClickChannel
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   788
                              #aspect: #variableDoubleClickChannel
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   789
                            ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   790
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   791
                              #subAspect: #classHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   792
                              #aspect: #selectedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   793
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   794
                            
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   795
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   796
                              #subAspect: #menuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   797
                              #aspect: #variablesMenuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   798
                            ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   799
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   800
                              #subAspect: #slaveMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   801
                              #aspect: #classHierarchyListSlaveMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   802
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   803
                            
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   804
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   805
                              #subAspect: #selectedVariables
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   806
                              #aspect: #variableFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   807
                            ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   808
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   809
                              #subAspect: #showClassVarsInVariableList
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   810
                              #aspect: #filterClassVars
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   811
                            )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   812
                          )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   813
                          #createNewApplication: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   814
                          #createNewBuilder: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   815
                        )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   816
                       )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   817
                     
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   818
                    )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   819
                    #handles: #(#Any 0.5 1.0)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   820
                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   821
                 #(#SubCanvasSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   822
                    #name: 'MetaToggles1'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   823
                    #layout: #(#LayoutFrame 0 0.0 -25 1 0 1.0 0 1)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   824
                    #hasHorizontalScrollBar: false
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   825
                    #hasVerticalScrollBar: false
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   826
                    #minorKey: #metaSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   827
                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   828
                 )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   829
               
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   830
              )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   831
            )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   832
           )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   833
         
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   834
        )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   835
      )
6908
28d1f5f21f55 use the linear project list (for now)
Claus Gittinger <cg@exept.de>
parents: 6905
diff changeset
   836
28d1f5f21f55 use the linear project list (for now)
Claus Gittinger <cg@exept.de>
parents: 6905
diff changeset
   837
    "Modified: / 17-08-2006 / 14:54:25 / cg"
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   838
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   839
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   840
windowSpecNonHierarchical
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   841
    "This resource specification was automatically generated
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   842
     by the UIPainter of ST/X."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   843
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   844
    "Do not manually edit this!! If it is corrupted,
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   845
     the UIPainter may not be able to read the specification."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   846
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   847
    "
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   848
     UIPainter new openOnClass:OrganizerCanvas andSelector:#windowSpec
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   849
     OrganizerCanvas new openInterface:#windowSpec
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   850
     OrganizerCanvas open
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   851
    "
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   852
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   853
    <resource: #canvas>
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   854
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   855
    ^ 
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   856
     #(#FullSpec
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   857
        #name: #windowSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   858
        #window: 
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   859
       #(#WindowSpec
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   860
          #label: 'Organizer'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   861
          #name: 'Organizer'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   862
          #min: #(#Point 0 0)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   863
          #max: #(#Point 1024 721)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   864
          #bounds: #(#Rectangle 16 46 316 346)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   865
        )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   866
        #component: 
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   867
       #(#SpecCollection
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   868
          #collection: #(
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   869
           #(#VariableHorizontalPanelSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   870
              #name: 'CategoryNameSpaceAndProjectPanel'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   871
              #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   872
              #visibilityChannel: #classHierarchyOrInheritanceNotShown
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   873
              #barWidth: 2
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   874
              #showHandle: false
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   875
              #component: 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   876
             #(#SpecCollection
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   877
                #collection: #(
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   878
                 #(#ViewSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   879
                    #name: 'LeftBox'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   880
                    #component: 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   881
                   #(#SpecCollection
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   882
                      #collection: #(
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   883
                       #(#ViewSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   884
                          #name: 'ClassCategoryAndNamespaceFilterBox'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   885
                          #layout: #(#LayoutFrame 0 0 0 0 0 1 0 1)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   886
                          #visibilityChannel: #categoryListShown
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   887
                          #component: 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   888
                         #(#SpecCollection
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   889
                            #collection: #(
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   890
                             #(#SubCanvasSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   891
                                #name: 'ClassCategoryList'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   892
                                #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 -25 1.0)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   893
                                #majorKey: #'ClassCategoryList'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   894
                                #subAspectHolders: 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   895
                               #(#Array
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   896
                                  
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   897
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   898
                                    #subAspect: #doubleClickChannel
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   899
                                    #aspect: #classCategoryDoubleClickChannel
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   900
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   901
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   902
                                    #subAspect: #forceGeneratorTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   903
                                    #aspect: #forceClassCategoryGeneratorTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   904
                                  )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   905
                                  
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   906
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   907
                                    #subAspect: #hideUnloadedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   908
                                    #aspect: #hideUnloadedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   909
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   910
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   911
                                    #subAspect: #immediateUpdate
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   912
                                    #aspect: #immediateUpdate
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   913
                                  )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   914
                                  
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   915
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   916
                                    #subAspect: #menuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   917
                                    #aspect: #classCategoryListMenuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   918
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   919
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   920
                                    #subAspect: #organizerMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   921
                                    #aspect: #organizerMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   922
                                  )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   923
                                  
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   924
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   925
                                    #subAspect: #outGeneratorHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   926
                                    #aspect: #classGeneratorHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   927
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   928
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   929
                                    #subAspect: #selectedCategories
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   930
                                    #aspect: #selectedCategories
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   931
                                  )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   932
                                  
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   933
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   934
                                    #subAspect: #selectionChangeCondition
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   935
                                    #aspect: #selectionChangeCondition
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   936
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   937
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   938
                                    #subAspect: #slaveMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   939
                                    #aspect: #categoryListSlaveMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   940
                                  )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   941
                                  
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   942
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   943
                                    #subAspect: #updateTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   944
                                    #aspect: #classCategoryListUpdateTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   945
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   946
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   947
                                    #subAspect: #nameSpaceFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   948
                                    #aspect: #nameSpaceFilterSelection
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   949
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   950
                                )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   951
                                #createNewApplication: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   952
                                #createNewBuilder: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   953
                              )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   954
                             #(#ExtendedComboBoxSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   955
                                #name: 'NameSpaceFilterComboBox'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   956
                                #layout: #(#LayoutFrame 0 0 -25 1 0 1 0 1)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   957
                                #tabable: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   958
                                #model: #nameSpaceFilterSelectedNameSpace
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   959
                                #menuWidgetHolder: #nameSpaceListWidgetHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   960
                                #miniScrollerHorizontal: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   961
                                #menuSelector: #nameSpaceFilterPopUpMenu
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   962
                              )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   963
                             )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   964
                           
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   965
                          )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   966
                        )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   967
                       #(#SubCanvasSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   968
                          #name: 'NamespaceList'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   969
                          #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   970
                          #initiallyInvisible: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   971
                          #visibilityChannel: #nameSpaceListShown
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   972
                          #majorKey: #'NamespaceList'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   973
                          #subAspectHolders: 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   974
                         #(#Array
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   975
                            
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   976
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   977
                              #subAspect: #doubleClickChannel
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   978
                              #aspect: #nameSpaceDoubleClickChannel
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   979
                            ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   980
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   981
                              #subAspect: #forceGeneratorTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   982
                              #aspect: #forceNamespaceGeneratorTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   983
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   984
                            
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   985
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   986
                              #subAspect: #hideUnloadedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   987
                              #aspect: #hideUnloadedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   988
                            ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   989
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   990
                              #subAspect: #immediateUpdate
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   991
                              #aspect: #immediateUpdate
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   992
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   993
                            
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   994
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   995
                              #subAspect: #menuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   996
                              #aspect: #nameSpaceListMenuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   997
                            ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   998
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
   999
                              #subAspect: #organizerMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1000
                              #aspect: #organizerMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1001
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1002
                            
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1003
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1004
                              #subAspect: #outGeneratorHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1005
                              #aspect: #classGeneratorHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1006
                            ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1007
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1008
                              #subAspect: #selectedNamespaces
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1009
                              #aspect: #selectedNamespaces
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1010
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1011
                            
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1012
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1013
                              #subAspect: #selectionChangeCondition
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1014
                              #aspect: #selectionChangeCondition
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1015
                            ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1016
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1017
                              #subAspect: #slaveMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1018
                              #aspect: #nameSpaceListSlaveMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1019
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1020
                            
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1021
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1022
                              #subAspect: #updateTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1023
                              #aspect: #nameSpaceListUpdateTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1024
                            )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1025
                          )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1026
                          #createNewApplication: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1027
                          #createNewBuilder: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1028
                        )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1029
                       #(#SubCanvasSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1030
                          #name: 'ProjectList'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1031
                          #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1032
                          #initiallyInvisible: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1033
                          #visibilityChannel: #projectListShown
6908
28d1f5f21f55 use the linear project list (for now)
Claus Gittinger <cg@exept.de>
parents: 6905
diff changeset
  1034
"/                          #majorKey: #'HierarchicalProjectList'
28d1f5f21f55 use the linear project list (for now)
Claus Gittinger <cg@exept.de>
parents: 6905
diff changeset
  1035
                          #majorKey: #'ProjectList'
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1036
                          #subAspectHolders: 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1037
                         #(#Array
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1038
                            
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1039
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1040
                              #subAspect: #doubleClickChannel
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1041
                              #aspect: #projectDoubleClickChannel
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1042
                            ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1043
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1044
                              #subAspect: #forceGeneratorTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1045
                              #aspect: #forceProjectGeneratorTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1046
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1047
                            
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1048
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1049
                              #subAspect: #hideUnloadedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1050
                              #aspect: #hideUnloadedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1051
                            ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1052
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1053
                              #subAspect: #immediateUpdate
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1054
                              #aspect: #immediateUpdate
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1055
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1056
                            
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1057
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1058
                              #subAspect: #menuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1059
                              #aspect: #projectListMenuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1060
                            ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1061
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1062
                              #subAspect: #organizerMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1063
                              #aspect: #organizerMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1064
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1065
                            
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1066
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1067
                              #subAspect: #outGeneratorHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1068
                              #aspect: #classGeneratorHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1069
                            ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1070
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1071
                              #subAspect: #selectedProjects
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1072
                              #aspect: #selectedProjects
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1073
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1074
                            
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1075
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1076
                              #subAspect: #selectionChangeCondition
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1077
                              #aspect: #selectionChangeCondition
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1078
                            ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1079
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1080
                              #subAspect: #slaveMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1081
                              #aspect: #projectListSlaveMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1082
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1083
                            
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1084
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1085
                              #subAspect: #updateTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1086
                              #aspect: #projectListUpdateTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1087
                            )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1088
                          )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1089
                          #createNewApplication: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1090
                          #createNewBuilder: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1091
                        )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1092
                       )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1093
                     
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1094
                    )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1095
                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1096
                 #(#ViewSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1097
                    #name: 'RightBox'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1098
                    #component: 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1099
                   #(#SpecCollection
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1100
                      #collection: #(
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1101
                       #(#VariableVerticalPanelSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1102
                          #name: 'ClassAndVariablesPanel'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1103
                          #layout: #(#LayoutFrame 0 0 0 0 0 1 -25 1)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1104
                          #showHandle: false
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1105
                          #snapMode: #both
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1106
                          #handlePosition: #left
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1107
                          #component: 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1108
                         #(#SpecCollection
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1109
                            #collection: #(
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1110
                             #(#SubCanvasSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1111
                                #name: 'ClassList'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1112
                                #majorKey: #'ClassList'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1113
                                #minorKey: #windowSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1114
                                #subAspectHolders: 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1115
                               #(#Array
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1116
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1117
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1118
                                    #subAspect: #doubleClickChannel
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1119
                                    #aspect: #classDoubleClickChannel
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1120
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1121
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1122
                                    #subAspect: #markApplicationsHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1123
                                    #aspect: #markApplicationsHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1124
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1125
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1126
                                    #subAspect: #immediateUpdate
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1127
                                    #aspect: #immediateUpdate
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1128
                                  )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1129
                                  
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1130
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1131
                                    #subAspect: #showClassPackages
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1132
                                    #aspect: #showClassPackages
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1133
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1134
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1135
                                    #subAspect: #inGeneratorHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1136
                                    #aspect: #classGeneratorHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1137
                                  )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1138
                                  
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1139
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1140
                                    #subAspect: #menuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1141
                                    #aspect: #classListMenuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1142
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1143
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1144
                                    #subAspect: #meta
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1145
                                    #aspect: #meta
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1146
                                  )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1147
                                  
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1148
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1149
                                    #subAspect: #organizerMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1150
                                    #aspect: #organizerMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1151
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1152
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1153
                                    #subAspect: #outGeneratorHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1154
                                    #aspect: #outGeneratorHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1155
                                  )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1156
                                  
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1157
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1158
                                    #subAspect: #packageFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1159
                                    #aspect: #packageFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1160
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1161
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1162
                                    #subAspect: #nameSpaceFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1163
                                    #aspect: #nameSpaceFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1164
                                  )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1165
                                  
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1166
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1167
                                    #subAspect: #selectedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1168
                                    #aspect: #selectedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1169
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1170
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1171
                                    #subAspect: #selectionChangeCondition
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1172
                                    #aspect: #selectionChangeCondition
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1173
                                  )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1174
                                  
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1175
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1176
                                    #subAspect: #slaveMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1177
                                    #aspect: #classListSlaveMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1178
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1179
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1180
                                    #subAspect: #updateTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1181
                                    #aspect: #classListUpdateTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1182
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1183
                                )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1184
                                #createNewApplication: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1185
                                #createNewBuilder: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1186
                              )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1187
                             #(#SubCanvasSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1188
                                #name: 'VariableList'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1189
                                #majorKey: #'VariableList'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1190
                                #subAspectHolders: 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1191
                               #(#Array
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1192
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1193
                                    #subAspect: #doubleClickChannel
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1194
                                    #aspect: #variableDoubleClickChannel
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1195
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1196
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1197
                                    #subAspect: #classHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1198
                                    #aspect: #selectedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1199
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1200
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1201
                                    #subAspect: #menuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1202
                                    #aspect: #variablesMenuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1203
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1204
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1205
                                    #subAspect: #selectedVariables
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1206
                                    #aspect: #variableFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1207
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1208
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1209
                                    #subAspect: #showClassVarsInVariableList
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1210
                                    #aspect: #filterClassVars
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1211
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1212
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1213
                                    #subAspect: #sortVariablesByName
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1214
                                    #aspect: #sortVariablesByName
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1215
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1216
                                )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1217
                                #createNewApplication: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1218
                                #createNewBuilder: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1219
                              )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1220
                             )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1221
                           
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1222
                          )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1223
                          #handles: #(#Any 0.5 1.0)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1224
                        )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1225
                       #(#UISubSpecification
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1226
                          #name: 'MetaToggleSpec2'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1227
                          #layout: #(#LayoutFrame 0 0 -25 1 0 1 0 1)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1228
                          #minorKey: #metaSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1229
                        )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1230
                       )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1231
                     
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1232
                    )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1233
                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1234
                 )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1235
               
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1236
              )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1237
              #handles: #(#Any 0.5 1.0)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1238
            )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1239
           #(#ViewSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1240
              #name: 'ClassHierarchyOrInheritanceBox'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1241
              #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1242
              #initiallyInvisible: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1243
              #visibilityChannel: #classHierarchyOrInheritanceShown
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1244
              #component: 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1245
             #(#SpecCollection
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1246
                #collection: #(
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1247
                 #(#VariableVerticalPanelSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1248
                    #name: 'VariableVerticalPanel2'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1249
                    #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 -25 1.0)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1250
                    #showHandle: false
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1251
                    #snapMode: #both
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1252
                    #handlePosition: #left
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1253
                    #component: 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1254
                   #(#SpecCollection
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1255
                      #collection: #(
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1256
                       #(#ViewSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1257
                          #name: 'HierarchyOrInheritanceBox'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1258
                          #component: 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1259
                         #(#SpecCollection
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1260
                            #collection: #(
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1261
                             #(#SubCanvasSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1262
                                #name: 'ClassHierarchyList'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1263
                                #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1264
                                #visibilityChannel: #classHierarchyShown
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1265
                                #majorKey: #'HierarchicalClassList'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1266
                                #subAspectHolders: 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1267
                               #(#Array
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1268
                                  
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1269
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1270
                                    #subAspect: #doubleClickChannel
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1271
                                    #aspect: #classDoubleClickChannel
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1272
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1273
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1274
                                    #subAspect: #forceGeneratorTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1275
                                    #aspect: #forceClassInheritanceGeneratorTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1276
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1277
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1278
                                    #subAspect: #hideUnloadedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1279
                                    #aspect: #hideUnloadedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1280
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1281
               #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1282
                  #subAspect: #markApplicationsHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1283
                  #aspect: #markApplicationsHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1284
                ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1285
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1286
                                    #subAspect: #showClassPackages
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1287
                                    #aspect: #showClassPackages
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1288
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1289
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1290
                                    #subAspect: #immediateUpdate
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1291
                                    #aspect: #immediateUpdate
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1292
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1293
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1294
                                    #subAspect: #menuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1295
                                    #aspect: #classInheritanceListMenuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1296
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1297
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1298
                                    #subAspect: #meta
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1299
                                    #aspect: #meta
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1300
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1301
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1302
                                    #subAspect: #organizerMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1303
                                    #aspect: #organizerMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1304
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1305
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1306
                                    #subAspect: #outGeneratorHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1307
                                    #aspect: #outGeneratorHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1308
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1309
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1310
                                    #subAspect: #packageFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1311
                                    #aspect: #packageFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1312
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1313
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1314
                                    #subAspect: #nameSpaceFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1315
                                    #aspect: #nameSpaceFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1316
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1317
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1318
                                    #subAspect: #selectedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1319
                                    #aspect: #selectedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1320
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1321
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1322
                                    #subAspect: #selectionChangeCondition
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1323
                                    #aspect: #selectionChangeCondition
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1324
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1325
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1326
                                    #subAspect: #slaveMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1327
                                    #aspect: #classHierarchyListSlaveMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1328
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1329
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1330
                                    #subAspect: #topClassHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1331
                                    #aspect: #classHierarchyTopClass
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1332
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1333
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1334
                                    #subAspect: #updateTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1335
                                    #aspect: #classHierarchyUpdateTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1336
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1337
                                )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1338
                                #createNewApplication: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1339
                                #createNewBuilder: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1340
                              )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1341
                             #(#SubCanvasSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1342
                                #name: 'ClassInheritanceList'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1343
                                #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1344
                                #visibilityChannel: #classInheritanceShown
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1345
                                #majorKey: #'InheritanceClassList'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1346
                                #subAspectHolders: 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1347
                               #(#Array
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1348
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1349
                                    #subAspect: #doubleClickChannel
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1350
                                    #aspect: #classDoubleClickChannel
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1351
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1352
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1353
                                    #subAspect: #forceGeneratorTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1354
                                    #aspect: #forceClassInheritanceGeneratorTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1355
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1356
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1357
                                    #subAspect: #hideUnloadedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1358
                                    #aspect: #hideUnloadedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1359
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1360
               #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1361
                  #subAspect: #markApplicationsHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1362
                  #aspect: #markApplicationsHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1363
                ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1364
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1365
                                    #subAspect: #showClassPackages
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1366
                                    #aspect: #showClassPackages
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1367
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1368
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1369
                                    #subAspect: #immediateUpdate
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1370
                                    #aspect: #immediateUpdate
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1371
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1372
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1373
                                    #subAspect: #menuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1374
                                    #aspect: #classInheritanceListMenuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1375
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1376
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1377
                                    #subAspect: #meta
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1378
                                    #aspect: #meta
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1379
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1380
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1381
                                    #subAspect: #organizerMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1382
                                    #aspect: #organizerMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1383
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1384
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1385
                                    #subAspect: #outGeneratorHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1386
                                    #aspect: #outGeneratorHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1387
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1388
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1389
                                    #subAspect: #packageFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1390
                                    #aspect: #packageFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1391
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1392
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1393
                                    #subAspect: #nameSpaceFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1394
                                    #aspect: #nameSpaceFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1395
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1396
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1397
                                    #subAspect: #selectedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1398
                                    #aspect: #selectedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1399
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1400
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1401
                                    #subAspect: #selectionChangeCondition
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1402
                                    #aspect: #selectionChangeCondition
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1403
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1404
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1405
                                    #subAspect: #slaveMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1406
                                    #aspect: #classInheritanceListSlaveMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1407
                                  )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1408
                                  
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1409
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1410
                                    #subAspect: #topClassHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1411
                                    #aspect: #classHierarchyTopClass
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1412
                                  ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1413
                                 #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1414
                                    #subAspect: #updateTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1415
                                    #aspect: #classHierarchyUpdateTrigger
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1416
                                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1417
                                )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1418
                                #createNewApplication: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1419
                                #createNewBuilder: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1420
                              )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1421
                             )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1422
                           
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1423
                          )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1424
                        )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1425
                       #(#SubCanvasSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1426
                          #name: 'VariableList2'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1427
                          #majorKey: #'VariableList'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1428
                          #subAspectHolders: 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1429
                         #(#Array
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1430
                            
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1431
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1432
                              #subAspect: #doubleClickChannel
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1433
                              #aspect: #variableDoubleClickChannel
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1434
                            ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1435
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1436
                              #subAspect: #classHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1437
                              #aspect: #selectedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1438
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1439
                            
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1440
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1441
                              #subAspect: #menuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1442
                              #aspect: #variablesMenuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1443
                            ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1444
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1445
                              #subAspect: #slaveMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1446
                              #aspect: #classHierarchyListSlaveMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1447
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1448
                            
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1449
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1450
                              #subAspect: #selectedVariables
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1451
                              #aspect: #variableFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1452
                            ) 
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1453
                           #(#SubChannelInfoSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1454
                              #subAspect: #showClassVarsInVariableList
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1455
                              #aspect: #filterClassVars
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1456
                            )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1457
                          )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1458
                          #createNewApplication: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1459
                          #createNewBuilder: true
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1460
                        )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1461
                       )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1462
                     
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1463
                    )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1464
                    #handles: #(#Any 0.5 1.0)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1465
                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1466
                 #(#SubCanvasSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1467
                    #name: 'MetaToggles1'
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1468
                    #layout: #(#LayoutFrame 0 0.0 -25 1 0 1.0 0 1)
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1469
                    #hasHorizontalScrollBar: false
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1470
                    #hasVerticalScrollBar: false
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1471
                    #minorKey: #metaSpec
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1472
                  )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1473
                 )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1474
               
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1475
              )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1476
            )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1477
           )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1478
         
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1479
        )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1480
      )
6908
28d1f5f21f55 use the linear project list (for now)
Claus Gittinger <cg@exept.de>
parents: 6905
diff changeset
  1481
28d1f5f21f55 use the linear project list (for now)
Claus Gittinger <cg@exept.de>
parents: 6905
diff changeset
  1482
    "Modified: / 17-08-2006 / 14:54:33 / cg"
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1483
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1484
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1485
windowSpecWithoutMetaToggles
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1486
    "This resource specification was automatically generated
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1487
     by the UIPainter of ST/X."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1488
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1489
    "Do not manually edit this!! If it is corrupted,
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1490
     the UIPainter may not be able to read the specification."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1491
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1492
    "
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1493
     UIPainter new openOnClass:OrganizerCanvas andSelector:#windowSpecWithoutMetaToggles
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1494
     OrganizerCanvas new openInterface:#windowSpecWithoutMetaToggles
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1495
    "
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1496
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1497
    <resource: #canvas>
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1498
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1499
    ^ 
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1500
     #(#FullSpec
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1501
        #name: #windowSpecWithoutMetaToggles
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1502
        #window: 
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1503
       #(#WindowSpec
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1504
          #label: 'Organizer'
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1505
          #name: 'Organizer'
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1506
          #min: #(#Point 0 0)
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1507
          #max: #(#Point 1024 721)
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1508
          #bounds: #(#Rectangle 13 23 313 323)
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1509
        )
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1510
        #component: 
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1511
       #(#SpecCollection
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1512
          #collection: #(
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1513
           #(#SubCanvasSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1514
              #name: 'ClassHierarchyList'
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1515
              #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1516
              #visibilityChannel: #classHierarchyShown
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1517
              #majorKey: #'HierarchicalClassList'
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1518
              #minorKey: #windowSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1519
              #subAspectHolders: 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1520
             #(#Array
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1521
                
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1522
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1523
                  #subAspect: #doubleClickChannel
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1524
                  #aspect: #classDoubleClickChannel
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1525
                ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1526
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1527
                  #subAspect: #forceGeneratorTrigger
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1528
                  #aspect: #forceClassInheritanceGeneratorTrigger
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1529
                )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1530
                
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1531
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1532
                  #subAspect: #hideUnloadedClasses
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1533
                  #aspect: #hideUnloadedClasses
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1534
                ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1535
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1536
                  #subAspect: #markApplicationsHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1537
                  #aspect: #markApplicationsHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1538
                ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1539
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1540
                  #subAspect: #showClassPackages
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1541
                  #aspect: #showClassPackages
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1542
                ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1543
                     #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1544
                        #subAspect: #showMethodInheritance
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1545
                        #aspect: #showMethodInheritance
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1546
                      )
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1547
                     #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1548
                        #subAspect: #showMethodComplexity
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1549
                        #aspect: #showMethodComplexity
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1550
                      )
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1551
                     #(#SubChannelInfoSpec
6269
c9bfca4d93dc metrics display
Claus Gittinger <cg@exept.de>
parents: 6259
diff changeset
  1552
                        #subAspect: #showMethodTypeIcon
c9bfca4d93dc metrics display
Claus Gittinger <cg@exept.de>
parents: 6259
diff changeset
  1553
                        #aspect: #showMethodTypeIcon
c9bfca4d93dc metrics display
Claus Gittinger <cg@exept.de>
parents: 6259
diff changeset
  1554
                      )
c9bfca4d93dc metrics display
Claus Gittinger <cg@exept.de>
parents: 6259
diff changeset
  1555
                     #(#SubChannelInfoSpec
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1556
                        #subAspect: #methodVisibilityHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1557
                        #aspect: #methodVisibilityHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1558
                      )
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1559
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1560
                  #subAspect: #immediateUpdate
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1561
                  #aspect: #immediateUpdate
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1562
                )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1563
                
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1564
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1565
                  #subAspect: #menuHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1566
                  #aspect: #classInheritanceListMenuHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1567
                ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1568
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1569
                  #subAspect: #meta
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1570
                  #aspect: #meta
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1571
                )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1572
                
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1573
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1574
                  #subAspect: #organizerMode
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1575
                  #aspect: #organizerMode
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1576
                ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1577
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1578
                  #subAspect: #outGeneratorHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1579
                  #aspect: #outGeneratorHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1580
                )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1581
                
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1582
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1583
                  #subAspect: #packageFilter
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1584
                  #aspect: #packageFilter
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1585
                ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1586
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1587
                  #subAspect: #nameSpaceFilter
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1588
                  #aspect: #nameSpaceFilter
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1589
                ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1590
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1591
                  #subAspect: #selectedClasses
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1592
                  #aspect: #selectedClasses
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1593
                )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1594
                
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1595
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1596
                  #subAspect: #selectionChangeCondition
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1597
                  #aspect: #selectionChangeCondition
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1598
                ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1599
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1600
                  #subAspect: #slaveMode
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1601
                  #aspect: #classInheritanceListSlaveMode
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1602
                )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1603
                
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1604
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1605
                  #subAspect: #topClassHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1606
                  #aspect: #classHierarchyTopClass
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1607
                ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1608
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1609
                  #subAspect: #updateTrigger
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1610
                  #aspect: #classHierarchyUpdateTrigger
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1611
                )
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1612
              )
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1613
              #createNewApplication: true
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1614
              #createNewBuilder: true
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1615
            )
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1616
           #(#SubCanvasSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1617
              #name: 'ClassInheritanceList'
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1618
              #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1619
              #visibilityChannel: #classInheritanceShown
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1620
              #majorKey: #'InheritanceClassList'
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1621
              #minorKey: #windowSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1622
              #subAspectHolders: 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1623
             #(#Array
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1624
                
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1625
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1626
                  #subAspect: #doubleClickChannel
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1627
                  #aspect: #classDoubleClickChannel
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1628
                ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1629
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1630
                  #subAspect: #forceGeneratorTrigger
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1631
                  #aspect: #forceClassInheritanceGeneratorTrigger
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1632
                )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1633
                
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1634
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1635
                  #subAspect: #hideUnloadedClasses
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1636
                  #aspect: #hideUnloadedClasses
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1637
                ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1638
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1639
                  #subAspect: #markApplicationsHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1640
                  #aspect: #markApplicationsHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1641
                ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1642
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1643
                  #subAspect: #immediateUpdate
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1644
                  #aspect: #immediateUpdate
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1645
                )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1646
                
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1647
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1648
                  #subAspect: #menuHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1649
                  #aspect: #classInheritanceListMenuHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1650
                ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1651
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1652
                  #subAspect: #meta
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1653
                  #aspect: #meta
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1654
                )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1655
                
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1656
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1657
                  #subAspect: #organizerMode
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1658
                  #aspect: #organizerMode
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1659
                ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1660
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1661
                  #subAspect: #outGeneratorHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1662
                  #aspect: #outGeneratorHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1663
                )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1664
                
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1665
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1666
                  #subAspect: #packageFilter
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1667
                  #aspect: #packageFilter
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1668
                ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1669
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1670
                  #subAspect: #nameSpaceFilter
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1671
                  #aspect: #nameSpaceFilter
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1672
                ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1673
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1674
                  #subAspect: #selectedClasses
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1675
                  #aspect: #selectedClasses
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1676
                )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1677
                
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1678
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1679
                  #subAspect: #selectionChangeCondition
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1680
                  #aspect: #selectionChangeCondition
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1681
                ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1682
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1683
                  #subAspect: #slaveMode
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1684
                  #aspect: #classInheritanceListSlaveMode
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1685
                )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1686
                
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1687
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1688
                  #subAspect: #topClassHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1689
                  #aspect: #classHierarchyTopClass
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1690
                ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1691
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1692
                  #subAspect: #updateTrigger
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1693
                  #aspect: #classHierarchyUpdateTrigger
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1694
                )
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1695
              )
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1696
              #createNewApplication: true
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1697
              #createNewBuilder: true
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1698
            )
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1699
           #(#VariableHorizontalPanelSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1700
              #name: 'VariableHorizontalPanel1'
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1701
              #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1702
              #visibilityChannel: #classHierarchyNotShown
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1703
              #barWidth: 2
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1704
              #showHandle: false
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1705
              #component: 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1706
             #(#SpecCollection
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1707
                #collection: #(
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1708
                 #(#ViewSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1709
                    #name: 'Box1'
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1710
                    #component: 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1711
                   #(#SpecCollection
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1712
                      #collection: #(
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1713
                       #(#SubCanvasSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1714
                          #name: 'ClassCategoryList'
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1715
                          #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1716
                          #visibilityChannel: #categoryListShown
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1717
                          #majorKey: #'ClassCategoryList'
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1718
                          #subAspectHolders: 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1719
                         #(#Array
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1720
                            
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1721
                           #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1722
                              #subAspect: #doubleClickChannel
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1723
                              #aspect: #classCategoryDoubleClickChannel
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1724
                            ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1725
                           #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1726
                              #subAspect: #forceGeneratorTrigger
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1727
                              #aspect: #forceClassCategoryGeneratorTrigger
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1728
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1729
                            
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1730
                           #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1731
                              #subAspect: #hideUnloadedClasses
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1732
                              #aspect: #hideUnloadedClasses
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1733
                            ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1734
                           #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1735
                              #subAspect: #immediateUpdate
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1736
                              #aspect: #immediateUpdate
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1737
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1738
                            
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1739
                           #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1740
                              #subAspect: #menuHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1741
                              #aspect: #classCategoryListMenuHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1742
                            ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1743
                           #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1744
                              #subAspect: #organizerMode
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1745
                              #aspect: #organizerMode
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1746
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1747
                            
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1748
                           #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1749
                              #subAspect: #outGeneratorHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1750
                              #aspect: #classGeneratorHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1751
                            ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1752
                           #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1753
                              #subAspect: #selectedCategories
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1754
                              #aspect: #selectedCategories
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1755
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1756
                            
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1757
                           #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1758
                              #subAspect: #selectionChangeCondition
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1759
                              #aspect: #selectionChangeCondition
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1760
                            ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1761
                           #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1762
                              #subAspect: #updateTrigger
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1763
                              #aspect: #classCategoryListUpdateTrigger
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1764
                            )
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1765
                          )
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1766
                          #createNewApplication: true
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1767
                          #createNewBuilder: true
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1768
                        )
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1769
                       #(#SubCanvasSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1770
                          #name: 'NamespaceList'
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1771
                          #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1772
                          #visibilityChannel: #nameSpaceListShown
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1773
                          #majorKey: #'NamespaceList'
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1774
                          #subAspectHolders: 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1775
                         #(#Array
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1776
                            
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1777
                           #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1778
                              #subAspect: #doubleClickChannel
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1779
                              #aspect: #nameSpaceDoubleClickChannel
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1780
                            ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1781
                           #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1782
                              #subAspect: #forceGeneratorTrigger
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1783
                              #aspect: #forceNamespaceGeneratorTrigger
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1784
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1785
                            
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1786
                           #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1787
                              #subAspect: #hideUnloadedClasses
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1788
                              #aspect: #hideUnloadedClasses
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1789
                            ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1790
                           #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1791
                              #subAspect: #immediateUpdate
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1792
                              #aspect: #immediateUpdate
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1793
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1794
                            
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1795
                           #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1796
                              #subAspect: #menuHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1797
                              #aspect: #nameSpaceListMenuHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1798
                            ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1799
                           #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1800
                              #subAspect: #organizerMode
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1801
                              #aspect: #organizerMode
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1802
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1803
                            
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1804
                           #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1805
                              #subAspect: #outGeneratorHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1806
                              #aspect: #classGeneratorHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1807
                            ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1808
                           #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1809
                              #subAspect: #selectedNamespaces
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1810
                              #aspect: #selectedNamespaces
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1811
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1812
                            
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1813
                           #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1814
                              #subAspect: #selectionChangeCondition
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1815
                              #aspect: #selectionChangeCondition
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1816
                            ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1817
                           #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1818
                              #subAspect: #updateTrigger
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1819
                              #aspect: #nameSpaceListUpdateTrigger
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1820
                            )
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1821
                          )
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1822
                          #createNewApplication: true
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1823
                          #createNewBuilder: true
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1824
                        )
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1825
                       #(#SubCanvasSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1826
                          #name: 'ProjectList'
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1827
                          #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1828
                          #visibilityChannel: #projectListShown
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1829
                          #majorKey: #'ProjectList'
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1830
                          #subAspectHolders: 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1831
                         #(#Array
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1832
                            
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1833
                           #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1834
                              #subAspect: #doubleClickChannel
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1835
                              #aspect: #projectDoubleClickChannel
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1836
                            ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1837
                           #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1838
                              #subAspect: #forceGeneratorTrigger
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1839
                              #aspect: #forceProjectGeneratorTrigger
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1840
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1841
                            
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1842
                           #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1843
                              #subAspect: #hideUnloadedClasses
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1844
                              #aspect: #hideUnloadedClasses
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1845
                            ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1846
                           #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1847
                              #subAspect: #immediateUpdate
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1848
                              #aspect: #immediateUpdate
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1849
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1850
                            
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1851
                           #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1852
                              #subAspect: #menuHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1853
                              #aspect: #projectListMenuHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1854
                            ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1855
                           #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1856
                              #subAspect: #organizerMode
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1857
                              #aspect: #organizerMode
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1858
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1859
                            
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1860
                           #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1861
                              #subAspect: #outGeneratorHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1862
                              #aspect: #classGeneratorHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1863
                            ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1864
                           #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1865
                              #subAspect: #selectedProjects
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1866
                              #aspect: #selectedProjects
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1867
                            )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1868
                            
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1869
                           #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1870
                              #subAspect: #selectionChangeCondition
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1871
                              #aspect: #selectionChangeCondition
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1872
                            ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1873
                           #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1874
                              #subAspect: #updateTrigger
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1875
                              #aspect: #projectListUpdateTrigger
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1876
                            )
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1877
                          )
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1878
                          #createNewApplication: true
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1879
                          #createNewBuilder: true
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1880
                        )
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1881
                       )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1882
                     
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1883
                    )
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1884
                  )
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1885
                 #(#SubCanvasSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1886
                    #name: 'ClassList'
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1887
                    #majorKey: #'ClassList'
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1888
                    #minorKey: #windowSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1889
                    #subAspectHolders: 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1890
                   #(#Array
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1891
                      
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1892
                     #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1893
                        #subAspect: #doubleClickChannel
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1894
                        #aspect: #classDoubleClickChannel
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1895
                      ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1896
                     #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1897
                        #subAspect: #hidePrivateClasses
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1898
                        #aspect: #hidePrivateClasses
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1899
                      )
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1900
                     #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1901
                        #subAspect: #hideUnloadedClasses
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1902
                        #aspect: #hideUnloadedClasses
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1903
                      ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1904
               #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1905
                  #subAspect: #markApplicationsHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1906
                  #aspect: #markApplicationsHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1907
                ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1908
                     #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1909
                        #subAspect: #immediateUpdate
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1910
                        #aspect: #immediateUpdate
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1911
                      )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1912
                      
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1913
                     #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1914
                        #subAspect: #inGeneratorHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1915
                        #aspect: #classGeneratorHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1916
                      ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1917
                     #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1918
                        #subAspect: #menuHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1919
                        #aspect: #classListMenuHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1920
                      )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1921
                      
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1922
                     #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1923
                        #subAspect: #meta
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1924
                        #aspect: #meta
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1925
                      ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1926
                     #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1927
                        #subAspect: #organizerMode
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1928
                        #aspect: #organizerMode
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1929
                      )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1930
                      
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1931
                     #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1932
                        #subAspect: #outGeneratorHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1933
                        #aspect: #outGeneratorHolder
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1934
                      ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1935
                     #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1936
                        #subAspect: #selectedClasses
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1937
                        #aspect: #selectedClasses
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1938
                      )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1939
                      
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1940
                     #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1941
                        #subAspect: #selectionChangeCondition
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1942
                        #aspect: #selectionChangeCondition
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1943
                      ) 
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1944
                     #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1945
                        #subAspect: #slaveMode
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1946
                        #aspect: #classListSlaveMode
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1947
                      )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1948
                      
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1949
                     #(#SubChannelInfoSpec
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1950
                        #subAspect: #updateTrigger
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1951
                        #aspect: #classListUpdateTrigger
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1952
                      )
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1953
                    )
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1954
                    #createNewApplication: true
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1955
                    #createNewBuilder: true
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1956
                  )
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1957
                 )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1958
               
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1959
              )
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1960
              #handles: #(#Any 0.5 1.0)
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1961
            )
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1962
           )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1963
         
6259
e440c14b02aa experimental display of method complexity
Claus Gittinger <cg@exept.de>
parents: 5909
diff changeset
  1964
        )
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1965
      )
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1966
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1967
    "Modified: / 25.2.2000 / 22:39:54 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1968
! !
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1969
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1970
!OrganizerCanvas class methodsFor:'plugIn spec'!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1971
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1972
aspectSelectors
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1973
    "This resource specification was automatically generated
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1974
     by the UIPainter of ST/X."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1975
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1976
    "Do not manually edit this. If it is corrupted,
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1977
     the UIPainter may not be able to read the specification."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1978
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1979
    "Return a description of exported aspects;
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1980
     these can be connected to aspects of an embedding application
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1981
     (if this app is embedded in a subCanvas)."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1982
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1983
    ^ #(
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1984
        #(#classCategoryDoubleClickChannel #action )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1985
        #classCategoryListMenuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1986
        #(#classDoubleClickChannel #action )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1987
        #classHierarchyListMenuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1988
        #classHierarchyTopClass
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1989
        #classListMenuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1990
        #filterClassVars
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1991
        #hidePrivateClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1992
        #hideUnloadedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1993
        #immediateUpdate
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1994
        #meta
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1995
        #metaToggleLabelHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1996
        #(#nameSpaceDoubleClickChannel #action )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1997
        #nameSpaceFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1998
        #nameSpaceListMenuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  1999
        #organizerMode
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2000
        #outGeneratorHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2001
        #packageFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2002
        #(#projectDoubleClickChannel #action )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2003
        #projectListMenuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2004
        #selectedCategories
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2005
        #selectedClasses
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2006
        #selectedNamespaces
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2007
        #selectedProjects
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2008
        #selectedProtocols
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2009
        #selectionChangeCondition
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2010
        #showClassPackages
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2011
        #(#variableDoubleClickChannel #action )
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2012
        #variableFilter
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2013
        #variablesMenuHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2014
        #markApplicationsHolder
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2015
        #sortVariablesBy
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2016
      ).
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2017
! !
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2018
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2019
!OrganizerCanvas methodsFor:'aspects'!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2020
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2021
classCategoryDoubleClickChannel
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2022
    classCategoryDoubleClickChannel isNil ifTrue:[
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2023
        classCategoryDoubleClickChannel := TriggerValue new.
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2024
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2025
    ^ classCategoryDoubleClickChannel.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2026
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2027
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2028
classCategoryListMenuHolder
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2029
    classCategoryListMenuHolder isNil ifTrue:[
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2030
        classCategoryListMenuHolder := ValueHolder new.
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2031
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2032
    ^ classCategoryListMenuHolder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2033
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2034
    "Created: / 18.2.2000 / 11:52:55 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2035
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2036
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2037
classDoubleClickChannel
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2038
    classDoubleClickChannel isNil ifTrue:[
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2039
        classDoubleClickChannel := TriggerValue new.
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2040
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2041
    ^ classDoubleClickChannel.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2042
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2043
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2044
classGeneratorHolder
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2045
    classGeneratorHolder isNil ifTrue:[
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2046
        classGeneratorHolder := ValueHolder new.
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2047
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2048
    ^ classGeneratorHolder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2049
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2050
    "Created: / 18.2.2000 / 00:56:50 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2051
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2052
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2053
classGeneratorHolderFromClassCategory
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2054
    classGeneratorHolderFromClassCategory isNil ifTrue:[
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2055
        classGeneratorHolderFromClassCategory := ValueHolder new.
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2056
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2057
    ^ classGeneratorHolderFromClassCategory.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2058
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2059
    "Created: / 18.2.2000 / 02:21:55 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2060
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2061
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2062
classGeneratorHolderFromClassHierarchy
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2063
    classGeneratorHolderFromClassHierarchy isNil ifTrue:[
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2064
        classGeneratorHolderFromClassHierarchy := ValueHolder new.
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2065
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2066
    ^ classGeneratorHolderFromClassHierarchy.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2067
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2068
    "Created: / 18.2.2000 / 02:21:55 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2069
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2070
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2071
classGeneratorHolderFromNamespace
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2072
    classGeneratorHolderFromNamespace isNil ifTrue:[
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2073
        classGeneratorHolderFromNamespace := ValueHolder new.
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2074
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2075
    ^ classGeneratorHolderFromNamespace.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2076
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2077
    "Created: / 18.2.2000 / 02:21:55 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2078
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2079
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2080
classGeneratorHolderFromProject
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2081
    classGeneratorHolderFromProject isNil ifTrue:[
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2082
        classGeneratorHolderFromProject := ValueHolder new.
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2083
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2084
    ^ classGeneratorHolderFromProject.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2085
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2086
    "Created: / 18.2.2000 / 02:21:55 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2087
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2088
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2089
classHierarchyListMenuHolder
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2090
    classHierarchyListMenuHolder isNil ifTrue:[
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2091
        classHierarchyListMenuHolder := ValueHolder new.
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2092
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2093
    ^ classHierarchyListMenuHolder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2094
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2095
    "Created: / 18.2.2000 / 11:52:55 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2096
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2097
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2098
classHierarchyTopClass
8006
cdc85821cae2 aspect holder setup code cleanup
Claus Gittinger <cg@exept.de>
parents: 7886
diff changeset
  2099
    ^ builder valueAspectFor:#classHierarchyTopClass initialValue:Object
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2100
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2101
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2102
classInheritanceListMenuHolder
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2103
    ^ self classHierarchyListMenuHolder
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2104
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2105
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2106
classList
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2107
    classList isNil ifTrue:[
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2108
        classList := ValueHolder new.
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2109
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2110
    ^ classList.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2111
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2112
    "Created: / 18.2.2000 / 00:23:43 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2113
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2114
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2115
classListMenuHolder
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2116
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2117
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2118
    "*** the code below creates a default model when invoked."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2119
    "*** (which may not be the one you wanted)"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2120
    "*** Please change as required and accept it in the browser."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2121
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2122
    classListMenuHolder isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2123
	classListMenuHolder := ValueHolder new.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2124
"/        classListMenuHolder addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2125
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2126
    ^ classListMenuHolder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2127
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2128
    "Created: / 18.2.2000 / 11:57:22 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2129
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2130
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2131
filterClassVars
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2132
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2133
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2134
    "*** the code below creates a default model when invoked."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2135
    "*** (which may not be the one you wanted)"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2136
    "*** Please change as required and accept it in the browser."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2137
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2138
    filterClassVars isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2139
	filterClassVars := ValueHolder new.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2140
"/        filterClassVars addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2141
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2142
    ^ filterClassVars.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2143
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2144
    "Created: / 24.2.2000 / 23:29:52 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2145
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2146
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2147
hidePrivateClasses
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2148
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2149
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2150
    "*** the code below creates a default model when invoked."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2151
    "*** (which may not be the one you wanted)"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2152
    "*** Please change as required and accept it in the browser."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2153
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2154
    hidePrivateClasses isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2155
	hidePrivateClasses := false asValue.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2156
"/        hidePrivateClasses addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2157
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2158
    ^ hidePrivateClasses.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2159
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2160
    "Created: / 24.2.2000 / 16:18:45 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2161
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2162
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2163
hideUnloadedClasses
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2164
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2165
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2166
    "*** the code below creates a default model when invoked."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2167
    "*** (which may not be the one you wanted)"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2168
    "*** Please change as required and accept it in the browser."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2169
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2170
    hideUnloadedClasses isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2171
	hideUnloadedClasses := false asValue.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2172
"/        hideUnloadedClasses addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2173
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2174
    ^ hideUnloadedClasses.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2175
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2176
    "Created: / 18.2.2000 / 17:54:57 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2177
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2178
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2179
immediateUpdate
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2180
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2181
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2182
    "*** the code below creates a default model when invoked."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2183
    "*** (which may not be the one you wanted)"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2184
    "*** Please change as required and accept it in the browser."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2185
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2186
    immediateUpdate isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2187
	immediateUpdate := false asValue.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2188
"/        immediateUpdate addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2189
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2190
    ^ immediateUpdate.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2191
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2192
    "Created: / 18.2.2000 / 00:23:43 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2193
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2194
6398
e44eeb14731e leftover halts.
Claus Gittinger <cg@exept.de>
parents: 6269
diff changeset
  2195
initialOrganizerMode
e44eeb14731e leftover halts.
Claus Gittinger <cg@exept.de>
parents: 6269
diff changeset
  2196
    ^ nil  "/ dummy
e44eeb14731e leftover halts.
Claus Gittinger <cg@exept.de>
parents: 6269
diff changeset
  2197
!
e44eeb14731e leftover halts.
Claus Gittinger <cg@exept.de>
parents: 6269
diff changeset
  2198
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2199
markApplicationsHolder
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2200
    markApplicationsHolder isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2201
	markApplicationsHolder := false asValue.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2202
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2203
    ^ markApplicationsHolder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2204
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2205
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2206
meta
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2207
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2208
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2209
    "*** the code below creates a default model when invoked."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2210
    "*** (which may not be the one you wanted)"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2211
    "*** Please change as required and accept it in the browser."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2212
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2213
    meta isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2214
	meta := false asValue.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2215
"/        meta addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2216
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2217
    ^ meta.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2218
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2219
    "Created: / 18.2.2000 / 00:23:43 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2220
    "Modified: / 18.2.2000 / 00:42:23 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2221
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2222
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2223
metaToggle
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2224
    metaToggle isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2225
	metaToggle := PluggableAdaptor on:(self meta).
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2226
	metaToggle
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2227
	    getBlock:[:m | m value == true]
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2228
	    putBlock:[:m :newValue | m value:(newValue ? false)]
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2229
	    updateBlock:[:m :aspect :param | true].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2230
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2231
    ^ metaToggle
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2232
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2233
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2234
metaToggleLabelHolder
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2235
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2236
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2237
    "*** the code below creates a default model when invoked."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2238
    "*** (which may not be the one you wanted)"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2239
    "*** Please change as required and accept it in the browser."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2240
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2241
    metaToggleLabelHolder isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2242
	metaToggleLabelHolder := (resources string:'Class') asValue.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2243
"/        metaToggleLabelHolder addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2244
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2245
    ^ metaToggleLabelHolder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2246
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2247
    "Created: / 18.2.2000 / 11:52:55 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2248
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2249
7886
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2250
methodVisibilityHolder
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2251
    masterApplication notNil ifTrue:[
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2252
        ^ masterApplication methodVisibilityHolder
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2253
    ].
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2254
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2255
    methodVisibilityHolder isNil ifTrue:[
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2256
        methodVisibilityHolder := false asValue.
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2257
    ].
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2258
    ^ methodVisibilityHolder.
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2259
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2260
    "Created: / 05-11-2007 / 16:57:58 / cg"
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2261
!
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2262
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2263
nameSpaceDoubleClickChannel
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2264
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2265
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2266
    "*** the code below creates a default model when invoked."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2267
    "*** (which may not be the one you wanted)"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2268
    "*** Please change as required and accept it in the browser."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2269
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2270
    |holder|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2271
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2272
    (holder := builder bindingAt:#nameSpaceDoubleClickChannel) isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2273
	holder := TriggerValue new.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2274
	builder aspectAt:#nameSpaceDoubleClickChannel put:holder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2275
"/        holder addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2276
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2277
    ^ holder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2278
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2279
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2280
nameSpaceFilter
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2281
    nameSpaceFilter isNil ifTrue:[
6398
e44eeb14731e leftover halts.
Claus Gittinger <cg@exept.de>
parents: 6269
diff changeset
  2282
        nameSpaceFilter := ValueHolder new.
e44eeb14731e leftover halts.
Claus Gittinger <cg@exept.de>
parents: 6269
diff changeset
  2283
        nameSpaceFilter onChangeEvaluate:[
e44eeb14731e leftover halts.
Claus Gittinger <cg@exept.de>
parents: 6269
diff changeset
  2284
            nameSpaceFilter value ~= nameSpaceFilterSelection value ifTrue:[
8359
Claus Gittinger <cg@exept.de>
parents: 8012
diff changeset
  2285
                self halt:'should not happen'
6398
e44eeb14731e leftover halts.
Claus Gittinger <cg@exept.de>
parents: 6269
diff changeset
  2286
            ].
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2287
"/            self nameSpaceFilter value: nameSpaceFilterSelection value.
6398
e44eeb14731e leftover halts.
Claus Gittinger <cg@exept.de>
parents: 6269
diff changeset
  2288
        ]
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2289
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2290
    ^ nameSpaceFilter.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2291
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2292
    "Created: / 24.2.2000 / 23:29:52 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2293
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2294
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2295
nameSpaceFilterDoubleClickChannel
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2296
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2297
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2298
    "*** the code below creates a default model when invoked."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2299
    "*** (which may not be the one you wanted)"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2300
    "*** Please change as required and accept it in the browser."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2301
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2302
    |holder|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2303
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2304
    (holder := builder bindingAt:#nameSpaceFilterDoubleClickChannel) isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2305
	holder := TriggerValue new.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2306
	builder aspectAt:#nameSpaceFilterDoubleClickChannel put:holder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2307
	holder onChangeEvaluate:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2308
		    (builder componentAt:#NameSpaceFilterComboBox) closeMenu.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2309
"/                    self nameSpaceDoubleClickChannel value:true.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2310
	       ]
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2311
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2312
    ^ holder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2313
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2314
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2315
nameSpaceFilterPopUpMenu
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2316
    ^ self nameSpaceListMenuHolder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2317
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2318
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2319
nameSpaceFilterSelectedNameSpace
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2320
    |holder|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2321
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2322
    (holder := builder bindingAt:#nameSpaceFilterSelectedNameSpace) isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2323
	holder := self class nameListEntryForALL "'* all *'" asValue.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2324
	builder aspectAt:#nameSpaceFilterSelectedNameSpace put:holder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2325
	holder onChangeEvaluate:[ self updateNameSpaceLabel. ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2326
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2327
    ^ holder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2328
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2329
    "Created: / 18.2.2000 / 11:52:55 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2330
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2331
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2332
nameSpaceFilterSelection
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2333
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2334
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2335
    nameSpaceFilterSelection isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2336
	nameSpaceFilterSelection := (OrderedCollection with:self class nameListEntryForALL) asValue.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2337
	nameSpaceFilterSelection addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2338
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2339
    ^ nameSpaceFilterSelection.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2340
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2341
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2342
nameSpaceListMenuHolder
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2343
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2344
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2345
    "*** the code below creates a default model when invoked."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2346
    "*** (which may not be the one you wanted)"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2347
    "*** Please change as required and accept it in the browser."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2348
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2349
    |holder|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2350
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2351
    (holder := builder bindingAt:#nameSpaceListMenuHolder) isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2352
	holder := ValueHolder new.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2353
	builder aspectAt:#nameSpaceListMenuHolder put:holder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2354
"/        holder addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2355
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2356
    ^ holder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2357
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2358
    "Created: / 18.2.2000 / 11:52:55 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2359
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2360
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2361
nameSpaceListWidget
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2362
    |view|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2363
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2364
    view := SubCanvas new.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2365
    view client:self spec:#embeddedNameSpaceListSpec builder:nil. "/ (self builder).
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2366
    (view builder findComponentAt:#List) autoHideHorizontalScrollBar:true.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2367
    ^ view.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2368
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2369
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2370
nameSpaceListWidgetHolder
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2371
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2372
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2373
    "*** the code below creates a default model when invoked."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2374
    "*** (which may not be the one you wanted)"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2375
    "*** Please change as required and accept it in the browser."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2376
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2377
    |holder|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2378
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2379
    (holder := builder bindingAt:#nameSpaceListWidgetHolder) isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2380
	holder := ValueHolder new.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2381
	builder aspectAt:#nameSpaceListWidgetHolder put:holder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2382
	holder value:(self nameSpaceListWidget).
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2383
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2384
    ^ holder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2385
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2386
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2387
notMetaToggle
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2388
    notMetaToggle isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2389
	notMetaToggle := PluggableAdaptor on:(self meta).
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2390
	notMetaToggle
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2391
	    getBlock:[:m | m value == false]
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2392
	    putBlock:[:m :newValue | m value:(newValue ? false) not]
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2393
	    updateBlock:[:m :aspect :param | true].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2394
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2395
    ^ notMetaToggle
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2396
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2397
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2398
organizerMode
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2399
    organizerMode isNil ifTrue:[
6734
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  2400
        organizerMode := OrganizerCanvas organizerModeCategory asValue.
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  2401
        organizerMode addDependent:self.
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2402
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2403
    ^ organizerMode
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2404
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2405
    "Created: / 18.2.2000 / 00:30:44 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2406
    "Modified: / 18.2.2000 / 02:56:21 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2407
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2408
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2409
outGeneratorHolder
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2410
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2411
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2412
    "*** the code below creates a default model when invoked."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2413
    "*** (which may not be the one you wanted)"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2414
    "*** Please change as required and accept it in the browser."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2415
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2416
    |holder|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2417
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2418
    (holder := builder bindingAt:#outGeneratorHolder) isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2419
	holder := ValueHolder new.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2420
	builder aspectAt:#outGeneratorHolder put:holder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2421
"/        holder addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2422
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2423
    ^ holder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2424
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2425
    "Created: / 18.2.2000 / 00:23:43 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2426
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2427
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2428
packageFilter
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2429
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2430
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2431
    packageFilter isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2432
	packageFilter := ValueHolder new.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2433
"/        packageFilter addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2434
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2435
    ^ packageFilter.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2436
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2437
    "Created: / 24.2.2000 / 23:29:52 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2438
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2439
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2440
popUpNameSpaceListSlaveMode
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2441
    ^ false
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2442
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2443
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2444
projectDoubleClickChannel
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2445
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2446
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2447
    "*** the code below creates a default model when invoked."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2448
    "*** (which may not be the one you wanted)"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2449
    "*** Please change as required and accept it in the browser."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2450
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2451
    |holder|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2452
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2453
    (holder := builder bindingAt:#projectDoubleClickChannel) isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2454
	holder := TriggerValue new.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2455
	builder aspectAt:#projectDoubleClickChannel put:holder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2456
"/        holder addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2457
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2458
    ^ holder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2459
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2460
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2461
projectListMenuHolder
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2462
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2463
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2464
    "*** the code below creates a default model when invoked."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2465
    "*** (which may not be the one you wanted)"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2466
    "*** Please change as required and accept it in the browser."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2467
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2468
    projectListMenuHolder isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2469
	projectListMenuHolder := ValueHolder new.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2470
"/        projectListMenuHolder addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2471
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2472
    ^ projectListMenuHolder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2473
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2474
    "Created: / 18.2.2000 / 11:52:55 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2475
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2476
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2477
selectedCategories
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2478
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2479
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2480
    "*** the code below creates a default model when invoked."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2481
    "*** (which may not be the one you wanted)"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2482
    "*** Please change as required and accept it in the browser."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2483
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2484
    selectedCategories isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2485
	selectedCategories := ValueHolder new.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2486
"/        selectedCategories addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2487
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2488
    ^ selectedCategories.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2489
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2490
    "Created: / 18.2.2000 / 12:27:58 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2491
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2492
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2493
selectedClasses
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2494
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2495
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2496
    "*** the code below creates a default model when invoked."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2497
    "*** (which may not be the one you wanted)"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2498
    "*** Please change as required and accept it in the browser."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2499
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2500
    selectedClasses isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2501
	selectedClasses := ValueHolder new.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2502
	selectedClasses addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2503
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2504
    ^ selectedClasses.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2505
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2506
    "Created: / 18.2.2000 / 00:23:43 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2507
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2508
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2509
selectedNamespaces
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2510
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2511
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2512
    "*** the code below creates a default model when invoked."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2513
    "*** (which may not be the one you wanted)"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2514
    "*** Please change as required and accept it in the browser."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2515
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2516
    selectedNamespaces isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2517
	selectedNamespaces := (OrderedCollection with:self class nameListEntryForALL) asValue.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2518
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2519
    ^ selectedNamespaces.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2520
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2521
    "Created: / 18.2.2000 / 12:27:58 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2522
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2523
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2524
selectedProjects
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2525
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2526
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2527
    "*** the code below creates a default model when invoked."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2528
    "*** (which may not be the one you wanted)"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2529
    "*** Please change as required and accept it in the browser."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2530
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2531
    selectedProjects isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2532
	selectedProjects := ValueHolder new.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2533
"/        selectedProjects addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2534
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2535
    ^ selectedProjects.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2536
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2537
    "Created: / 18.2.2000 / 12:16:01 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2538
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2539
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2540
selectionChangeCondition
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2541
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2542
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2543
    "*** the code below creates a default model when invoked."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2544
    "*** (which may not be the one you wanted)"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2545
    "*** Please change as required and accept it in the browser."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2546
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2547
    selectionChangeCondition isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2548
	selectionChangeCondition := ValueHolder new.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2549
"/        selectionChangeCondition addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2550
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2551
    ^ selectionChangeCondition.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2552
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2553
    "Created: / 18.2.2000 / 00:23:43 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2554
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2555
7704
eef2d6a873fd showAllInNSView
Claus Gittinger <cg@exept.de>
parents: 7668
diff changeset
  2556
showAllClassesInNameSpaceOrganisation
eef2d6a873fd showAllInNSView
Claus Gittinger <cg@exept.de>
parents: 7668
diff changeset
  2557
    masterApplication notNil ifTrue:[
eef2d6a873fd showAllInNSView
Claus Gittinger <cg@exept.de>
parents: 7668
diff changeset
  2558
        ^ masterApplication showAllClassesInNameSpaceOrganisation
eef2d6a873fd showAllInNSView
Claus Gittinger <cg@exept.de>
parents: 7668
diff changeset
  2559
    ].
eef2d6a873fd showAllInNSView
Claus Gittinger <cg@exept.de>
parents: 7668
diff changeset
  2560
eef2d6a873fd showAllInNSView
Claus Gittinger <cg@exept.de>
parents: 7668
diff changeset
  2561
    showAllClassesInNameSpaceView isNil ifTrue:[
eef2d6a873fd showAllInNSView
Claus Gittinger <cg@exept.de>
parents: 7668
diff changeset
  2562
        showAllClassesInNameSpaceView := false asValue.
eef2d6a873fd showAllInNSView
Claus Gittinger <cg@exept.de>
parents: 7668
diff changeset
  2563
    ].
eef2d6a873fd showAllInNSView
Claus Gittinger <cg@exept.de>
parents: 7668
diff changeset
  2564
    ^ showAllClassesInNameSpaceView.
eef2d6a873fd showAllInNSView
Claus Gittinger <cg@exept.de>
parents: 7668
diff changeset
  2565
eef2d6a873fd showAllInNSView
Claus Gittinger <cg@exept.de>
parents: 7668
diff changeset
  2566
    "Created: / 05-03-2007 / 16:52:02 / cg"
eef2d6a873fd showAllInNSView
Claus Gittinger <cg@exept.de>
parents: 7668
diff changeset
  2567
    "Modified: / 06-03-2007 / 12:30:17 / cg"
eef2d6a873fd showAllInNSView
Claus Gittinger <cg@exept.de>
parents: 7668
diff changeset
  2568
!
eef2d6a873fd showAllInNSView
Claus Gittinger <cg@exept.de>
parents: 7668
diff changeset
  2569
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2570
showClassPackages
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2571
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2572
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2573
    "*** the code below creates a default model when invoked."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2574
    "*** (which may not be the one you wanted)"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2575
    "*** Please change as required and accept it in the browser."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2576
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2577
    showClassPackages isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2578
	showClassPackages := false asValue.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2579
"/        showClassPackages addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2580
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2581
    ^ showClassPackages.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2582
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2583
    "Created: / 18.2.2000 / 17:54:57 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2584
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2585
7886
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2586
showMethodComplexity
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2587
    masterApplication notNil ifTrue:[
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2588
        ^ masterApplication showMethodComplexity
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2589
    ].
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2590
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2591
    showMethodComplexity isNil ifTrue:[
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2592
        showMethodComplexity := false asValue.
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2593
    ].
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2594
    ^ showMethodComplexity.
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2595
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2596
    "Created: / 05-11-2007 / 16:56:36 / cg"
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2597
!
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2598
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2599
showMethodInheritance
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2600
    masterApplication notNil ifTrue:[
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2601
        ^ masterApplication showMethodInheritance
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2602
    ].
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2603
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2604
    showMethodInheritance isNil ifTrue:[
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2605
        showMethodInheritance := false asValue.
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2606
    ].
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2607
    ^ showMethodInheritance.
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2608
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2609
    "Created: / 05-11-2007 / 16:55:35 / cg"
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2610
!
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2611
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2612
showMethodTypeIcon
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2613
    masterApplication notNil ifTrue:[
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2614
        ^ masterApplication showMethodTypeIcon
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2615
    ].
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2616
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2617
    showMethodTypeIcon isNil ifTrue:[
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2618
        showMethodTypeIcon := false asValue.
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2619
    ].
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2620
    ^ showMethodTypeIcon.
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2621
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2622
    "Created: / 05-11-2007 / 16:57:12 / cg"
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2623
!
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  2624
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2625
sortVariablesByName
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2626
    sortVariablesByName isNil ifTrue:[
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2627
        sortVariablesByName := false asValue.
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2628
    ].
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2629
    ^ sortVariablesByName.
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2630
!
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2631
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2632
updateNameSpaceLabel
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2633
    |box|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2634
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2635
    box := self builder componentAt:#NameSpaceFilterComboBox.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2636
    box notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2637
	"/ new code: ExtComboBox uses always an EditField
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2638
	box editor contents:nameSpaceFilterSelection value first.        
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2639
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2640
	"/ old code: readOnly ExtComboBox used a Label
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2641
	"/ box menuField label:nameSpaceFilterSelection value first
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2642
    ]
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2643
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2644
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2645
variableDoubleClickChannel
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2646
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2647
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2648
    "*** the code below creates a default model when invoked."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2649
    "*** (which may not be the one you wanted)"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2650
    "*** Please change as required and accept it in the browser."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2651
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2652
    |holder|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2653
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2654
    (holder := builder bindingAt:#variableDoubleClickChannel) isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2655
	holder := TriggerValue new.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2656
	builder aspectAt:#variableDoubleClickChannel put:holder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2657
"/        holder addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2658
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2659
    ^ holder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2660
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2661
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2662
variableFilter
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2663
    variableFilter isNil ifTrue:[
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  2664
        variableFilter := ValueHolder new.
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2665
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2666
    ^ variableFilter.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2667
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2668
    "Created: / 24.2.2000 / 23:29:52 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2669
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2670
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2671
variablesMenuHolder
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2672
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2673
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2674
    "*** the code below creates a default model when invoked."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2675
    "*** (which may not be the one you wanted)"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2676
    "*** Please change as required and accept it in the browser."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2677
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2678
    variablesMenuHolder isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2679
	variablesMenuHolder := ValueHolder new.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2680
"/        variablesMenuHolder addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2681
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2682
    ^ variablesMenuHolder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2683
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2684
    "Created: / 24.2.2000 / 23:29:52 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2685
! !
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2686
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2687
!OrganizerCanvas methodsFor:'aspects-exported'!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2688
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2689
classCategoryDoubleClickChannel:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2690
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2691
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2692
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2693
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2694
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2695
    "/ classCategoryDoubleClickChannel removeDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2696
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2697
    classCategoryDoubleClickChannel := something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2698
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2699
    "/ something notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2700
    "/     something addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2701
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2702
    ^ self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2703
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2704
    "Created: / 18.8.2000 / 20:04:48 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2705
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2706
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2707
classCategoryListMenuHolder:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2708
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2709
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2710
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2711
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2712
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2713
    "/ classCategoryListMenuHolder removeDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2714
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2715
    classCategoryListMenuHolder := something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2716
    "/ something notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2717
    "/     something addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2718
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2719
    ^ self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2720
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2721
    "Created: / 18.2.2000 / 11:53:31 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2722
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2723
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2724
classCategoryListUpdateTrigger:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2725
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2726
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2727
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2728
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2729
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2730
    "/ classCategoryListUpdateTrigger removeDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2731
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2732
    classCategoryListUpdateTrigger := something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2733
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2734
    "/ something notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2735
    "/     something addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2736
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2737
    ^ self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2738
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2739
    "Created: / 18.2.2000 / 02:08:01 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2740
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2741
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2742
classDoubleClickChannel:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2743
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2744
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2745
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2746
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2747
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2748
    "/ classDoubleClickChannel removeDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2749
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2750
    classDoubleClickChannel := something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2751
    "/ something notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2752
    "/     something addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2753
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2754
    ^ self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2755
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2756
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2757
classHierarchyListMenuHolder:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2758
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2759
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2760
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2761
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2762
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2763
    "/ classHierarchyListMenuHolder removeDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2764
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2765
    classHierarchyListMenuHolder := something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2766
    "/ something notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2767
    "/     something addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2768
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2769
    ^ self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2770
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2771
    "Created: / 18.2.2000 / 11:53:31 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2772
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2773
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2774
classHierarchyShown:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2775
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2776
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2777
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2778
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2779
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2780
    "/ |holder|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2781
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2782
    "/ (holder := builder bindingAt:#classHierarchyShown) notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2783
    "/     holder removeDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2784
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2785
    builder aspectAt:#classHierarchyShown put:something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2786
    "/ something notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2787
    "/     something addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2788
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2789
    ^ self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2790
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2791
    "Created: / 18.2.2000 / 00:24:28 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2792
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2793
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2794
classHierarchyTopClass:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2795
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2796
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2797
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2798
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2799
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2800
    "/ |holder|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2801
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2802
    "/ (holder := builder bindingAt:#classHierarchyTopClass) notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2803
    "/     holder removeDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2804
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2805
    builder aspectAt:#classHierarchyTopClass put:something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2806
    "/ something notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2807
    "/     something addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2808
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2809
    ^ self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2810
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2811
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2812
classHierarchyUpdateTrigger:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2813
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2814
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2815
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2816
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2817
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2818
    "/ |holder|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2819
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2820
    "/ (holder := builder bindingAt:#classHierarchyUpdateTrigger) notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2821
    "/     holder removeDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2822
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2823
    builder aspectAt:#classHierarchyUpdateTrigger put:something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2824
    "/ something notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2825
    "/     something addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2826
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2827
    ^ self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2828
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2829
    "Created: / 18.2.2000 / 02:08:01 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2830
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2831
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2832
classList:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2833
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2834
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2835
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2836
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2837
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2838
    "/ classList notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2839
    "/     classList removeDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2840
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2841
    classList := something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2842
    "/ something notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2843
    "/     something addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2844
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2845
    ^ self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2846
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2847
    "Created: / 18.2.2000 / 00:24:28 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2848
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2849
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2850
classListMenuHolder:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2851
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2852
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2853
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2854
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2855
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2856
    "/ classListMenuHolder removeDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2857
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2858
    classListMenuHolder := something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2859
    "/ something notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2860
    "/     something addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2861
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2862
    ^ self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2863
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2864
    "Created: / 18.2.2000 / 11:57:22 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2865
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2866
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2867
classListUpdateTrigger:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2868
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2869
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2870
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2871
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2872
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2873
    "/ classListUpdateTrigger removeDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2874
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2875
    classListUpdateTrigger := something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2876
    "/ something notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2877
    "/     something addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2878
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2879
    ^ self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2880
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2881
    "Created: / 18.2.2000 / 02:08:01 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2882
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2883
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2884
filterClassVars:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2885
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2886
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2887
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2888
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2889
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2890
    "/ filterClassVars removeDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2891
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2892
    filterClassVars := something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2893
    "/ something notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2894
    "/     something addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2895
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2896
    ^ self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2897
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2898
    "Created: / 24.2.2000 / 23:46:16 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2899
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2900
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2901
hidePrivateClasses:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2902
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2903
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2904
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2905
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2906
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2907
    "/ hidePrivateClasses removeDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2908
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2909
    hidePrivateClasses := something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2910
    "/ something notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2911
    "/     something addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2912
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2913
    ^ self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2914
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2915
    "Created: / 24.2.2000 / 16:18:32 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2916
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2917
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2918
hideUnloadedClasses:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2919
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2920
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2921
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2922
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2923
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2924
    "/ hideUnloadedClasses removeDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2925
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2926
    hideUnloadedClasses := something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2927
    "/ something notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2928
    "/     something addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2929
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2930
    ^ self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2931
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2932
    "Created: / 18.2.2000 / 17:54:57 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2933
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2934
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2935
immediateUpdate:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2936
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2937
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2938
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2939
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2940
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2941
    "/ immediateUpdate removeDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2942
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2943
    immediateUpdate := something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2944
    "/ something notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2945
    "/     something addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2946
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2947
    ^ self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2948
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2949
    "Created: / 18.2.2000 / 00:24:29 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2950
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2951
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2952
markApplicationsHolder:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2953
    markApplicationsHolder := something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2954
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2955
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2956
meta:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2957
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2958
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2959
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2960
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2961
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2962
    "/ meta notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2963
    "/     meta removeDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2964
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2965
"/ (something == true or:[something == false]) ifTrue:[self halt].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2966
    meta := something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2967
    "/ something notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2968
    "/     something addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2969
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2970
    metaToggle notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2971
	metaToggle model:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2972
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2973
    notMetaToggle notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2974
	notMetaToggle model:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2975
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2976
    ^ self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2977
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2978
    "Created: / 18.2.2000 / 00:24:29 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2979
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2980
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2981
metaToggleLabelHolder:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2982
    |v|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2983
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2984
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2985
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2986
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2987
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2988
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2989
    "/ metaToggleLabelHolder removeDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2990
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2991
    metaToggleLabelHolder := something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2992
    "/ something notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2993
    "/     something addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2994
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2995
    (v := builder componentAt:#ClassToggle) notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2996
	v labelChannel:metaToggleLabelHolder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2997
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2998
    ^ self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  2999
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3000
    "Created: / 18.2.2000 / 11:53:31 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3001
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3002
7886
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3003
methodVisibilityHolder:aValueHolder
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3004
    "automatically generated by UIPainter ..."
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3005
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3006
    "This method is used when I am embedded as subApplication,"
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3007
    "and the mainApp wants to connect its aspects to mine."
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3008
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3009
    methodVisibilityHolder := aValueHolder.
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3010
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3011
    "Created: / 05-11-2007 / 16:57:34 / cg"
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3012
!
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3013
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3014
nameSpaceFilter:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3015
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3016
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3017
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3018
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3019
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3020
    "/ packageFilter notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3021
    "/     packageFilter removeDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3022
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3023
    nameSpaceFilter := something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3024
    "/ something notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3025
    "/     something addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3026
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3027
    self nameSpaceFilterSelection value:something value.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3028
    ^ self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3029
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3030
    "Created: / 24.2.2000 / 23:46:16 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3031
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3032
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3033
nameSpaceListMenuHolder:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3034
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3035
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3036
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3037
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3038
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3039
    "/ |holder|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3040
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3041
    "/ (holder := builder bindingAt:#namespaceListMenuHolder) notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3042
    "/     holder removeDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3043
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3044
    builder aspectAt:#nameSpaceListMenuHolder put:something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3045
    "/ something notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3046
    "/     something addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3047
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3048
    ^ self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3049
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3050
    "Created: / 18.2.2000 / 11:53:31 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3051
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3052
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3053
nameSpaceListUpdateTrigger:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3054
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3055
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3056
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3057
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3058
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3059
    "/ |holder|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3060
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3061
    "/ (holder := builder bindingAt:#namespaceListUpdateTrigger) notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3062
    "/     holder removeDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3063
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3064
    builder aspectAt:#nameSpaceListUpdateTrigger put:something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3065
    "/ something notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3066
    "/     something addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3067
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3068
    ^ self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3069
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3070
    "Created: / 18.2.2000 / 02:08:01 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3071
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3072
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3073
organizerMode:aValueHolder
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3074
    organizerMode notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3075
	organizerMode removeDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3076
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3077
    organizerMode := aValueHolder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3078
    organizerMode notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3079
	organizerMode addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3080
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3081
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3082
    "Created: / 18.2.2000 / 10:21:41 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3083
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3084
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3085
outGeneratorHolder:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3086
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3087
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3088
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3089
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3090
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3091
    "/ |holder|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3092
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3093
    "/ (holder := builder bindingAt:#outGeneratorHolder) notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3094
    "/     holder removeDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3095
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3096
    builder aspectAt:#outGeneratorHolder put:something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3097
    "/ something notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3098
    "/     something addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3099
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3100
    ^ self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3101
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3102
    "Created: / 18.2.2000 / 00:24:29 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3103
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3104
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3105
packageFilter:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3106
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3107
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3108
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3109
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3110
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3111
    "/ packageFilter notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3112
    "/     packageFilter removeDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3113
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3114
    packageFilter := something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3115
    "/ something notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3116
    "/     something addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3117
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3118
    ^ self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3119
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3120
    "Created: / 24.2.2000 / 23:46:16 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3121
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3122
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3123
projectDoubleClickChannel:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3124
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3125
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3126
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3127
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3128
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3129
    "/ |holder|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3130
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3131
    "/ (holder := builder bindingAt:#projectDoubleClickChannel) notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3132
    "/     holder removeDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3133
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3134
    builder aspectAt:#projectDoubleClickChannel put:something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3135
    "/ something notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3136
    "/     something addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3137
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3138
    ^ self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3139
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3140
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3141
projectListMenuHolder:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3142
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3143
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3144
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3145
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3146
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3147
    projectListMenuHolder := something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3148
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3149
    "Created: / 18.2.2000 / 11:53:31 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3150
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3151
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3152
projectListUpdateTrigger:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3153
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3154
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3155
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3156
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3157
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3158
    "/ |holder|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3159
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3160
    "/ (holder := builder bindingAt:#projectListUpdateTrigger) notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3161
    "/     holder removeDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3162
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3163
    builder aspectAt:#projectListUpdateTrigger put:something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3164
    "/ something notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3165
    "/     something addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3166
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3167
    ^ self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3168
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3169
    "Created: / 18.2.2000 / 02:08:01 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3170
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3171
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3172
selectedCategories:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3173
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3174
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3175
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3176
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3177
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3178
    selectedCategories := something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3179
    ^ self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3180
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3181
    "Created: / 18.2.2000 / 14:04:36 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3182
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3183
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3184
selectedClasses:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3185
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3186
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3187
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3188
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3189
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3190
    selectedClasses removeDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3191
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3192
    selectedClasses := something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3193
    something notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3194
	something addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3195
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3196
    ^ self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3197
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3198
    "Created: / 18.2.2000 / 00:24:29 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3199
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3200
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3201
selectedNamespaces:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3202
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3203
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3204
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3205
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3206
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3207
    selectedNamespaces := something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3208
    selectedNamespaces onChangeEvaluate:[
7886
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3209
        nameSpaceFilterSelection notNil ifTrue:[
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3210
            nameSpaceFilterSelection value:selectedNamespaces value.     
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3211
        ]
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3212
    ].
7886
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3213
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3214
    "Modified: / 05-11-2007 / 17:16:56 / cg"
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3215
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3216
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3217
selectedProjects:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3218
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3219
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3220
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3221
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3222
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3223
    selectedProjects := something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3224
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3225
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3226
selectionChangeCondition:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3227
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3228
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3229
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3230
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3231
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3232
    selectionChangeCondition := something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3233
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3234
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3235
showClassPackages:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3236
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3237
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3238
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3239
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3240
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3241
    showClassPackages := something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3242
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3243
7886
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3244
showMethodComplexity:aValueHolder
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3245
    "automatically generated by UIPainter ..."
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3246
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3247
    "This method is used when I am embedded as subApplication,"
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3248
    "and the mainApp wants to connect its aspects to mine."
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3249
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3250
    showMethodComplexity := aValueHolder.
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3251
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3252
    "Created: / 05-11-2007 / 16:56:18 / cg"
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3253
!
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3254
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3255
showMethodInheritance:aValueHolder
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3256
    "automatically generated by UIPainter ..."
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3257
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3258
    "This method is used when I am embedded as subApplication,"
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3259
    "and the mainApp wants to connect its aspects to mine."
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3260
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3261
    showMethodInheritance := aValueHolder.
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3262
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3263
    "Created: / 05-11-2007 / 16:55:12 / cg"
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3264
!
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3265
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3266
showMethodTypeIcon:aValueHolder
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3267
    "automatically generated by UIPainter ..."
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3268
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3269
    "This method is used when I am embedded as subApplication,"
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3270
    "and the mainApp wants to connect its aspects to mine."
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3271
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3272
    showMethodTypeIcon := aValueHolder.
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3273
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3274
    "Created: / 05-11-2007 / 16:57:02 / cg"
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3275
!
0d121740ae9c dummy aspects (for class-doc-browser)
Claus Gittinger <cg@exept.de>
parents: 7724
diff changeset
  3276
6722
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  3277
sortVariablesByName:something
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  3278
    "automatically generated by UIPainter ..."
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  3279
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  3280
    "This method is used when I am embedded as subApplication,"
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  3281
    "and the mainApp wants to connect its aspects to mine."
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  3282
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  3283
    sortVariablesByName := something.
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  3284
!
69ccb50d8e94 variableList (sort) fixed in hierarchy views
Claus Gittinger <cg@exept.de>
parents: 6398
diff changeset
  3285
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3286
variableDoubleClickChannel:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3287
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3288
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3289
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3290
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3291
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3292
    "/ |holder|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3293
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3294
    "/ (holder := builder bindingAt:#variableDoubleClickChannel) notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3295
    "/     holder removeDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3296
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3297
    builder aspectAt:#variableDoubleClickChannel put:something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3298
    "/ something notNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3299
    "/     something addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3300
    "/ ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3301
    ^ self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3302
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3303
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3304
variableFilter:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3305
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3306
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3307
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3308
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3309
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3310
    variableFilter := something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3311
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3312
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3313
variablesMenuHolder:something
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3314
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3315
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3316
    "This method is used when I am embedded as subApplication,"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3317
    "and the mainApp wants to connect its aspects to mine."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3318
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3319
    variablesMenuHolder := something.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3320
! !
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3321
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3322
!OrganizerCanvas methodsFor:'aspects-private'!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3323
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3324
categoryListSlaveMode
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3325
    categoryListSlaveMode isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3326
	categoryListSlaveMode := false asValue.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3327
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3328
    ^ categoryListSlaveMode
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3329
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3330
    "Created: / 18.2.2000 / 00:30:44 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3331
    "Modified: / 18.2.2000 / 02:56:21 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3332
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3333
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3334
classHierarchyListSlaveMode
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3335
    classHierarchyListSlaveMode isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3336
	classHierarchyListSlaveMode := true asValue.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3337
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3338
    ^ classHierarchyListSlaveMode
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3339
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3340
    "Created: / 18.2.2000 / 00:30:44 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3341
    "Modified: / 18.2.2000 / 02:56:21 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3342
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3343
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3344
classInheritanceListSlaveMode
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3345
    classInheritanceListSlaveMode isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3346
	classInheritanceListSlaveMode := true asValue.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3347
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3348
    ^ classInheritanceListSlaveMode
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3349
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3350
    "Modified: / 18.2.2000 / 02:56:21 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3351
    "Created: / 26.2.2000 / 00:09:18 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3352
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3353
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3354
classListSlaveMode
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3355
    classListSlaveMode isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3356
	classListSlaveMode := false asValue.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3357
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3358
    ^ classListSlaveMode
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3359
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3360
    "Created: / 18.2.2000 / 00:30:44 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3361
    "Modified: / 18.2.2000 / 02:56:21 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3362
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3363
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3364
nameSpaceListSlaveMode
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3365
    namespaceListSlaveMode isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3366
	namespaceListSlaveMode := true asValue.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3367
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3368
    ^ namespaceListSlaveMode
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3369
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3370
    "Created: / 18.2.2000 / 00:30:44 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3371
    "Modified: / 18.2.2000 / 02:56:21 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3372
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3373
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3374
projectListSlaveMode
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3375
    projectListSlaveMode isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3376
	projectListSlaveMode := true asValue.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3377
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3378
    ^ projectListSlaveMode
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3379
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3380
    "Created: / 18.2.2000 / 00:30:44 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3381
    "Modified: / 18.2.2000 / 02:56:21 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3382
! !
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3383
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3384
!OrganizerCanvas methodsFor:'aspects-trigger'!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3385
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3386
classCategoryListUpdateTrigger
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3387
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3388
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3389
    "*** the code below creates a default model when invoked."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3390
    "*** (which may not be the one you wanted)"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3391
    "*** Please change as required and accept it in the browser."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3392
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3393
    classCategoryListUpdateTrigger isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3394
	classCategoryListUpdateTrigger := TriggerValue new.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3395
"/        classCategoryListUpdateTrigger addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3396
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3397
    ^ classCategoryListUpdateTrigger.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3398
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3399
    "Created: / 18.2.2000 / 02:05:14 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3400
    "Modified: / 18.2.2000 / 02:14:04 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3401
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3402
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3403
classHierarchyUpdateTrigger
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3404
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3405
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3406
    "*** the code below creates a default model when invoked."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3407
    "*** (which may not be the one you wanted)"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3408
    "*** Please change as required and accept it in the browser."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3409
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3410
    |holder|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3411
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3412
    (holder := builder bindingAt:#classHierarchyUpdateTrigger) isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3413
	holder := TriggerValue new.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3414
	builder aspectAt:#classHierarchyUpdateTrigger put:holder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3415
"/        holder addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3416
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3417
    ^ holder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3418
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3419
    "Created: / 18.2.2000 / 02:05:14 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3420
    "Modified: / 18.2.2000 / 02:13:57 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3421
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3422
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3423
classListUpdateTrigger
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3424
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3425
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3426
    "*** the code below creates a default model when invoked."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3427
    "*** (which may not be the one you wanted)"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3428
    "*** Please change as required and accept it in the browser."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3429
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3430
    classListUpdateTrigger isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3431
	classListUpdateTrigger := TriggerValue new.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3432
"/        classListUpdateTrigger addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3433
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3434
    ^ classListUpdateTrigger.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3435
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3436
    "Created: / 18.2.2000 / 02:05:14 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3437
    "Modified: / 18.2.2000 / 02:14:08 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3438
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3439
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3440
forceClassCategoryGeneratorTrigger
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3441
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3442
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3443
    "*** the code below creates a default model when invoked."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3444
    "*** (which may not be the one you wanted)"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3445
    "*** Please change as required and accept it in the browser."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3446
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3447
    |holder|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3448
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3449
    (holder := builder bindingAt:#forceClassCategoryGeneratorTrigger) isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3450
	holder := TriggerValue new.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3451
	builder aspectAt:#forceClassCategoryGeneratorTrigger put:holder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3452
"/        holder addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3453
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3454
    ^ holder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3455
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3456
    "Created: / 18.2.2000 / 02:49:43 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3457
    "Modified: / 18.2.2000 / 02:52:30 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3458
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3459
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3460
forceClassHierarchyGeneratorTrigger
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3461
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3462
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3463
    "*** the code below creates a default model when invoked."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3464
    "*** (which may not be the one you wanted)"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3465
    "*** Please change as required and accept it in the browser."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3466
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3467
    |holder|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3468
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3469
    (holder := builder bindingAt:#forceClassHierarchyGeneratorTrigger) isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3470
	holder := TriggerValue new.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3471
	builder aspectAt:#forceClassHierarchyGeneratorTrigger put:holder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3472
"/        holder addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3473
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3474
    ^ holder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3475
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3476
    "Created: / 18.2.2000 / 02:49:43 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3477
    "Modified: / 18.2.2000 / 02:52:32 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3478
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3479
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3480
forceNamespaceGeneratorTrigger
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3481
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3482
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3483
    "*** the code below creates a default model when invoked."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3484
    "*** (which may not be the one you wanted)"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3485
    "*** Please change as required and accept it in the browser."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3486
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3487
    |holder|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3488
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3489
    (holder := builder bindingAt:#forceNamespaceGeneratorTrigger) isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3490
	holder := TriggerValue new.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3491
	builder aspectAt:#forceNamespaceGeneratorTrigger put:holder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3492
"/        holder addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3493
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3494
    ^ holder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3495
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3496
    "Created: / 18.2.2000 / 02:49:43 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3497
    "Modified: / 18.2.2000 / 02:52:35 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3498
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3499
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3500
forceProjectGeneratorTrigger
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3501
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3502
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3503
    "*** the code below creates a default model when invoked."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3504
    "*** (which may not be the one you wanted)"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3505
    "*** Please change as required and accept it in the browser."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3506
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3507
    |holder|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3508
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3509
    (holder := builder bindingAt:#forceProjectGeneratorTrigger) isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3510
	holder := TriggerValue new.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3511
	builder aspectAt:#forceProjectGeneratorTrigger put:holder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3512
"/        holder addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3513
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3514
    ^ holder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3515
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3516
    "Created: / 18.2.2000 / 02:49:43 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3517
    "Modified: / 18.2.2000 / 02:52:38 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3518
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3519
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3520
nameSpaceListUpdateTrigger
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3521
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3522
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3523
    "*** the code below creates a default model when invoked."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3524
    "*** (which may not be the one you wanted)"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3525
    "*** Please change as required and accept it in the browser."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3526
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3527
    |holder|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3528
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3529
    (holder := builder bindingAt:#nameSpaceListUpdateTrigger) isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3530
	holder := TriggerValue new.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3531
	builder aspectAt:#nameSpaceListUpdateTrigger put:holder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3532
"/        holder addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3533
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3534
    ^ holder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3535
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3536
    "Created: / 18.2.2000 / 02:05:14 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3537
    "Modified: / 18.2.2000 / 02:14:12 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3538
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3539
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3540
projectListUpdateTrigger
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3541
    "automatically generated by UIPainter ..."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3542
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3543
    "*** the code below creates a default model when invoked."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3544
    "*** (which may not be the one you wanted)"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3545
    "*** Please change as required and accept it in the browser."
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3546
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3547
    |holder|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3548
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3549
    (holder := builder bindingAt:#projectListUpdateTrigger) isNil ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3550
	holder := TriggerValue new.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3551
	builder aspectAt:#projectListUpdateTrigger put:holder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3552
"/        holder addDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3553
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3554
    ^ holder.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3555
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3556
    "Created: / 18.2.2000 / 02:05:14 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3557
    "Modified: / 18.2.2000 / 02:14:15 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3558
! !
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3559
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3560
!OrganizerCanvas methodsFor:'aspects-visibility'!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3561
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3562
categoryListShown
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3563
    categoryListShown isNil ifTrue:[
6734
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3564
        categoryListShown := BlockValue 
7724
0dbdacddc217 BlockValue usage cleanup
Claus Gittinger <cg@exept.de>
parents: 7704
diff changeset
  3565
                        with:[:v | v == OrganizerCanvas organizerModeCategory]
6734
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3566
                        argument:(self organizerMode).
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3567
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3568
    ^ categoryListShown
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3569
7724
0dbdacddc217 BlockValue usage cleanup
Claus Gittinger <cg@exept.de>
parents: 7704
diff changeset
  3570
    "Modified: / 08-03-2007 / 23:01:48 / cg"
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3571
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3572
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3573
classHierarchyNotShown
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3574
    |holder|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3575
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3576
    (holder := builder bindingAt:#classHierarchyNotShown) isNil ifTrue:[
6734
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3577
        holder := BlockValue 
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3578
                        with:[:v | |org|
7724
0dbdacddc217 BlockValue usage cleanup
Claus Gittinger <cg@exept.de>
parents: 7704
diff changeset
  3579
                                   org := v.
6734
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3580
                                   org ~~ OrganizerCanvas organizerModeHierarchy
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3581
                                   and:[org ~~ OrganizerCanvas organizerModeClassHierarchy
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3582
                                   and:[org ~~ OrganizerCanvas organizerModeClassInheritance]]]
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3583
                        argument:(self organizerMode).
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3584
        builder aspectAt:#classHierarchyNotShown put: holder
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3585
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3586
    ^ holder
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3587
7724
0dbdacddc217 BlockValue usage cleanup
Claus Gittinger <cg@exept.de>
parents: 7704
diff changeset
  3588
    "Created: / 18-02-2000 / 00:36:38 / cg"
0dbdacddc217 BlockValue usage cleanup
Claus Gittinger <cg@exept.de>
parents: 7704
diff changeset
  3589
    "Modified: / 08-03-2007 / 23:01:51 / cg"
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3590
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3592
classHierarchyOrInheritanceNotShown
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3593
    |holder|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3594
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3595
    (holder := builder bindingAt:#classHierarchyOrInheritanceNotShown) isNil ifTrue:[
7724
0dbdacddc217 BlockValue usage cleanup
Claus Gittinger <cg@exept.de>
parents: 7704
diff changeset
  3596
        holder := BlockValue 
0dbdacddc217 BlockValue usage cleanup
Claus Gittinger <cg@exept.de>
parents: 7704
diff changeset
  3597
                        with:[:v1 :v2 | (v1 or:[v2]) not]
0dbdacddc217 BlockValue usage cleanup
Claus Gittinger <cg@exept.de>
parents: 7704
diff changeset
  3598
                        argument:(self classHierarchyShown)
0dbdacddc217 BlockValue usage cleanup
Claus Gittinger <cg@exept.de>
parents: 7704
diff changeset
  3599
                        argument:(self classInheritanceShown).
0dbdacddc217 BlockValue usage cleanup
Claus Gittinger <cg@exept.de>
parents: 7704
diff changeset
  3600
        builder aspectAt:#classHierarchyOrInheritanceNotShown put: holder
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3601
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3602
    ^ holder
7724
0dbdacddc217 BlockValue usage cleanup
Claus Gittinger <cg@exept.de>
parents: 7704
diff changeset
  3603
0dbdacddc217 BlockValue usage cleanup
Claus Gittinger <cg@exept.de>
parents: 7704
diff changeset
  3604
    "Modified: / 08-03-2007 / 23:01:57 / cg"
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3605
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3606
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3607
classHierarchyOrInheritanceShown
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3608
    |holder|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3609
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3610
    (holder := builder bindingAt:#classHierarchyOrInheritanceShown) isNil ifTrue:[
7724
0dbdacddc217 BlockValue usage cleanup
Claus Gittinger <cg@exept.de>
parents: 7704
diff changeset
  3611
        holder := BlockValue 
0dbdacddc217 BlockValue usage cleanup
Claus Gittinger <cg@exept.de>
parents: 7704
diff changeset
  3612
                        with:[:v1 :v2 | v1 or:[v2] ]
0dbdacddc217 BlockValue usage cleanup
Claus Gittinger <cg@exept.de>
parents: 7704
diff changeset
  3613
                        argument:(self classHierarchyShown)
0dbdacddc217 BlockValue usage cleanup
Claus Gittinger <cg@exept.de>
parents: 7704
diff changeset
  3614
                        argument:(self classInheritanceShown).
0dbdacddc217 BlockValue usage cleanup
Claus Gittinger <cg@exept.de>
parents: 7704
diff changeset
  3615
        builder aspectAt:#classHierarchyOrInheritanceShown put: holder
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3616
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3617
    ^ holder
7724
0dbdacddc217 BlockValue usage cleanup
Claus Gittinger <cg@exept.de>
parents: 7704
diff changeset
  3618
0dbdacddc217 BlockValue usage cleanup
Claus Gittinger <cg@exept.de>
parents: 7704
diff changeset
  3619
    "Modified: / 08-03-2007 / 23:02:03 / cg"
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3620
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3621
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3622
classHierarchyShown
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3623
    |holder|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3624
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3625
    (holder := builder bindingAt:#classHierarchyShown) isNil ifTrue:[
6734
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3626
        holder := BlockValue 
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3627
                        with:[:v | |org|
7724
0dbdacddc217 BlockValue usage cleanup
Claus Gittinger <cg@exept.de>
parents: 7704
diff changeset
  3628
                                   org := v.
6734
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3629
                                   org == OrganizerCanvas organizerModeHierarchy
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3630
                                   or:[org == OrganizerCanvas organizerModeClassHierarchy]]
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3631
                        argument:(self organizerMode).
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3632
        builder aspectAt:#classHierarchyShown put: holder
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3633
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3634
    ^ holder
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3635
7724
0dbdacddc217 BlockValue usage cleanup
Claus Gittinger <cg@exept.de>
parents: 7704
diff changeset
  3636
    "Modified: / 08-03-2007 / 23:02:07 / cg"
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3637
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3638
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3639
classInheritanceShown
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3640
    |holder|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3641
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3642
    (holder := builder bindingAt:#classInheritanceShown) isNil ifTrue:[
6734
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3643
        holder := BlockValue 
7724
0dbdacddc217 BlockValue usage cleanup
Claus Gittinger <cg@exept.de>
parents: 7704
diff changeset
  3644
                        with:[:v | v == OrganizerCanvas organizerModeClassInheritance]
6734
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3645
                        argument:(self organizerMode).
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3646
        builder aspectAt:#classInheritanceShown put: holder
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3647
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3648
    ^ holder
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3649
7724
0dbdacddc217 BlockValue usage cleanup
Claus Gittinger <cg@exept.de>
parents: 7704
diff changeset
  3650
    "Created: / 24-02-2000 / 13:23:01 / cg"
0dbdacddc217 BlockValue usage cleanup
Claus Gittinger <cg@exept.de>
parents: 7704
diff changeset
  3651
    "Modified: / 08-03-2007 / 23:02:09 / cg"
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3652
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3653
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3654
classListShown
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3655
    |holder|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3656
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3657
    (holder := builder bindingAt:#classListShown) isNil ifTrue:[
6734
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3658
        holder := BlockValue 
7724
0dbdacddc217 BlockValue usage cleanup
Claus Gittinger <cg@exept.de>
parents: 7704
diff changeset
  3659
                        with:[:v | v ~~ OrganizerCanvas organizerModeHierarchy]
6734
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3660
                        argument:(self organizerMode).
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3661
        builder aspectAt:#classListShown put: holder
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3662
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3663
    ^ holder
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3664
7724
0dbdacddc217 BlockValue usage cleanup
Claus Gittinger <cg@exept.de>
parents: 7704
diff changeset
  3665
    "Modified: / 08-03-2007 / 23:02:12 / cg"
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3666
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3667
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3668
nameSpaceListShown
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3669
    |holder|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3670
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3671
    (holder := builder bindingAt:#nameSpaceListShown) isNil ifTrue:[
6734
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3672
        holder := BlockValue 
7724
0dbdacddc217 BlockValue usage cleanup
Claus Gittinger <cg@exept.de>
parents: 7704
diff changeset
  3673
                        with:[:v | v == OrganizerCanvas organizerModeNamespace]
6734
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3674
                        argument:(self organizerMode).
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3675
        builder aspectAt:#nameSpaceListShown put: holder
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3676
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3677
    ^ holder
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3678
7724
0dbdacddc217 BlockValue usage cleanup
Claus Gittinger <cg@exept.de>
parents: 7704
diff changeset
  3679
    "Created: / 18-02-2000 / 00:32:09 / cg"
0dbdacddc217 BlockValue usage cleanup
Claus Gittinger <cg@exept.de>
parents: 7704
diff changeset
  3680
    "Modified: / 08-03-2007 / 23:02:15 / cg"
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3681
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3682
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3683
projectListShown
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3684
    |holder|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3685
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3686
    (holder := builder bindingAt:#projectListShown) isNil ifTrue:[
6734
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3687
        holder := BlockValue 
7724
0dbdacddc217 BlockValue usage cleanup
Claus Gittinger <cg@exept.de>
parents: 7704
diff changeset
  3688
                        with:[:v | v == OrganizerCanvas organizerModeProject]
6734
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3689
                        argument:(self organizerMode).
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3690
        builder aspectAt:#projectListShown put: holder
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3691
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3692
    ^ holder
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3693
7724
0dbdacddc217 BlockValue usage cleanup
Claus Gittinger <cg@exept.de>
parents: 7704
diff changeset
  3694
    "Created: / 18-02-2000 / 00:32:09 / cg"
0dbdacddc217 BlockValue usage cleanup
Claus Gittinger <cg@exept.de>
parents: 7704
diff changeset
  3695
    "Modified: / 08-03-2007 / 23:02:18 / cg"
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3696
! !
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3697
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3698
!OrganizerCanvas methodsFor:'change & update'!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3699
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3700
update:something with:aParameter from:changedObject
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3701
    |orgMode trigger classes selectedClassesHolder selectionValue|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3702
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3703
    orgMode := organizerMode value.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3704
    selectedClassesHolder := self selectedClasses.
6914
fa172e660415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6908
diff changeset
  3705
    classes := selectedClassesHolder value copy ? #().
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3706
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3707
    changedObject == organizerMode ifTrue:[
6734
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3708
        self classHierarchyListSlaveMode value:true.
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3709
        self classInheritanceListSlaveMode value:true.
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3710
        self classListSlaveMode value:true.
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3711
        self categoryListSlaveMode value:true.
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3712
        self nameSpaceListSlaveMode value:true.
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3713
        self projectListSlaveMode value:true.
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3714
7482
11f79a53e3e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 7077
diff changeset
  3715
        self variableFilter value:nil.
11f79a53e3e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 7077
diff changeset
  3716
        self packageFilter value:nil.
11f79a53e3e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 7077
diff changeset
  3717
        self nameSpaceFilter value:nil.
6734
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3718
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3719
        "/ must update the packageFilter
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3720
        orgMode == OrganizerCanvas organizerModeProject ifTrue:[
6905
3e2cf6ca0c23 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6893
diff changeset
  3721
            self selectedProjects value:(classes collect:[:each | each package]) asSet.
6734
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3722
            packageFilter setValue:(self selectedProjects value)
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3723
        ] ifFalse:[
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3724
            packageFilter value:nil
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3725
        ].
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3726
6876
9b95bca11178 update when switching view-mode
Claus Gittinger <cg@exept.de>
parents: 6734
diff changeset
  3727
        self updateOrganizationFromChangedClass.
9b95bca11178 update when switching view-mode
Claus Gittinger <cg@exept.de>
parents: 6734
diff changeset
  3728
9b95bca11178 update when switching view-mode
Claus Gittinger <cg@exept.de>
parents: 6734
diff changeset
  3729
        orgMode == OrganizerCanvas organizerModeCategory ifTrue:[
9b95bca11178 update when switching view-mode
Claus Gittinger <cg@exept.de>
parents: 6734
diff changeset
  3730
            trigger := self forceClassCategoryGeneratorTrigger.
9b95bca11178 update when switching view-mode
Claus Gittinger <cg@exept.de>
parents: 6734
diff changeset
  3731
        ] ifFalse:[ orgMode == OrganizerCanvas organizerModeHierarchy ifTrue:[
9b95bca11178 update when switching view-mode
Claus Gittinger <cg@exept.de>
parents: 6734
diff changeset
  3732
            trigger := self forceClassHierarchyGeneratorTrigger.
9b95bca11178 update when switching view-mode
Claus Gittinger <cg@exept.de>
parents: 6734
diff changeset
  3733
        ] ifFalse:[ orgMode == OrganizerCanvas organizerModeNamespace ifTrue:[
9b95bca11178 update when switching view-mode
Claus Gittinger <cg@exept.de>
parents: 6734
diff changeset
  3734
            trigger := self forceNamespaceGeneratorTrigger
9b95bca11178 update when switching view-mode
Claus Gittinger <cg@exept.de>
parents: 6734
diff changeset
  3735
        ] ifFalse:[ orgMode == OrganizerCanvas organizerModeProject ifTrue:[
9b95bca11178 update when switching view-mode
Claus Gittinger <cg@exept.de>
parents: 6734
diff changeset
  3736
            trigger := self forceProjectGeneratorTrigger.
9b95bca11178 update when switching view-mode
Claus Gittinger <cg@exept.de>
parents: 6734
diff changeset
  3737
        ] ifFalse:[ ((orgMode == OrganizerCanvas organizerModeClassHierarchy) 
9b95bca11178 update when switching view-mode
Claus Gittinger <cg@exept.de>
parents: 6734
diff changeset
  3738
                  or:[orgMode == OrganizerCanvas organizerModeClassInheritance]) ifTrue:[
9b95bca11178 update when switching view-mode
Claus Gittinger <cg@exept.de>
parents: 6734
diff changeset
  3739
"/            trigger := self forceClassHierarchyGeneratorTrigger.
9b95bca11178 update when switching view-mode
Claus Gittinger <cg@exept.de>
parents: 6734
diff changeset
  3740
        ]]]]].
9b95bca11178 update when switching view-mode
Claus Gittinger <cg@exept.de>
parents: 6734
diff changeset
  3741
6734
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3742
        trigger notNil ifTrue:[
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3743
            trigger value:true
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3744
        ].
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3745
        "/ selectedClassesHolder value:classes.
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3746
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3747
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3748
        (orgMode == OrganizerCanvas organizerModeClassHierarchy or:[orgMode == OrganizerCanvas organizerModeHierarchy]) ifTrue:[
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3749
            classHierarchyListSlaveMode value:false.
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3750
        ].
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3751
        (orgMode == OrganizerCanvas organizerModeClassInheritance) ifTrue:[
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3752
            classInheritanceListSlaveMode value:false.
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3753
        ].
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3754
        (orgMode == OrganizerCanvas organizerModeClassInheritance 
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3755
        or:[orgMode == OrganizerCanvas organizerModeClassHierarchy 
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3756
        or:[orgMode == OrganizerCanvas organizerModeHierarchy]])
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3757
        ifFalse:[
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3758
            classListSlaveMode value:false.
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3759
        ].
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3760
        (orgMode == OrganizerCanvas organizerModeCategory) ifTrue:[
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3761
            categoryListSlaveMode value:false.
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3762
        ].
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3763
        (orgMode == OrganizerCanvas organizerModeNamespace) ifTrue:[
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3764
            namespaceListSlaveMode value:false.
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3765
        ].
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3766
        (orgMode == OrganizerCanvas organizerModeProject) ifTrue:[
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3767
            projectListSlaveMode value:false.
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3768
        ].
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3769
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3770
        ^ self
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3771
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3772
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3773
    changedObject == selectedClasses ifTrue:[
6734
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3774
        selectedClasses value size ~~ 0 ifTrue:[
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3775
            (orgMode ~~ OrganizerCanvas organizerModeClassHierarchy) ifTrue:[
6893
5b246a57bd94 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6890
diff changeset
  3776
                (orgMode ~~ OrganizerCanvas organizerModeProject) ifTrue:[
5b246a57bd94 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6890
diff changeset
  3777
                    self updateOrganizationFromChangedClass.
5b246a57bd94 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6890
diff changeset
  3778
                ]
6734
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3779
            ].
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3780
        ]
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3781
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3782
"/    changedObject == selectedNamespaces ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3783
"/ self halt.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3784
"/    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3785
    changedObject == nameSpaceFilterSelection ifTrue:[
6734
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3786
        selectionValue := nameSpaceFilterSelection value.
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3787
        selectionValue size > 1 ifTrue:[
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3788
            nameSpaceFilterSelection value:(OrderedCollection with:selectionValue first).
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3789
            selectionValue := nameSpaceFilterSelection value.
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3790
        ].
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3791
        self selectedNamespaces value:selectionValue.
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3792
        selectionValue size > 0 ifTrue:[
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3793
            self nameSpaceFilterSelectedNameSpace setValue:selectionValue first.
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3794
            self updateNameSpaceLabel.
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3795
        ].
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3796
        self nameSpaceFilter value: selectionValue.
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3797
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3798
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3799
    super update:something with:aParameter from:changedObject
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3800
7482
11f79a53e3e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 7077
diff changeset
  3801
    "Modified: / 27-10-2006 / 11:34:12 / cg"
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3802
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3803
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3804
updateCategorySelectionFromClasses
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3805
    |allEntry oldSelectedCategories categories|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3806
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3807
    allEntry := self class nameListEntryForALL.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3808
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3809
    categories := Set new.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3810
    oldSelectedCategories := self selectedCategories value.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3811
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3812
    "/ category-selection feedBack;
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3813
    "/ if '* all *' was in its selection, keep it (to avoid updating the classList)
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3814
    (oldSelectedCategories size > 0 
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3815
    and:[oldSelectedCategories includes:allEntry]) ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3816
	categories add:allEntry
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3817
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3818
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3819
    (self selectedClasses value ? #()) do:[:eachSelectedClass |
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3820
	|cat cls|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3821
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3822
	cls := eachSelectedClass theNonMetaclass.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3823
	cls isPrivate ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3824
	    cls := cls topOwningClass.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3825
	].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3826
	cat := cls category.   
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3827
	categories add:cat.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3828
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3829
    (categories conform:[:each | (self selectedCategories value ? #()) includes:each]) ifFalse:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3830
	self selectedCategories value:categories.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3831
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3832
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3833
    "Modified: / 18.2.2000 / 13:17:36 / cg"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3834
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3835
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3836
updateNamespaceSelectionFromClasses
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3837
    "invoked when switching to the namespace-organization;
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3838
     update selected namespaces from the set of selected classes"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3839
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3840
    |allEntry classes selectedNamespaces oldSelectedNamespaces|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3841
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3842
    allEntry := self class nameListEntryForALL.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3843
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3844
    classes := self selectedClasses value.
6878
bed17af9b5e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6876
diff changeset
  3845
    classes isEmptyOrNil ifTrue:[
bed17af9b5e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6876
diff changeset
  3846
        |categories includesAll|
bed17af9b5e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6876
diff changeset
  3847
bed17af9b5e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6876
diff changeset
  3848
        categories := self selectedCategories value.
bed17af9b5e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6876
diff changeset
  3849
        categories notEmptyOrNil ifTrue:[
bed17af9b5e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6876
diff changeset
  3850
            includesAll := categories includes:BrowserList nameListEntryForALL.
bed17af9b5e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6876
diff changeset
  3851
            classes :=  Smalltalk allClassesForWhich:[:aClass |
bed17af9b5e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6876
diff changeset
  3852
                (includesAll or:[categories includes:aClass category]).
bed17af9b5e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6876
diff changeset
  3853
            ].
bed17af9b5e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6876
diff changeset
  3854
        ].
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3855
    ].
6878
bed17af9b5e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6876
diff changeset
  3856
    classes notEmptyOrNil ifTrue:[
bed17af9b5e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6876
diff changeset
  3857
        selectedNamespaces := self selectedNamespaces value.
bed17af9b5e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6876
diff changeset
  3858
        oldSelectedNamespaces := (selectedNamespaces ? #()) asSet.
bed17af9b5e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6876
diff changeset
  3859
        selectedNamespaces := Set new.
bed17af9b5e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6876
diff changeset
  3860
bed17af9b5e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6876
diff changeset
  3861
        "/ namespace-selection feedBack;
bed17af9b5e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6876
diff changeset
  3862
        "/ if '* all *' was in its selection, keep it (to avoid updating the classList)
bed17af9b5e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6876
diff changeset
  3863
"/        (oldSelectedNamespaces includes:allEntry) ifTrue:[
bed17af9b5e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6876
diff changeset
  3864
"/            selectedNamespaces add:allEntry.
bed17af9b5e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6876
diff changeset
  3865
"/        ].
bed17af9b5e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6876
diff changeset
  3866
        selectedNamespaces addAll:(classes collect:[:eachClass | eachClass theNonMetaclass topNameSpace name.]).
bed17af9b5e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6876
diff changeset
  3867
bed17af9b5e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6876
diff changeset
  3868
        classes := classes copy.
bed17af9b5e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6876
diff changeset
  3869
        "/ selectedNamespaces ~= oldSelectedNamespaces ifTrue:[
bed17af9b5e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6876
diff changeset
  3870
            self selectedNamespaces value:selectedNamespaces.
bed17af9b5e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6876
diff changeset
  3871
        "/ ].
bed17af9b5e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6876
diff changeset
  3872
bed17af9b5e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6876
diff changeset
  3873
"/        (classes ~= self selectedClasses) value ifTrue:[self halt:'oops'].
bed17af9b5e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6876
diff changeset
  3874
    ].
bed17af9b5e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6876
diff changeset
  3875
bed17af9b5e8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6876
diff changeset
  3876
    "Modified: / 10-08-2006 / 16:04:55 / cg"
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3877
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3878
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3879
updateOrganizationFromChangedClass
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3880
    |orgMode selectedClassesHolder selectedClasses classHierarchyTopClassHolder commonSuperClass|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3881
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3882
    orgMode := organizerMode value.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3883
    selectedClassesHolder := self selectedClasses.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3884
    selectedClasses := selectedClassesHolder value.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3885
    classHierarchyTopClassHolder := self classHierarchyTopClass.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3886
6734
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3887
    orgMode == OrganizerCanvas organizerModeCategory ifTrue:[
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3888
        self updateCategorySelectionFromClasses.
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3889
        ^ self.
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3890
    ].
6734
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3891
    orgMode == OrganizerCanvas organizerModeNamespace ifTrue:[
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3892
        self updateNamespaceSelectionFromClasses.
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3893
        ^ self.
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3894
    ].
6734
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3895
    orgMode == OrganizerCanvas organizerModeProject ifTrue:[
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3896
        self updateProjectSelectionFromClasses.
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3897
        ^ self.
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3898
    ].
6734
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3899
    orgMode == OrganizerCanvas organizerModeHierarchy ifTrue:[
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3900
        classHierarchyTopClassHolder value:nil.
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3901
        ^ self.
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3902
    ].
6734
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3903
    (orgMode == OrganizerCanvas organizerModeClassHierarchy) ifTrue:[
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3904
"/        (selectedClasses size == 1) ifTrue:[
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3905
"/            self classHierarchyTopClass value:selectedClasses first
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3906
"/        ].
6734
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3907
        "/ classHierarchyTopClassHolder value isNil ifTrue:[
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3908
        selectedClasses size > 0 ifTrue:[
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3909
            commonSuperClass := selectedClasses 
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3910
                                    inject:selectedClasses first 
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3911
                                    into:[:commonSuperClass :thisClass | commonSuperClass commonSuperclass:thisClass ].
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3912
            classHierarchyTopClassHolder value:commonSuperClass "selectedClasses first".
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3913
        ].
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3914
        "/ ].
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3915
        ^ self.
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3916
    ].
6734
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3917
    (orgMode == OrganizerCanvas organizerModeClassInheritance) ifTrue:[
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3918
        classHierarchyTopClassHolder value:
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3919
            ((selectedClasses size == 1) ifTrue:[selectedClasses first] ifFalse:nil).
bdc9d1ea8d6d magic constants (organizerMode) removed
Claus Gittinger <cg@exept.de>
parents: 6731
diff changeset
  3920
        ^ self.
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3921
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3922
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3923
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3924
updateProjectSelectionFromClasses
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3925
    "invoked when switching to the projects-organization;
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3926
     update selected projects from the set of selected classes"
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3927
7668
a972119547d3 bugfix: test for selected categories is unspecified
ca
parents: 7664
diff changeset
  3928
    |allEntry classes selectedProjects oldSelectedProjects categories|
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3929
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3930
    allEntry := self class nameListEntryForALL.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3931
7664
a6ad7a99ddad auto-select project when switching from category to project view
Claus Gittinger <cg@exept.de>
parents: 7518
diff changeset
  3932
    selectedProjects := self selectedProjects value.
a6ad7a99ddad auto-select project when switching from category to project view
Claus Gittinger <cg@exept.de>
parents: 7518
diff changeset
  3933
    oldSelectedProjects := (selectedProjects ? #()) asSet.
a6ad7a99ddad auto-select project when switching from category to project view
Claus Gittinger <cg@exept.de>
parents: 7518
diff changeset
  3934
6876
9b95bca11178 update when switching view-mode
Claus Gittinger <cg@exept.de>
parents: 6734
diff changeset
  3935
    variableFilter value:nil.
9b95bca11178 update when switching view-mode
Claus Gittinger <cg@exept.de>
parents: 6734
diff changeset
  3936
    packageFilter value:nil.
9b95bca11178 update when switching view-mode
Claus Gittinger <cg@exept.de>
parents: 6734
diff changeset
  3937
    nameSpaceFilter value:nil.
9b95bca11178 update when switching view-mode
Claus Gittinger <cg@exept.de>
parents: 6734
diff changeset
  3938
7664
a6ad7a99ddad auto-select project when switching from category to project view
Claus Gittinger <cg@exept.de>
parents: 7518
diff changeset
  3939
    selectedProjects := Set new.
a6ad7a99ddad auto-select project when switching from category to project view
Claus Gittinger <cg@exept.de>
parents: 7518
diff changeset
  3940
    "/ project-selection feedBack;
a6ad7a99ddad auto-select project when switching from category to project view
Claus Gittinger <cg@exept.de>
parents: 7518
diff changeset
  3941
    "/ if '* all *' was in its selection, keep it (to avoid updating the classList)
a6ad7a99ddad auto-select project when switching from category to project view
Claus Gittinger <cg@exept.de>
parents: 7518
diff changeset
  3942
    (oldSelectedProjects size > 0 
a6ad7a99ddad auto-select project when switching from category to project view
Claus Gittinger <cg@exept.de>
parents: 7518
diff changeset
  3943
    and:[oldSelectedProjects includes:allEntry]) 
a6ad7a99ddad auto-select project when switching from category to project view
Claus Gittinger <cg@exept.de>
parents: 7518
diff changeset
  3944
    ifTrue:[
a6ad7a99ddad auto-select project when switching from category to project view
Claus Gittinger <cg@exept.de>
parents: 7518
diff changeset
  3945
        selectedProjects add:allEntry.
a6ad7a99ddad auto-select project when switching from category to project view
Claus Gittinger <cg@exept.de>
parents: 7518
diff changeset
  3946
    ].
a6ad7a99ddad auto-select project when switching from category to project view
Claus Gittinger <cg@exept.de>
parents: 7518
diff changeset
  3947
a6ad7a99ddad auto-select project when switching from category to project view
Claus Gittinger <cg@exept.de>
parents: 7518
diff changeset
  3948
    classes := self selectedClasses value.
a6ad7a99ddad auto-select project when switching from category to project view
Claus Gittinger <cg@exept.de>
parents: 7518
diff changeset
  3949
    classes isEmptyOrNil ifTrue:[
a6ad7a99ddad auto-select project when switching from category to project view
Claus Gittinger <cg@exept.de>
parents: 7518
diff changeset
  3950
        classes := OrderedCollection new.
7668
a972119547d3 bugfix: test for selected categories is unspecified
ca
parents: 7664
diff changeset
  3951
        categories := self selectedCategories value.
a972119547d3 bugfix: test for selected categories is unspecified
ca
parents: 7664
diff changeset
  3952
        categories notEmptyOrNil ifTrue:[
a972119547d3 bugfix: test for selected categories is unspecified
ca
parents: 7664
diff changeset
  3953
            categories do:[:eachCategory |
a972119547d3 bugfix: test for selected categories is unspecified
ca
parents: 7664
diff changeset
  3954
                classes addAll:(Smalltalk allClassesInCategory:eachCategory)
a972119547d3 bugfix: test for selected categories is unspecified
ca
parents: 7664
diff changeset
  3955
            ].
7664
a6ad7a99ddad auto-select project when switching from category to project view
Claus Gittinger <cg@exept.de>
parents: 7518
diff changeset
  3956
        ].
a6ad7a99ddad auto-select project when switching from category to project view
Claus Gittinger <cg@exept.de>
parents: 7518
diff changeset
  3957
    ].
6876
9b95bca11178 update when switching view-mode
Claus Gittinger <cg@exept.de>
parents: 6734
diff changeset
  3958
    classes notEmptyOrNil ifTrue:[
9b95bca11178 update when switching view-mode
Claus Gittinger <cg@exept.de>
parents: 6734
diff changeset
  3959
        classes do:[:eachClass |
6890
bb8cb4339367 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6878
diff changeset
  3960
            selectedProjects add:(eachClass package).
7518
ed3aadc635e5 changed #updateProjectSelectionFromClasses
Claus Gittinger <cg@exept.de>
parents: 7482
diff changeset
  3961
            eachClass instAndClassSelectorsAndMethodsDo:[:sel :mthd |
6876
9b95bca11178 update when switching view-mode
Claus Gittinger <cg@exept.de>
parents: 6734
diff changeset
  3962
                selectedProjects add:(mthd package).
9b95bca11178 update when switching view-mode
Claus Gittinger <cg@exept.de>
parents: 6734
diff changeset
  3963
            ]
9b95bca11178 update when switching view-mode
Claus Gittinger <cg@exept.de>
parents: 6734
diff changeset
  3964
        ].
7664
a6ad7a99ddad auto-select project when switching from category to project view
Claus Gittinger <cg@exept.de>
parents: 7518
diff changeset
  3965
    ].
a6ad7a99ddad auto-select project when switching from category to project view
Claus Gittinger <cg@exept.de>
parents: 7518
diff changeset
  3966
a6ad7a99ddad auto-select project when switching from category to project view
Claus Gittinger <cg@exept.de>
parents: 7518
diff changeset
  3967
    selectedProjects ~= oldSelectedProjects ifTrue:[
a6ad7a99ddad auto-select project when switching from category to project view
Claus Gittinger <cg@exept.de>
parents: 7518
diff changeset
  3968
        self selectedProjects value:selectedProjects.
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3969
    ].
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3970
6876
9b95bca11178 update when switching view-mode
Claus Gittinger <cg@exept.de>
parents: 6734
diff changeset
  3971
    "Created: / 26-02-2000 / 01:09:13 / cg"
7664
a6ad7a99ddad auto-select project when switching from category to project view
Claus Gittinger <cg@exept.de>
parents: 7518
diff changeset
  3972
    "Modified: / 22-02-2007 / 13:52:21 / cg"
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3973
! !
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3974
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3975
!OrganizerCanvas methodsFor:'forwarder operations'!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3976
8012
c17bd358835f Allow to copy methods with drag&drop (CTRL-key must be pressed)
Stefan Vogel <sv@exept.de>
parents: 8006
diff changeset
  3977
copyMethods:methods toClass:cls
c17bd358835f Allow to copy methods with drag&drop (CTRL-key must be pressed)
Stefan Vogel <sv@exept.de>
parents: 8006
diff changeset
  3978
    self masterApplication copyMethods:methods toClass:cls.
c17bd358835f Allow to copy methods with drag&drop (CTRL-key must be pressed)
Stefan Vogel <sv@exept.de>
parents: 8006
diff changeset
  3979
!
c17bd358835f Allow to copy methods with drag&drop (CTRL-key must be pressed)
Stefan Vogel <sv@exept.de>
parents: 8006
diff changeset
  3980
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3981
moveClasses:classes toCategory:cat
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3982
    self masterApplication moveClasses:classes toCategory:cat
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3983
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3984
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3985
moveClasses:classes toProject:cat
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3986
    self masterApplication moveClasses:classes toProject:cat
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3987
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3988
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3989
moveMethods:methods toClass:cls
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3990
    self masterApplication moveMethods:methods toClass:cls.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3991
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3992
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3993
moveMethods:methods toProject:package
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3994
    self masterApplication moveMethods:methods toProject:package.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3995
! !
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3996
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3997
!OrganizerCanvas methodsFor:'private'!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3998
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  3999
nameSpaceListWidgetWasBuilt:widget
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  4000
    |list|
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  4001
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  4002
    "/ sigh - cannot do this in the nameSpaceListWidget method,
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  4003
    "/ because the GUI is build late (when the menu is popped up the first time)
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  4004
    widget application immediateUpdate:true.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  4005
    list := widget builder componentAt:#List.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  4006
    list autoHideHorizontalScrollBar:true.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  4007
!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  4008
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  4009
release
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  4010
    super release.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  4011
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  4012
    nameSpaceFilterSelection removeDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  4013
    organizerMode removeDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  4014
    selectedClasses removeDependent:self.
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  4015
! !
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  4016
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  4017
!OrganizerCanvas class methodsFor:'documentation'!
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  4018
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  4019
version
8359
Claus Gittinger <cg@exept.de>
parents: 8012
diff changeset
  4020
    ^ '$Header: /cvs/stx/stx/libtool/Tools_OrganizerCanvas.st,v 1.28 2008-10-20 14:44:59 cg Exp $'
5591
273637686948 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  4021
! !