equal
deleted
inserted
replaced
118 ^ self |
118 ^ self |
119 |
119 |
120 ! |
120 ! |
121 |
121 |
122 labels:listOfLabels minorKeys:listOfMinorKeys majorKey:aMajorKey |
122 labels:listOfLabels minorKeys:listOfMinorKeys majorKey:aMajorKey |
123 "setup for labels, selectors and class provider |
123 "setup for labels, selectors and class provider" |
124 " |
124 |
125 self labels:listOfLabels. |
125 self list:listOfLabels. |
126 minorKeys := listOfMinorKeys. |
126 minorKeys := listOfMinorKeys. |
127 majorKey := aMajorKey. |
127 majorKey := aMajorKey. |
|
128 |
|
129 "Modified (comment): / 31-03-2017 / 18:06:25 / stefan" |
128 ! |
130 ! |
129 |
131 |
130 majorKey |
132 majorKey |
131 "get the class providing the window specifications |
133 "get the class providing the window specifications |
132 " |
134 " |