--- a/Tools__ChangeSetDiffList.st	Thu Jul 07 13:34:11 2011 +0200
+++ b/Tools__ChangeSetDiffList.st	Thu Jul 07 14:51:36 2011 +0200
@@ -261,7 +261,7 @@
     newList := SortedCollection new:16.
     newList sortBlock:[:a :b | a asString < b asString ].
     newDiffs := self inGeneratorHolder value ? #().
-    (newDiffs isKindOf: Tools::ChangseSetDiffComponent) ifTrue:
+    (newDiffs isKindOf: ChangeSetDiffComponent) ifTrue:
         [newDiffs := newDiffs diffs].
     newDiffs do:
         [:item|
@@ -270,6 +270,7 @@
     self listHolder value:newList
 
     "Modified: / 06-07-2011 / 12:58:02 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 07-07-2011 / 13:48:49 / jv"
 ! !
 
 !ChangeSetDiffList::ListEntry class methodsFor:'instance creation'!
@@ -334,7 +335,7 @@
 !ChangeSetDiffList class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__ChangeSetDiffList.st,v 1.2 2011-07-06 14:39:45 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__ChangeSetDiffList.st,v 1.3 2011-07-07 12:51:36 vrany Exp $'
 !
 
 version_SVN