win32 volume fix;
authorClaus Gittinger <cg@exept.de>
Thu, 24 Sep 1998 20:50:56 +0200
changeset 1143 48ead61ffc0d
parent 1142 7b3334a7c658
child 1144 a96b22aea1f4
win32 volume fix; ignroe on my own selection changes.
FileSelectionTree.st
--- a/FileSelectionTree.st	Thu Sep 24 18:42:55 1998 +0200
+++ b/FileSelectionTree.st	Thu Sep 24 20:50:56 1998 +0200
@@ -596,7 +596,8 @@
 
     multipleSelectOk ifFalse:[
         (new := self pathnameAtIndex:selection) = old ifFalse:[
-            selectionHolder value:new
+"/            selectionHolder value:new.
+            selectionHolder value:new withoutNotifying:self.
         ]
     ] ifTrue:[
         self numberOfSelections == 0 ifTrue:[
@@ -618,6 +619,7 @@
         ]
     ]
 
+    "Modified: / 24.9.1998 / 19:25:55 / cg"
 ! !
 
 !FileSelectionTree methodsFor:'private'!
@@ -640,7 +642,11 @@
     p1 :=  Filename components:p1.
     p2 := (Filename components:p2) copyFrom:(p1 size).
 
-  ^ model detectItem:[:aNode :name| aNode name = name ] arguments:p2.
+    ^ model 
+        detectItem:[:aNode :name | aNode name = name ] 
+        arguments:p2.
+
+    "Modified: / 24.9.1998 / 18:22:44 / cg"
 !
 
 makeLegalFilename:aFile
@@ -764,5 +770,5 @@
 !FileSelectionTree class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/FileSelectionTree.st,v 1.19 1998-09-24 16:42:55 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/FileSelectionTree.st,v 1.20 1998-09-24 18:50:56 cg Exp $'
 ! !