diff -r 779de481266f -r cd8a7d6bfc1d SourceCodeManagerUtilities.st --- a/SourceCodeManagerUtilities.st Thu Oct 04 17:02:01 2018 +0200 +++ b/SourceCodeManagerUtilities.st Thu Oct 04 17:02:47 2018 +0200 @@ -1,5 +1,3 @@ -"{ Encoding: utf8 }" - " COPYRIGHT (c) 2000 eXept Software AG All Rights Reserved @@ -4092,10 +4090,11 @@ "/ SourceCodeManagerError handle:[:ex | Dialog warn:(resources - stringWithCRs:'Could not fetch revision info of "%1".\\Please check your sourcecode manager settings of %2 for package: "%3".\(and possibly the network for reachability of the repository)' - with:classToCompare name - with:classToCompare sourceCodeManager managerTypeName - with:classToCompare package). + stringWithCRs:'Could not fetch revision info of "%1".\Reported error: %4\\Please check your sourcecode manager settings of %2 for package: "%3".\(and possibly the network for reachability of the repository)' + with:classToCompare name + with:classToCompare sourceCodeManager managerTypeName + with:classToCompare package + with:(ex description asString withoutSeparators)). ^ nil. ] do:[ newestRev := mgr newestRevisionOf:classToCompare. @@ -4175,6 +4174,7 @@ " "Modified: / 24-07-2012 / 18:11:27 / cg" + "Modified: / 04-10-2018 / 15:36:05 / Claus Gittinger" ! getLogMessageForClassCheckinTakingDefaultsFromPreviousLogInfo:aLogInfoOrNil forClass:aClass valuesInto:aBlock