--- a/Tools__ClassCategoryList.st	Thu Apr 23 06:49:03 2015 +0200
+++ b/Tools__ClassCategoryList.st	Fri Apr 24 00:29:18 2015 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 2004 by eXept Software AG
               All Rights Reserved
@@ -514,7 +512,7 @@
                 self enqueueMessage:#updateOutputGenerator for:self arguments:nil.
                 ^ self.
             ].
-            (rawCategoryList includes:categoryOfClass) ifTrue:[
+            ((rawCategoryList ? #()) includes:categoryOfClass) ifTrue:[
                 ^ self
             ].
             self invalidateList.
@@ -565,7 +563,7 @@
     super update:something with:aParameter from:changedObject
 
     "Modified: / 20-07-2011 / 18:50:04 / cg"
-    "Modified: / 25-03-2014 / 20:28:32 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 23-04-2015 / 11:55:52 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !ClassCategoryList methodsFor:'drag & drop'!
@@ -1205,5 +1203,10 @@
 
 version_CVS
     ^ '$Header: /cvs/stx/stx/libtool/Tools__ClassCategoryList.st,v 1.65 2015-03-05 12:29:47 cg Exp $'
+!
+
+version_HG
+
+    ^ '$Changeset: <not expanded> $'
 ! !