--- a/DirectoryContentsBrowser.st	Wed Feb 26 15:38:54 2003 +0100
+++ b/DirectoryContentsBrowser.st	Wed Feb 26 15:39:29 2003 +0100
@@ -1326,14 +1326,13 @@
 !
 
 dropOver:aContext 
-    "send the last time, when leaving the widget
-    "
+    "called during drag & drop while moving over the widget."
+
     |lineNr newDest destinationFile|
 
     inDropMode ifFalse:[^ self].
 
     lineNr  := self getLineNumberFor:aContext.
-
     lineNr notNil ifTrue:[
         newDest := browserItemList at:lineNr.
         (newDest notNil and:[newDest isDirectory]) ifTrue:[
@@ -2869,5 +2868,5 @@
 !DirectoryContentsBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.82 2003-02-26 12:39:26 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.83 2003-02-26 14:39:15 cg Exp $'
 ! !

--- a/DirectoryTreeBrowser.st	Wed Feb 26 15:38:54 2003 +0100
+++ b/DirectoryTreeBrowser.st	Wed Feb 26 15:39:29 2003 +0100
@@ -864,8 +864,8 @@
 !
 
 dropOver:aContext 
-    "send the last time, when leaving the widget
-    "
+    "called during drag & drop while moving over the widget."
+
     |lineNr newDest|
 
     inDropMode ifFalse:[^ self].
@@ -1356,5 +1356,5 @@
 !DirectoryTreeBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryTreeBrowser.st,v 1.46 2003-02-20 16:14:18 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DirectoryTreeBrowser.st,v 1.47 2003-02-26 14:39:29 cg Exp $'
 ! !