I manage to get two clicks when I try adding another event listener to the D&D example. How do I combine them correctly?
addEventListener:
(BlPluggableEventListener new
whenClickDo: [ :evt |
|aSubmorph|
aSubmorph := (BlRectangleView new
color: Color red;
extent: 20 @ 20) asMorph.
aSubmorph translateBy: 50 @ 50.
whiteContainer addMorph: aSubmorph];
yourself);
addEventListener: BlPasteUpEventListener new.
Stephan
