--- a/TextCollector.st	Sat Oct 21 23:16:10 2017 +0200
+++ b/TextCollector.st	Sat Oct 21 23:16:22 2017 +0200
@@ -1429,11 +1429,13 @@
     super flash.
 !
 
-flash:message withColor:flashColor
+flash:messageOrNil withColor:flashColor
     "make sure everything is visible, before flashing"
 
     self endEntry.
-    super flash:message withColor:flashColor.
+    super flash:messageOrNil withColor:flashColor.
+
+    "Modified (format): / 21-10-2017 / 23:13:42 / cg"
 ! !
 
 !TextCollector class methodsFor:'documentation'!