SimpleView.st
changeset 8049 419159099481
parent 8048 a01bddfd09a6
child 8051 daf7e8470ff4
--- a/SimpleView.st	Thu Jul 13 14:30:58 2017 +0200
+++ b/SimpleView.st	Thu Jul 13 14:45:31 2017 +0200
@@ -1770,6 +1770,29 @@
 "/    ].
 !
 
+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"
+!
+
 helpKey
     "The helpKey (symbol) or nil.
      This can be set programatically, in views which are constructed
@@ -1796,29 +1819,6 @@
     "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:29:43 / 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:30:41 / cg"
-!
-
 keyboardProcessor
     "return my keyboard processor.
      If non-nil, that one gets a chance to intercept and deal with things like