--- a/ChangeSetDiff.st	Thu Jan 17 17:02:15 2013 +0000
+++ b/ChangeSetDiff.st	Thu Jan 17 17:13:41 2013 +0000
@@ -126,12 +126,10 @@
             true"(AbstractSourceCodeManager isVersionMethodSelector:chg selector) not"
     ].
     ds onlyInReceiver do:[:chg | 
-        (include value:chg) ifTrue:[
-            (diffsByClass at:(chg nonMetaClassName isNil ifTrue:[
-                        chg class name
-                    ])
+          (include value:chg) ifTrue:[
+            (diffsByClass at:chg nonMetaClassName
                 ifAbsentPut:[ChangeSetDiffSet new name:chg nonMetaClassName]) 
-                    add:(ChangeSetDiffEntry versionA:chg)
+                    add:(ChangeSetDiffEntry versionB:chg)
         ]
     ].
     ds changed do:[:chgPair | 
@@ -196,7 +194,7 @@
 
     "Created: / 02-11-2009 / 16:17:53 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 29-06-2011 / 08:22:49 / Jan Vrany <enter your email here>"
-    "Modified: / 17-01-2013 / 16:16:17 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 17-01-2013 / 17:11:49 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !ChangeSetDiff methodsFor:'initialization'!
@@ -216,9 +214,9 @@
 !ChangeSetDiff class methodsFor:'documentation'!
 
 version
-    ^ '$Id: ChangeSetDiff.st 1986 2013-01-17 17:02:15Z vranyj1 $'
+    ^ '$Id: ChangeSetDiff.st 1987 2013-01-17 17:13:41Z vranyj1 $'
 !
 
 version_SVN
-    ^ '$Id: ChangeSetDiff.st 1986 2013-01-17 17:02:15Z vranyj1 $'
+    ^ '$Id: ChangeSetDiff.st 1987 2013-01-17 17:13:41Z vranyj1 $'
 ! !