--- a/Tools__ClassCategoryList.st	Wed Mar 26 10:23:50 2014 +0100
+++ b/Tools__ClassCategoryList.st	Wed Mar 26 10:40:06 2014 +0100
@@ -681,7 +681,7 @@
         newEntry := self listEtryForCategory: category.
         (oldEntry sameStringAndEmphasisAs:newEntry) ifFalse:[
             cookedCategoryList at: idx put: newEntry.
-            categoryListView flash; invalidate.
+            categoryListView invalidate.
         ].
     ].
 
@@ -700,7 +700,7 @@
 "/        ]
 "/    ].
 
-    "Modified: / 26-03-2014 / 09:19:40 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 26-03-2014 / 09:39:38 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 listOfCategories
@@ -1125,10 +1125,10 @@
 !ClassCategoryList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__ClassCategoryList.st,v 1.52 2014-03-26 09:23:50 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__ClassCategoryList.st,v 1.53 2014-03-26 09:40:06 vrany Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__ClassCategoryList.st,v 1.52 2014-03-26 09:23:50 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__ClassCategoryList.st,v 1.53 2014-03-26 09:40:06 vrany Exp $'
 ! !