--- a/ChangeSetBrowser.st	Sun Jun 23 19:44:06 2019 +0200
+++ b/ChangeSetBrowser.st	Sun Jun 23 21:51:12 2019 +0200
@@ -84,6 +84,11 @@
         (fileName hasSuffix:'package') ifTrue:[
             Smalltalk loadPackage:'stx:goodies/cypress'.
             changeSet := (CypressPackage fromDirectory:fileName) asChangeSet.
+        ] ifFalse:[
+            (fileName hasSuffix:'class') ifTrue:[
+                Smalltalk loadPackage:'stx:goodies/cypress'.
+                changeSet := (CypressClass fromDirectory:fileName) asChangeSet.
+            ].
         ].
     ] ifFalse:[
         changeSet := ChangeSet fromFile:fileName.
@@ -97,7 +102,7 @@
     "
 
     "Modified: / 17-02-2011 / 10:29:50 / cg"
-    "Modified: / 23-06-2019 / 13:28:39 / Claus Gittinger"
+    "Modified: / 23-06-2019 / 21:44:19 / Claus Gittinger"
 ! !
 
 !ChangeSetBrowser class methodsFor:'defaults'!