*** empty log message ***
authorpenk
Wed, 14 May 2003 19:46:05 +0200
changeset 4894 417aa8531997
parent 4893 39dec723f6ad
child 4895 ccc8b0f0b666
*** empty log message ***
DirectoryContentsBrowser.st
--- a/DirectoryContentsBrowser.st	Wed May 14 19:43:33 2003 +0200
+++ b/DirectoryContentsBrowser.st	Wed May 14 19:46:05 2003 +0200
@@ -1991,7 +1991,7 @@
         remItems := oldItems. 
     ] ifFalse:[
         "/ MERGE WITH CURRENT CONTENTS
-        oldItems reverseDo:[:anOldItem|
+        oldItems copy do:[:anOldItem|
             "/ remove no longer valid files
             (newItems detectLast:[:aNewItem| aNewItem = anOldItem] ifNone:nil) isNil ifTrue:[
                 remItems add:anOldItem.
@@ -2822,5 +2822,5 @@
 !DirectoryContentsBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.107 2003-05-14 08:30:17 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.108 2003-05-14 17:46:05 penk Exp $'
 ! !