3b142fc19267 — Gerald Klix (speedy) 2 months ago
SUM: Workaround for an infinite recursion.
1 files changed, 5 insertions(+), 4 deletions(-)

M klg-packages/Accessability.pck.st
M klg-packages/Accessability.pck.st +5 -4
@@ 1,6 1,6 @@ 
-'From Haver 6.0 [latest update: #5344] on 1 July 2022 at 9:37:03 pm'!
+'From Haver 6.0 [latest update: #5361] on 7 July 2022 at 8:28:44 pm'!
 'Description '!
-!provides: 'Accessability' 1 7!
+!provides: 'Accessability' 1 8!
 
 
 

          
@@ 110,11 110,12 @@ hoverHelpBorderColor
 
 	^ `Color black`! !
 
-!Theme methodsFor: '*Accessability-other options' stamp: 'KLG 7/1/2022 21:36:43'!
+!Theme methodsFor: '*Accessability-other options' stamp: 'KLG 7/7/2022 20:23:33'!
 hoverHelpBorderWidth
 	"Answer the hover help morph's border width."
 	
 	| borderWidth |
 	borderWidth _ Preferences at: #standardListFont :: pointSize / 11.
-	borderWidth _ borderWidth * Theme current hoverHelpBorderWidth + 3.
+	self flagHaver: 'Find out what the actual purpose was'.
+	"F: borderWidth _ borderWidth * Theme current hoverHelpBorderWidth + 3."
 	^ borderWidth rounded max: 0! !