[ENH] BrowserWithDragAndDrop

Aibek Musaev abbey at cc.gatech.edu
Wed Apr 26 18:38:22 UTC 2000


Stephan,

Only today I looked at your code. It is very neat. It gives a cool d&d
feel to the browser.

I provide a little update to one of your methods. Please read the
corresponding comments below:



'From Squeak2.8alpha of 19 January 2000 [latest update: #1919] on 25 April
2000 at 2:21:10 pm'!

!PluggableListMorph methodsFor: 'drag and drop' stamp: 'am 4/25/2000
14:20'!
wantsDroppedMorph: aMorph event: anEvent
	"updated by Aibek Musaev 05/26/2000:
		why:
			only Browser currently implements
			#wantsDroppedMorph:event:atListMorph:,
			that is why if d&d onto ChangeSorter, e.g., Squeak
			will complain
		how:
			if model is not Browser, call the parent's
			#wantsDroppedMorph:event:atListMorph:"

	| m |
	m _ self owner model.
	(m isKindOf: Browser)
		ifTrue: [^ m wantsDroppedMorph: aMorph event: anEvent
atListMorph: self]
		ifFalse: [^ super wantsDroppedMorph: aMorph
event: anEvent]! !






More information about the Squeak-dev mailing list