[Bug] Can't do active text in 3.2 -
NewParagraph>>clickAt:for:controller:
Mark Guzdial
guzdial at cc.gatech.edu
Tue Oct 9 15:17:12 UTC 2001
I've tried several active texts in Bookmorphs in 3.2, and I find that
I can't click on them anymore. I get an error in the below method --
IdentityTransform doesn't understand invertBoundsRect.
clickAt: clickPoint for: model controller: editor
"Give sensitive text a chance to fire. Display flash:
(100 at 100 extent: 100 at 100)."
| startBlock action target range boxes box |
action _ false.
startBlock _ self characterBlockAtPoint: clickPoint.
(text attributesAt: startBlock stringIndex forStyle: textStyle)
do: [:att | att mayActOnClick ifTrue:
[
(target _ model) ifNil: [target _
editor morph].
range _ text rangeOf: att startingAt:
startBlock stringIndex forStyle: textStyle.
boxes _ self selectionRectsFrom:
(self characterBlockForIndex: range first)
to: (self
characterBlockForIndex: range last+1).
box _ boxes detect: [:each | each
containsPoint: clickPoint].
Utilities awaitMouseUpIn: ((editor
transformFrom: nil) invertBoundsRect: box)
repeating: []
ifSucceed: [(att
actOnClickFor: target in: self at: clickPoint editor: editor) ifTrue:
[action _ true]].
Cursor currentCursor == Cursor
webLink ifTrue:[Cursor normal show].
]].
^ action
--------------------------
Mark Guzdial : Georgia Tech : College of Computing : Atlanta, GA 30332-0280
Associate Professor - Learning Sciences & Technologies.
Collaborative Software Lab - http://coweb.cc.gatech.edu/csl/
(404) 894-5618 : Fax (404) 894-0673 : guzdial at cc.gatech.edu
http://www.cc.gatech.edu/gvu/people/Faculty/Mark.Guzdial.html
More information about the Squeak-dev
mailing list
|