'From Squeak3.6beta of ''4 July 2003'' [latest update: #5371] on 28 July 2003 at 3:06:12 pm'! "Change Set: TextLinkByKbd Date: 28 July 2003 Author: Daniel Vainsencher Small changes I need for Garden to be able to bind keys to follow Text links. ParagraphEditor method activates the Text links at the cursor position - until now there was a hook only if it came through a mouse event. PTM change allows instance specific PTM keybindings. I find it astonishing we didn't have this before. Trivial, clean implementation suggested by Ned."! !ParagraphEditor methodsFor: '*garden' stamp: 'dvf 7/28/2003 14:54'! activateTextActions (paragraph text attributesAt: startBlock stringIndex) do: [:att | att actOnClickFor: model in: paragraph]! ! !PluggableTextMorph methodsFor: 'event handling' stamp: 'dvf 7/28/2003 14:50'! onKeyStrokeSend: sel to: recipient textMorph on: #keyStroke send: sel to: recipient.! !