--- a/ApplicationModel.st Fri Feb 08 04:32:24 2019 +0000
+++ b/ApplicationModel.st Wed Feb 13 13:06:12 2019 +0100
@@ -2720,7 +2720,7 @@
].
"/ special: if ctrl is pressed, show the helpkey
- (helpText notNil and:[self window device ctrlDown]) ifTrue:[
+ (helpText notNil and:[self device ctrlDown]) ifTrue:[
^ 'Helpkey: ',aKey printString.
].
@@ -2737,8 +2737,7 @@
"Modified: / 27-01-2012 / 14:33:54 / cg"
"Modified (comment): / 09-01-2018 / 17:36:30 / stefan"
- "Modified: / 07-09-2018 / 16:36:11 / Claus Gittinger"
- "Modified (format): / 07-02-2019 / 20:55:33 / Claus Gittinger"
+ "Modified: / 13-02-2019 / 12:00:19 / Claus Gittinger"
!
helpTextForKey:aKey row:aRowNr