--- a/XWorkstation.st	Sat Apr 05 01:34:10 1997 +0200
+++ b/XWorkstation.st	Sat Apr 05 01:45:50 1997 +0200
@@ -3365,7 +3365,7 @@
 dndMessage:event data:data view:targetView
     "handle a DND drag&drop protocol message"
 
-    |sensor dropType dropValue names i1 i2 t dropObject|
+    |sensor dropType dropValue names i1 i2 t|
 
     dropType := data doubleWordAt:1.
 
@@ -3407,18 +3407,13 @@
             ].
         ].
         dropValue := names.
-        dropObject := dropValue collect:[:nm | DropObject newFile:(nm asFilename)].
+        dropValue := dropValue collect:[:nm | nm asFilename].
     ] ifFalse:[
         ((dropType == #DndFile) or:[dropType == #DndDir]) ifTrue:[
-            dropObject := DropObject newFile:(dropValue asFilename).
-        ] ifFalse:[
-            dropObject := DropObject new:dropValue.
+            dropValue := dropValue asFilename.
         ]
     ].
 
-    "/ convert to dropObject(s)
-
-
     (sensor := targetView sensor) notNil ifTrue:[
         sensor dropMessage:dropType data:dropValue view:targetView
     ] ifFalse:[
@@ -3428,7 +3423,7 @@
     ]
 
     "Created: 4.4.1997 / 17:59:37 / cg"
-    "Modified: 5.4.1997 / 01:32:29 / cg"
+    "Modified: 5.4.1997 / 01:44:40 / cg"
 !
 
 gravityNotifyView:aView
@@ -8840,6 +8835,6 @@
 !XWorkstation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.227 1997-04-04 23:34:10 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.228 1997-04-04 23:45:50 cg Exp $'
 ! !
 XWorkstation initialize!