[GOODIE] BroomMorph-nk (added undo)
Ned Konz
ned at bike-nomad.com
Wed Aug 21 18:25:49 UTC 2002
This version adds undo, and makes the broom go back to its original
position when idle.
from preamble:
"Change Set: BroomMorph-nk
Date: 20 August 2002
Author: Ned Konz
This is a Morph (actually a family of Morphs) that do alignment of other
morphs.
Drag a BroomMorph in some direction and it becomes a broom that can
align the Morphs it touches.
This idea is borrowed from the GEF framework (http://gef.tigris.org)
If you want to pick up a BroomMorph, you can use the Shift key.
This version adds undo, and makes the broom go back to its original
position when idle.
Remove old versions entirely:
"
(Smalltalk hasClassNamed: #BroomMorph) ifTrue: [
(self confirm: 'This will remove the old versions of these classes
first.
Click Yes unless you''ve edited BroomMorph classes.') ifTrue: [
#(BroomMorphUp BroomMorphDown BroomMorphLeft BroomMorphRight BroomMorph)
do: [ :c | Smalltalk removeClassNamed: c ]]]!
-------------- next part --------------
A non-text attachment was scrubbed...
Name: BroomMorph-nk.cs.gz
Type: application/octet-stream
Size: 6726 bytes
Desc: not available
Url : http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20020821/66e6aa2d/BroomMorph-nk.cs.obj
More information about the Squeak-dev
mailing list
|