The Trunk: System-nice.378.mcz

Nicolas Cellier uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-nice.378.mcz

==================== Summary ====================

Name: System-nice.378
Author: nice
Time: 22 September 2010, 10:45:07.71 am
UUID: 60098ef1-e7fc-5247-a3c4-37295723dcbc
Ancestors: System-nice.377

Correct a bug in Drag&Drop thanks to Stéphane Rollandin

(variables theOne, left at nil, seems a leftover from a previous implementation)

=============== Diff against System-nice.377 ===============

Item was changed:
  ----- Method: DefaultExternalDropHandler>>handle:in:dropEvent: (in category 'event handling') -----
  handle: dropStream in: pasteUp dropEvent: anEvent
  "the file was just droped, let's do our job"
+ | fileName services chosen |
- | fileName services theOne chosen |
  fileName := dropStream name.
  services := self servicesForFileNamed: fileName.
 
  "no service, default behavior"
  services isEmpty
  ifTrue: [^UIManager default edit: dropStream contentsOfEntireFile].
 
  chosen := self chooseServiceFrom: services.
+ chosen ifNotNil:[chosen performServiceFor: dropStream]!
- chosen ifNotNil:[theOne performServiceFor: dropStream]!