tim Rowledge uploaded a new version of Tools to project The Trunk:
http://source.squeak.org/trunk/Tools-tpr.783.mcz

==================== Summary ====================

Name: Tools-tpr.783
Author: tpr
Time: 27 December 2017, 3:05:37.548886 pm
UUID: ec5d9e01-4d82-434d-8788-a3610092b229
Ancestors: Tools-tpr.782

Small tidy ups for subdirectory handling

=============== Diff against Tools-tpr.782 ===============

Item was changed:
  ----- Method: FileAbstractSelectionDialog>>hasMoreDirectories: (in category 'directory tree') -----
  hasMoreDirectories: aDirectory
  	"The directory tree morph needs to know if a specific directory has subdirectories; we cache the answer to speed up later visits to the same directory"
  
  	^directoryCache at: aDirectory ifAbsentPut:[
+ 		[aDirectory hasSubDirectories] on: Error do:[:ex| true].
- 		[aDirectory directoryNames notEmpty] on: Error do:[:ex| true].
  	].!

Item was changed:
  ----- Method: FileAbstractSelectionDialog>>rootDirectoryList (in category 'directory tree') -----
  rootDirectoryList
  	"Return a list of know root directories; forms the root nodes ot the directory tree morph"
  
  	| dirList dir |
+ 	dir := FileDirectory root.
+ 	dirList := self subDirectoriesOf: dir.
- 	dir := FileDirectory on: ''.
- 	dirList := dir directoryNames collect:[:each| dir directoryNamed: each]..
  	dirList isEmpty ifTrue:[dirList := Array with: FileDirectory default].
+ 	^dirList ,(ServerDirectory servers values) "looks odd because #servers returns the Dictionary of known servers with local names instead of the actaul server directories"!
- 	^dirList!