equal
deleted
inserted
replaced
474 model setValue:nil. |
474 model setValue:nil. |
475 self fileList sortBlock:aBlock. |
475 self fileList sortBlock:aBlock. |
476 model value:sel withoutNotifying:self. |
476 model value:sel withoutNotifying:self. |
477 ! |
477 ! |
478 |
478 |
|
479 expandSelectedItems |
|
480 " expand the selected item if one directory selected" |
|
481 |
|
482 | items | |
|
483 |
|
484 items := self selectedDirectoryItems. |
|
485 Transcript showCR:(items printString). |
|
486 items do:[:aItem | |
|
487 aItem expand |
|
488 ]. |
|
489 ! |
|
490 |
479 setMatchBlockForList:list |
491 setMatchBlockForList:list |
480 |
492 |
481 | selection matchBlock filterBlock viewFiles| |
493 | selection matchBlock filterBlock viewFiles| |
482 |
494 |
483 selection := self selectedItems. |
495 selection := self selectedItems. |
1240 ! ! |
1252 ! ! |
1241 |
1253 |
1242 !DirectoryTreeBrowser class methodsFor:'documentation'! |
1254 !DirectoryTreeBrowser class methodsFor:'documentation'! |
1243 |
1255 |
1244 version |
1256 version |
1245 ^ '$Header: /cvs/stx/stx/libtool/DirectoryTreeBrowser.st,v 1.58 2003-04-02 21:48:25 cg Exp $' |
1257 ^ '$Header: /cvs/stx/stx/libtool/DirectoryTreeBrowser.st,v 1.59 2003-04-08 12:01:58 penk Exp $' |
1246 ! ! |
1258 ! ! |