no change
authorClaus Gittinger <cg@exept.de>
Thu, 24 Sep 1998 22:09:24 +0200
changeset 1145 3ee5513dff2a
parent 1144 a96b22aea1f4
child 1146 c15c713b9df6
no change
SelInTree.st
SelectionInTree.st
--- a/SelInTree.st	Thu Sep 24 20:51:20 1998 +0200
+++ b/SelInTree.st	Thu Sep 24 22:09:24 1998 +0200
@@ -784,21 +784,25 @@
             ^ false
         ].
         node := indicatorList removeFirst.      "/ run task on first node
-
         node hasValidIndicator ifTrue:[         "/ up to date
             ^ true
         ].
         node setShowIndicator:false             "/ disable registry
     ].
 
-    (DirectoryContents directoryNamed:(node fileName) detect:(node matchAction)) ifTrue:[
+    (DirectoryContents 
+        directoryNamed:(node fileName) 
+        detect:(node matchAction)) 
+    ifTrue:[
         node showIndicator:true
     ].
     ^ true
+
+    "Modified: / 24.9.1998 / 21:13:24 / cg"
 ! !
 
 !SelectionInTree class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/Attic/SelInTree.st,v 1.15 1998-06-02 11:37:24 tz Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/Attic/SelInTree.st,v 1.16 1998-09-24 20:09:24 cg Exp $'
 ! !
--- a/SelectionInTree.st	Thu Sep 24 20:51:20 1998 +0200
+++ b/SelectionInTree.st	Thu Sep 24 22:09:24 1998 +0200
@@ -784,21 +784,25 @@
             ^ false
         ].
         node := indicatorList removeFirst.      "/ run task on first node
-
         node hasValidIndicator ifTrue:[         "/ up to date
             ^ true
         ].
         node setShowIndicator:false             "/ disable registry
     ].
 
-    (DirectoryContents directoryNamed:(node fileName) detect:(node matchAction)) ifTrue:[
+    (DirectoryContents 
+        directoryNamed:(node fileName) 
+        detect:(node matchAction)) 
+    ifTrue:[
         node showIndicator:true
     ].
     ^ true
+
+    "Modified: / 24.9.1998 / 21:13:24 / cg"
 ! !
 
 !SelectionInTree class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTree.st,v 1.15 1998-06-02 11:37:24 tz Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTree.st,v 1.16 1998-09-24 20:09:24 cg Exp $'
 ! !