--- a/DirectoryContentsBrowser.st	Thu Feb 28 22:46:18 2013 +0000
+++ b/DirectoryContentsBrowser.st	Tue Mar 05 18:10:46 2013 +0000
@@ -72,6 +72,7 @@
 "
 ! !
 
+
 !DirectoryContentsBrowser class methodsFor:'instance creation'!
 
 openIn:aDirectory
@@ -102,6 +103,7 @@
     "
 ! !
 
+
 !DirectoryContentsBrowser class methodsFor:'classAccess'!
 
 itemClass
@@ -114,6 +116,7 @@
 "
 ! !
 
+
 !DirectoryContentsBrowser class methodsFor:'constant'!
 
 updateTaskCyleTime
@@ -131,6 +134,7 @@
     ^ 8
 ! !
 
+
 !DirectoryContentsBrowser class methodsFor:'image specs'!
 
 detailsMenuIconDown
@@ -165,6 +169,7 @@
     ^ DataSetLabel sortIndicator
 ! !
 
+
 !DirectoryContentsBrowser class methodsFor:'interface specs'!
 
 tableColumns
@@ -466,6 +471,7 @@
       )
 ! !
 
+
 !DirectoryContentsBrowser class methodsFor:'menu specs'!
 
 directoryContentsBrowserMenu
@@ -844,6 +850,7 @@
       )
 ! !
 
+
 !DirectoryContentsBrowser methodsFor:'accessing'!
 
 allItems
@@ -1051,6 +1058,7 @@
     ^ updateContentsSelection
 ! !
 
+
 !DirectoryContentsBrowser methodsFor:'actions'!
 
 browserItemListAdd:addItemCol remove:remItemCol
@@ -1252,6 +1260,7 @@
     self startDiskUsageInfoProcess.
 ! !
 
+
 !DirectoryContentsBrowser methodsFor:'aspects'!
 
 browserItemList
@@ -1318,6 +1327,7 @@
     ^ self viewTime
 ! !
 
+
 !DirectoryContentsBrowser methodsFor:'aspects-visibility'!
 
 colVisibilityAspectFor:aKey ifAbsent:absentBlock
@@ -1415,6 +1425,7 @@
     ^ self colVisibilityAspectFor:#viewType ifAbsent:[ false asValue ].
 ! !
 
+
 !DirectoryContentsBrowser methodsFor:'change & update'!
 
 currentFileNameHolderChanged
@@ -1631,6 +1642,7 @@
     "Modified: / 27-03-2007 / 08:46:28 / cg"
 ! !
 
+
 !DirectoryContentsBrowser methodsFor:'drag & drop'!
 
 doStartDrag:aDropSource in:aView
@@ -1765,6 +1777,7 @@
                  )
 ! !
 
+
 !DirectoryContentsBrowser methodsFor:'event handling'!
 
 processEvent:anEvent
@@ -1836,6 +1849,7 @@
     "Modified: / 25-07-2006 / 09:08:16 / cg"
 ! !
 
+
 !DirectoryContentsBrowser methodsFor:'initialization'!
 
 initialize
@@ -1853,6 +1867,7 @@
     "Modified: / 07-01-2012 / 16:34:25 / cg"
 ! !
 
+
 !DirectoryContentsBrowser methodsFor:'menu accessing'!
 
 viewBrowserMenu
@@ -1872,6 +1887,7 @@
     ^ menu
 ! !
 
+
 !DirectoryContentsBrowser methodsFor:'menu actions'!
 
 doShowFileContents
@@ -1894,6 +1910,7 @@
     ].
 ! !
 
+
 !DirectoryContentsBrowser methodsFor:'queries'!
 
 allItemsOfCurrentDirectory
@@ -1922,6 +1939,7 @@
     ^ self allItems size ~~ browserItemList size
 ! !
 
+
 !DirectoryContentsBrowser methodsFor:'selection'!
 
 selectAll
@@ -2023,6 +2041,8 @@
     selection isSequenceable ifFalse:[
         selection := OrderedCollection with:selection.
     ].
+    selection := selection reject:[:e | e isNil].
+    selection isEmpty ifTrue:[ ^ #()].
     selection := selection copyAsOrderedCollection.
     (self viewDirsInContentsBrowser value and:[browserItemList notEmpty]) ifTrue:[
         selection removeIdentical:(browserItemList first) ifAbsent:[nil]
@@ -2030,6 +2050,7 @@
     ^ selection.
 ! !
 
+
 !DirectoryContentsBrowser methodsFor:'startup & release'!
 
 makeDependent
@@ -2080,6 +2101,7 @@
     ^ super releaseAsSubCanvas.
 ! !
 
+
 !DirectoryContentsBrowser methodsFor:'update columns cycle'!
 
 findNextItemFor:aConditionBlock
@@ -2352,6 +2374,7 @@
     "Modified: / 20-03-2012 / 13:05:28 / cg"
 ! !
 
+
 !DirectoryContentsBrowser methodsFor:'update task'!
 
 createItemList
@@ -2710,6 +2733,7 @@
     "Modified: / 20-03-2012 / 13:07:22 / cg"
 ! !
 
+
 !DirectoryContentsBrowser methodsFor:'update task trigger'!
 
 wakeUp
@@ -2751,6 +2775,7 @@
     self wakeUp.
 ! !
 
+
 !DirectoryContentsBrowser methodsFor:'update task-disk usage'!
 
 diskUsageInKiloBytesFor:aDirectory
@@ -2896,6 +2921,7 @@
         ] fork.
 ! !
 
+
 !DirectoryContentsBrowser::DirectoryContentsItem class methodsFor:'instance creation'!
 
 fileName:aFilename 
@@ -2928,6 +2954,7 @@
     ^ instance
 ! !
 
+
 !DirectoryContentsBrowser::DirectoryContentsItem methodsFor:'accessing'!
 
 fileInfo:something
@@ -3118,6 +3145,7 @@
 
 ! !
 
+
 !DirectoryContentsBrowser::DirectoryContentsItem methodsFor:'actions'!
 
 resetImageFile
@@ -3142,6 +3170,7 @@
     mimeType := nil.
 ! !
 
+
 !DirectoryContentsBrowser::DirectoryContentsItem methodsFor:'change queries'!
 
 hasBeenModified
@@ -3171,6 +3200,7 @@
     ^ false
 ! !
 
+
 !DirectoryContentsBrowser::DirectoryContentsItem methodsFor:'comparing'!
 
 = anItem
@@ -3185,6 +3215,7 @@
     ^ fileName hash
 ! !
 
+
 !DirectoryContentsBrowser::DirectoryContentsItem methodsFor:'presentation'!
 
 baseName
@@ -3389,6 +3420,7 @@
     ^ modTime printStringFormat:format.
 ! !
 
+
 !DirectoryContentsBrowser::DirectoryContentsItem methodsFor:'printing'!
 
 printOn:aStream
@@ -3399,6 +3431,7 @@
         nextPut:$]. 
 ! !
 
+
 !DirectoryContentsBrowser::DirectoryContentsItem methodsFor:'private'!
 
 getFileInfo
@@ -3412,6 +3445,7 @@
     ^ fileInfo
 ! !
 
+
 !DirectoryContentsBrowser::DirectoryContentsItem methodsFor:'queries'!
 
 beRemoteDirectory
@@ -3446,14 +3480,15 @@
     ^ mimeTypeForContents
 ! !
 
+
 !DirectoryContentsBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.253 2013-01-29 10:49:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.254 2013-02-20 15:24:21 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.253 2013-01-29 10:49:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.254 2013-02-20 15:24:21 cg Exp $'
 !
 
 version_HG