`LinkButton`: Use `emphasisAtX:on:` instead of `emphasisAtPoint:on:` jv
authorJan Vrany <jan.vrany@labware.com>
Mon, 26 Oct 2020 22:34:32 +0000
branchjv
changeset 6247 a1272bf7ae91
parent 6246 0fcf80697af7
child 6248 d11aff65e4cf
`LinkButton`: Use `emphasisAtX:on:` instead of `emphasisAtPoint:on:`
LinkButton.st
--- a/LinkButton.st	Sat Jul 25 15:50:28 2020 +0200
+++ b/LinkButton.st	Mon Oct 26 22:34:32 2020 +0000
@@ -1,5 +1,6 @@
 "
  COPYRIGHT (c) 2006 by eXept Software AG
+ COPYRIGHT (c) 2020 LabWare
               All Rights Reserved
 
  This software is furnished under a license and may be used
@@ -25,6 +26,7 @@
 copyright
 "
  COPYRIGHT (c) 2006 by eXept Software AG
+ COPYRIGHT (c) 2020 LabWare
               All Rights Reserved
 
  This software is furnished under a license and may be used
@@ -258,7 +260,7 @@
     
     |emphasis|
 
-    emphasis := aText emphasisAtPoint:aPoint on:self.
+    emphasis := aText emphasisAtX:aPoint x on:self.
     (emphasis isNil or:[emphasis isSymbol]) ifTrue:[
         ^ #(nil nil).
     ].
@@ -276,6 +278,8 @@
         ].
     ] ifNone:[].
     ^ #(nil nil).
+
+    "Modified: / 26-10-2020 / 22:33:29 / Jan Vrany <jan.vrany@labware.com>"
 !
 
 labelsAndActionsWithPositionsDo:aFourArgBlock
@@ -381,5 +385,10 @@
 
 version_CVS
     ^ '$Header$'
+!
+
+version_HG
+
+    ^ '$Changeset: <not expanded> $'
 ! !