--- a/AbstractSourceCodeManager.st	Sat Jan 21 13:24:08 2017 +0100
+++ b/AbstractSourceCodeManager.st	Tue Jan 24 10:10:27 2017 +0100
@@ -2815,6 +2815,21 @@
     "Modified: / 20-08-2011 / 14:56:04 / cg"
 !
 
+oldestRevisionLogEntryOf:aClass
+    "return the oldest revisions log found in the repository.
+     Return nil on failure.
+     Can be used to determine the time of initial checkin or the original author"
+
+    |log|
+    
+    log := self revisionLogOf:aClass.
+    ^  (log at:#revisions) last.
+    
+    "
+     SourceCodeManager oldestRevisionLogEntryOf:Array       
+    "
+!
+
 removeContainer: container inModule: module directory: directory
     "remove a container"