Marcel Taeumel uploaded a new version of MorphicExtras to project The Trunk: http://source.squeak.org/trunk/MorphicExtras-mt.342.mcz
==================== Summary ====================
Name: MorphicExtras-mt.342 Author: mt Time: 23 January 2023, 5:18:09.430818 pm UUID: c6f60f1a-0aee-0e4f-8f0f-1d22dec75adf Ancestors: MorphicExtras-mt.341
Complement Morphic-mt.2071
=============== Diff against MorphicExtras-mt.341 ===============
Item was changed: ----- Method: ProjectNavigationMorph>>doNewPainting (in category 'the actions') ----- doNewPainting | w f |
w := self world. w assureNotPaintingElse: [^ self]. (f := self owner flapTab) ifNotNil: [f hideFlap]. + w makeNewDrawing: (self primaryHand lastEvent translatedTo: w center) - w makeNewDrawing: (self primaryHand lastEvent copy setPosition: w center) !
Item was changed: ----- Method: RemoteHandMorph>>getNextRemoteEvent (in category 'private') ----- getNextRemoteEvent "Return the next remote event, or nil if the receive buffer does not contain a full event record. An event record is the storeString for a MorphicEvent terminated by a <CR> character."
| i s evt | self receiveData. receiveBuffer isEmpty ifTrue: [^ nil].
i := receiveBuffer indexOf: Character cr ifAbsent: [^ nil]. s := receiveBuffer copyFrom: 1 to: i - 1. receiveBuffer := receiveBuffer copyFrom: i + 1 to: receiveBuffer size. evt := (MorphicEvent readFromString: s). evt ifNil:[^nil]. evt setHand: self. + evt isKeyboard ifTrue:[evt translateTo: self position]. - evt isKeyboard ifTrue:[evt setPosition: self position]. ^evt resetHandlerFields!
packages@lists.squeakfoundation.org