--- a/FileBrowserV2.st	Tue Sep 18 09:42:45 2007 +0200
+++ b/FileBrowserV2.st	Tue Sep 18 09:42:54 2007 +0200
@@ -1468,12 +1468,11 @@
 !
 
 selectedDeviceDriveChanged
-
     | newDrive curSel newFile|
 
     newDrive := self selectedDeviceDrive value.
     curSel := self currentSelectedObjects.
-    curSel notEmpty ifTrue:[
+    curSel notEmptyOrNil ifTrue:[
         curSel first volume = newDrive ifTrue:[ ^self].
     ].
 
@@ -1485,13 +1484,12 @@
             ^self.
         ].
     ].
-    curSel notEmpty ifTrue:[
-        self selectedDeviceDrive value:(curSel first volume).
-    ] ifFalse:[
-        self selectedDeviceDrive value:'C:'.
-    ].
+    self selectedDeviceDrive 
+        value:(curSel notEmptyOrNil 
+                ifTrue:[curSel first volume]
+                ifFalse:['C:']).
 
-    "Modified: / 04-12-2006 / 13:15:55 / cg"
+    "Modified: / 18-09-2007 / 09:41:30 / cg"
 !
 
 selectedImage
@@ -1869,7 +1867,7 @@
 !FileBrowserV2 class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowserV2.st,v 1.171 2007-05-21 13:12:12 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowserV2.st,v 1.172 2007-09-18 07:42:54 cg Exp $'
 ! !
 
 FileBrowserV2 initialize!