The Trunk: MorphicExtras-mt.236.mcz

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

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

Name: MorphicExtras-mt.236
Author: mt
Time: 24 May 2018, 12:06:38.618891 pm
UUID: b57ea80d-9334-40b7-8677-5f4de4f86a96
Ancestors: MorphicExtras-mt.235

Workaround for the mouse-down-focus issue regarding dialog invocation.

Note that even though we have an unresolved issue in the Morphic event handling here, the rule of thumb is that you as an application developer should trigger such effects on mouse-up, not mouse-down. See buttons etc. in Windows or macOS.

=============== Diff against MorphicExtras-mt.235 ===============

Item was changed:
  SystemOrganization addCategory: #'MorphicExtras-AdditionalMorphs'!
  SystemOrganization addCategory: #'MorphicExtras-AdditionalSupport'!
  SystemOrganization addCategory: #'MorphicExtras-AdditionalWidgets'!
  SystemOrganization addCategory: #'MorphicExtras-Books'!
  SystemOrganization addCategory: #'MorphicExtras-Demo'!
  SystemOrganization addCategory: #'MorphicExtras-EToy-Download'!
  SystemOrganization addCategory: #'MorphicExtras-Exceptions'!
  SystemOrganization addCategory: #'MorphicExtras-Flaps'!
  SystemOrganization addCategory: #'MorphicExtras-GeeMail'!
  SystemOrganization addCategory: #'MorphicExtras-Leds'!
  SystemOrganization addCategory: #'MorphicExtras-Navigators'!
  SystemOrganization addCategory: #'MorphicExtras-Obsolete'!
  SystemOrganization addCategory: #'MorphicExtras-Palettes'!
  SystemOrganization addCategory: #'MorphicExtras-PartsBin'!
  SystemOrganization addCategory: #'MorphicExtras-Postscript Canvases'!
  SystemOrganization addCategory: #'MorphicExtras-Postscript Filters'!
- SystemOrganization addCategory: #'MorphicExtras-Sound'!
  SystemOrganization addCategory: #'MorphicExtras-SoundInterface'!
  SystemOrganization addCategory: #'MorphicExtras-SqueakPage'!
  SystemOrganization addCategory: #'MorphicExtras-Support'!
  SystemOrganization addCategory: #'MorphicExtras-Text Support'!
  SystemOrganization addCategory: #'MorphicExtras-Undo'!
  SystemOrganization addCategory: #'MorphicExtras-Widgets'!

Item was removed:
- ----- Method: DropDownChoiceMorph>>mouseDown: (in category 'event handling') -----
- mouseDown: evt
-
- | selectedItem |
- self items isEmpty ifTrue: [^ self].
- selectedItem := UIManager default chooseFrom: self items values: self items.
- selectedItem ifNil: [^ self].
- self contentsClipped: selectedItem.  "Client can override this if necess"
- actionSelector ifNotNil: [
- target
- perform: actionSelector
- withArguments: (arguments copyWith: selectedItem)].
- !

Item was added:
+ ----- Method: DropDownChoiceMorph>>mouseUp: (in category 'event handling') -----
+ mouseUp: evt
+
+ | selectedItem |
+ self items isEmpty ifTrue: [^ self].
+ selectedItem := UIManager default chooseFrom: self items values: self items.
+ selectedItem ifNil: [^ self].
+ self contentsClipped: selectedItem.  "Client can override this if necess"
+ actionSelector ifNotNil: [
+ target
+ perform: actionSelector
+ withArguments: (arguments copyWith: selectedItem)].
+ !