--- a/SVNSourceCodeManager.st	Fri Nov 18 16:14:26 2016 +0100
+++ b/SVNSourceCodeManager.st	Fri Nov 18 18:05:40 2016 +0100
@@ -336,11 +336,11 @@
 
      The returned information is a structure (IdentityDictionary)
      filled with:
-            #container          -> the RCS/CVS container file name 
+            #container          -> the file name again 
             #cvsRoot            -> the CVS root (repository) 
             #filename           -> the actual source file name
             #newestRevision     -> the revisionString of the newest revision
-            #numberOfRevisions  -> the number of revisions in the container (nil for all)
+            #numberOfRevisions  -> N/A
             #revisions          -> collection of per-revision info (see below)
 
             firstRevOrNil / lastRevOrNil specify from which revisions a logEntry is wanted:
@@ -358,7 +358,6 @@
               #author                -> who checked that revision into the repository
               #date                  -> when was it checked in
               #state                 -> the RCS state
-              #numberOfChangedLines  -> the number of changed line w.r.t the previous
               #logMessage            -> the checkIn log message
 
             revisions are ordered newest first 
@@ -401,19 +400,18 @@
     info at:#filename           put: classFileName.         "/ -> the actual source file name
     info at:#newestRevision     put: log first revision asString. "/-> the revisionString of the newest revision
     info at:#numberOfRevisions  put: log size.              "/-> the number of revisions in the container (nil for all)
-    info at:#revisions          put: (log collect:[:entry|
-
-        | info |
-        info := IdentityDictionary new.
-        info at:#revision              put: entry revision asString."/ -> the revision string
-        info at:#author                put: entry author."/ -> who checked that revision into the repository
-        info at:#date                  put: entry date printString."/ -> when was it checked in
-        info at:#state                 put: 'Exp'. "/ -> the RCS state
-        info at:#numberOfChangedLines  put: 'N/A'. "/ -> the number of changed line w.r.t the previous
-        info at:#logMessage            put: entry message."/ -> the checkIn log message.
-        info
-    ]).
-
+    info at:#revisions          
+         put: 
+        (log collect:[:entry|
+            | info |
+            info := IdentityDictionary new.
+            info at:#revision              put: entry revision asString."/ -> the revision string
+            info at:#author                put: entry author."/ -> who checked that revision into the repository
+            info at:#date                  put: entry date printString."/ -> when was it checked in
+            info at:#state                 put: 'Exp'. "/ -> the RCS state
+            info at:#logMessage            put: entry message."/ -> the checkIn log message.
+            info
+        ]).
     
     ^info