[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