SimpleView.st
changeset 8253 fcffe5ec578f
parent 8250 8514153cbeb9
child 8256 22fb0723dcc6
--- a/SimpleView.st	Tue Jan 16 22:14:04 2018 +0100
+++ b/SimpleView.st	Tue Jan 16 22:14:27 2018 +0100
@@ -1772,37 +1772,6 @@
 "/    ].
 !
 
-flyByHelpText
-    "Any optional, dynamically assigned helptext.
-     If it was never set (via flyByHelpText:), then the normal mechanism
-     (using a helpKey and asking the app for the corresponding text) is used."
-
-    ^ self objectAttributeAt:#flyByHelpText
-
-    "Created: / 13-07-2017 / 14:35:53 / cg"
-!
-
-flyByHelpText:aString
-    "Any optional, dynamically assigned helptext.
-     If it is never set (via flyByHelpText:), then the normal mechanism
-     (using a helpKey and asking the app for the corresponding text) is used.
-     Warning:
-         Only use explicit helpTexts for very dynamic tooltips, which cannot be generated via
-         the regular (language-xlated) helpKey mechanism."
-
-    ^ self objectAttributeAt:#flyByHelpText put:aString
-
-    "Created: / 13-07-2017 / 14:35:59 / cg"
-!
-
-flyByHelpTextAt:srcPoint
-    "fallback to avoid DNU for those which do a super (which they should not)"
-
-    ^ nil
-
-    "Created: / 13-07-2017 / 14:35:53 / cg"
-!
-
 helpKey
     "The helpKey (symbol) or nil.
      This can be set programatically, in views which are constructed
@@ -1829,6 +1798,37 @@
     "Modified (comment): / 13-07-2017 / 14:18:50 / cg"
 !
 
+helpText
+    "Any optional, dynamically assigned helptext.
+     If it was never set (via helpText:), then the normal mechanism
+     (using a helpKey and asking the app for the corresponding text) is used."
+
+    ^ self objectAttributeAt:#helpText
+
+    "Created: / 13-07-2017 / 14:35:53 / cg"
+!
+
+helpText:aString
+    "Any optional, dynamically assigned helptext.
+     If it is never set (via helpText:), then the normal mechanism
+     (using a helpKey and asking the app for the corresponding text) is used.
+     Warning:
+         Only use explicit helpTexts for very dynamic tooltips, which cannot be generated via
+         the regular (language-xlated) helpKey mechanism."
+
+    ^ self objectAttributeAt:#helpText put:aString
+
+    "Created: / 13-07-2017 / 14:35:59 / cg"
+!
+
+helpTextAt:srcPoint
+    "fallback to avoid DNU for those which do a super (which they should not)"
+
+    ^ nil
+
+    "Created: / 13-07-2017 / 14:35:53 / cg"
+!
+
 keyboardProcessor
     "return my keyboard processor.
      If non-nil, that one gets a chance to intercept and deal with things like