equal
deleted
inserted
replaced
2167 ] |
2167 ] |
2168 ]. |
2168 ]. |
2169 item := node contents. |
2169 item := node contents. |
2170 item toAspects:aspects. |
2170 item toAspects:aspects. |
2171 |
2171 |
|
2172 myClass := self class. |
2172 item isSeparator ifFalse:[ |
2173 item isSeparator ifFalse:[ |
2173 myClass := self class. |
|
2174 node parent isNil ifFalse:[ |
2174 node parent isNil ifFalse:[ |
2175 node hasChildren ifTrue:[ |
2175 node hasChildren ifTrue:[ |
2176 slc := #slicesMenu |
2176 slc := #slicesMenu |
2177 ] ifFalse:[ |
2177 ] ifFalse:[ |
2178 item submenuChannel isNil ifTrue:[slc := #slicesItem] |
2178 item submenuChannel isNil ifTrue:[slc := #slicesItem] |
2212 ] |
2212 ] |
2213 ]. |
2213 ]. |
2214 self updateChannels. |
2214 self updateChannels. |
2215 aspects do: [:holder| holder addDependent:self]. |
2215 aspects do: [:holder| holder addDependent:self]. |
2216 |
2216 |
2217 "Modified: / 14.8.1998 / 14:52:32 / cg" |
2217 "Modified: / 4.2.1999 / 17:37:54 / cg" |
2218 ! |
2218 ! |
2219 |
2219 |
2220 tabSelection: aSelection |
2220 tabSelection: aSelection |
2221 "put the section aSelection into the note book" |
2221 "put the section aSelection into the note book" |
2222 |
2222 |