EditField.st
changeset 6453 b98c935b55aa
parent 6442 fe1087b94999
child 6478 589bfe2de985
--- a/EditField.st	Fri Oct 12 12:08:13 2018 +0200
+++ b/EditField.st	Fri Oct 12 14:25:22 2018 +0200
@@ -1401,10 +1401,11 @@
     ^ emptyFieldReplacementText
 !
 
-emptyFieldReplacementText:something
+emptyFieldReplacementText:aString
     "the string to show in grey if nothing has been entered (and the field is passive)"
 
-    emptyFieldReplacementText := something.
+    emptyFieldReplacementText := aString.
+    self invalidate.
 !
 
 font:aFont