--- a/SourceCodeManagerUtilities.st	Mon Dec 04 23:49:14 2017 +0100
+++ b/SourceCodeManagerUtilities.st	Mon Dec 04 23:49:25 2017 +0100
@@ -5110,7 +5110,7 @@
     "Modified: / 12-03-2012 / 13:12:40 / cg"
 !
 
-getCheckinInfoFor:aClassNameOrPackageNameString initialAnswer:initialAnswerOrNil withQuickOption:withQuickOption withValidateConsistencyOption:withValidateConsistencyOption
+getCheckinInfoFor:infoString initialAnswer:initialAnswerOrNil withQuickOption:withQuickOption withValidateConsistencyOption:withValidateConsistencyOption
     "ask for a log message for checking in a class (plus checkinQuick state info),
      and other info (mark as stable, for example).
      Return the info-object (actually: the dialog) or nil if aborted."
@@ -5118,7 +5118,7 @@
     |logMsg infoDialog|
 
     infoDialog := Tools::CheckinInfoDialog 
-                    getCheckinInfoFor:aClassNameOrPackageNameString 
+                    getCheckinInfoFor:infoString 
                     initialAnswer:(initialAnswerOrNil ? LastSourceLogMessage)
                     withQuickOption:withQuickOption
                     logHistory:(LastSourceLogMessages ? #())
@@ -5145,6 +5145,7 @@
     "
 
     "Modified: / 12-03-2012 / 13:12:40 / cg"
+    "Modified (format): / 04-12-2017 / 23:07:39 / cg"
 !
 
 revisionForSymbolicName:tag class:cls fileName:classFileName directory:packageDir module:moduleDir manager:aSourceCodeManager