--- a/AbstractDirectoryBrowser.st	Tue Nov 14 18:13:18 2017 +0100
+++ b/AbstractDirectoryBrowser.st	Wed Nov 15 11:11:07 2017 +0100
@@ -106,12 +106,12 @@
 "/    self directory isNil ifTrue:[^ self].
     dropObjects := aContext dropObjects.
 
-    dropObjects do:[:anObject| 
+    dropObjects do:[:eachDropObject| 
         |checkObject|
 
-        anObject isFileObject ifFalse:[^ self].
+        eachDropObject isFileObject ifFalse:[^ self].
 
-        checkObject := anObject theObject.
+        checkObject := eachDropObject theObject.
         checkObject isFilename ifFalse:[^ self].
         (aContext dropSource argument == #archivApplication) ifFalse:[
             checkObject isSpecialFile ifTrue:[^ self].
@@ -119,6 +119,8 @@
         ].
     ].
     inDropMode := true.
+
+    "Modified (format): / 15-11-2017 / 11:10:16 / cg"
 !
 
 dropLeave:aDropContext