The Trunk: 60Deprecated-mt.84.mcz

Marcel Taeumel uploaded a new version of 60Deprecated to project The Trunk:
http://source.squeak.org/trunk/60Deprecated-mt.84.mcz

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

Name: 60Deprecated-mt.84
Author: mt
Time: 2 November 2020, 4:38:10.357816 pm
UUID: 0bda9ad6-f334-ab4c-bdb2-bc8c79931c55
Ancestors: 60Deprecated-pre.83

Complements Morphic-mt.1710.

=============== Diff against 60Deprecated-pre.83 ===============

Item was changed:
  SystemOrganization addCategory: #'60Deprecated-Collections-Streams'!
  SystemOrganization addCategory: #'60Deprecated-HelpSystem-Core-Model'!
  SystemOrganization addCategory: #'60Deprecated-Kernel-Methods'!
+ SystemOrganization addCategory: #'60Deprecated-Morphic-Events'!
  SystemOrganization addCategory: #'60Deprecated-Morphic-Widgets'!
  SystemOrganization addCategory: #'60Deprecated-NSPlugin-System-Support'!
  SystemOrganization addCategory: #'60Deprecated-System-Support'!
  SystemOrganization addCategory: #'60Deprecated-Tools-Inspector'!
  SystemOrganization addCategory: #'60Deprecated-Tools-Menus'!

Item was added:
+ DropEvent subclass: #DropFilesEvent
+ instanceVariableNames: ''
+ classVariableNames: ''
+ poolDictionaries: ''
+ category: '60Deprecated-Morphic-Events'!
+
+ !DropFilesEvent commentStamp: 'ct 10/15/2020 18:15' prior: 0!
+ THIS CLASS IS DEPRECATED!! The #dropFiles/#wantsDropFiles: protocol has been replaced. Use #acceptDroppingMorph:event:/#wantsDroppedMorph:event: instead and scan for dragTransferType: #filesAndDirectories.!

Item was added:
+ ----- Method: DropFilesEvent>>sentTo: (in category 'dispatching') -----
+ sentTo: anObject
+ "Dispatch the receiver into anObject"
+ self type == #dropFilesEvent ifTrue:[^anObject handleDropFiles: self].!

Item was added:
+ ----- Method: DropFilesEvent>>type (in category 'accessing') -----
+ type
+ ^#dropFilesEvent!

Item was added:
+ ----- Method: Morph>>dropFiles: (in category '*60Deprecated-event handling') -----
+ dropFiles: anEvent
+ "Handle a number of files dropped from the OS."
+
+ self flag: #deprecated. "Use #acceptDroppingMorph:event: instead and scan for dragTransferType: #filesAndDirectories.'"!

Item was added:
+ ----- Method: Morph>>handleDropFiles: (in category '*60Deprecated-events-processing') -----
+ handleDropFiles: anEvent
+ "Handle a drop from the OS. Deprecated protocol. Use #handleDropMorph: instead and scan for dragTransferType: #filesAndDirectories."
+ anEvent wasHandled ifTrue: [^ self]. "not interested"
+ (self wantsDropFiles: anEvent) ifFalse: [^ self].
+ anEvent wasHandled: true.
+ self deprecated: 'ct: #dropFiles/#wantsDropFiles: protocol is deprecated. Use #acceptDroppingMorph:event:/#wantsDroppedMorph:event: instead and scan for dragTransferType: #filesAndDirectories.'.
+ self dropFiles: anEvent.!

Item was added:
+ ----- Method: Morph>>wantsDropFiles: (in category '*60Deprecated-event handling') -----
+ wantsDropFiles: anEvent
+ "Return true if the receiver wants files dropped from the OS."
+
+ self flag: #deprecated. "Use #wantsDroppedMorph:event: instead and scan for dragTransferType: #filesAndDirectories.'"
+ ^ false!