<div dir="ltr"><div>Cool</div><div><br></div><div>Best,</div><div>Karl<br></div></div><br><div class="gmail_quote"><div dir="ltr" class="gmail_attr">On Fri, Apr 17, 2020 at 5:25 PM Marcel Taeumel <<a href="mailto:marcel.taeumel@hpi.de">marcel.taeumel@hpi.de</a>> wrote:<br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex"><div id="gmail-m_-8892284273017334741__MailbirdStyleContent" style="font-size:10pt;font-family:Arial;color:rgb(0,0,0)">
<img id="gmail-m_-88922842730173347416a6a27d8-d16b-4d5b-b498-a7e8cb265e62" src="cid:17189186ef7cb971f161" width="auto"><br><div></div>
<blockquote type="cite" style="border-left-style:solid;border-width:1px;margin-top:20px;margin-left:0px;padding-left:10px;min-width:500px">
<p style="color:rgb(170,170,170);margin-top:10px">Am 17.04.2020 17:17:37 schrieb <a href="mailto:commits@source.squeak.org" target="_blank">commits@source.squeak.org</a> <<a href="mailto:commits@source.squeak.org" target="_blank">commits@source.squeak.org</a>>:</p><div style="font-family:Arial,Helvetica,sans-serif">Marcel Taeumel uploaded a new version of MonticelloConfigurations to project The Trunk:<br><a href="http://source.squeak.org/trunk/MonticelloConfigurations-mt.160.mcz" target="_blank">http://source.squeak.org/trunk/MonticelloConfigurations-mt.160.mcz</a><br><br>==================== Summary ====================<br><br>Name: MonticelloConfigurations-mt.160<br>Author: mt<br>Time: 17 April 2020, 5:17:27.82286 pm<br>UUID: 6d32501e-f519-3b4a-ae1a-58b52360a937<br>Ancestors: MonticelloConfigurations-mt.159<br><br>Shows the current CI status in the update dialog.<br><br>=============== Diff against MonticelloConfigurations-mt.159 ===============<br><br>Item was changed:<br> ----- Method: MCMcmUpdater>>doUpdate: (in category 'updating') -----<br> doUpdate: interactive<br> "Update the image by loading all pending updates from the server. If this is<br> the default updater for the system, update the system version when complete.<br> If interteractive use a modal notifier, otherwise only update the transcript.<br> Flush all caches. If a previous download failed this is often helpful"<br> <br> | config previousUpdateLevel ensureTranscriptSetting |<br> previousUpdateLevel := SystemVersion current highestUpdate.<br> MCFileBasedRepository flushAllCaches. <br> ensureTranscriptSetting := MCConfiguration ensureOpenTranscript.<br> [ MCConfiguration ensureOpenTranscript: interactive.<br> config := self updateFromRepository.<br> config ifNil: [<br> interactive ifTrue: [ ^self inform: 'Unable to retrieve updates from remote repository.' translated ].<br> Transcript cr; show: '========== Unable to retrieve updates from remote repository. ==========' translated; cr.<br> ^ self ].<br> MCMcmUpdater default == self<br> ifTrue: [<br> config setSystemVersion.<br>+ interactive ifTrue: [<br>+ self inform: (self updateMessageFor: previousUpdateLevel)].<br>- interactive ifTrue: [ <br>- self inform: ('Update completed.\\Version: {1}\Update: {3}{2}\\Url: {4}\Map: ''{5}''{6}' translated withCRs format: {<br>- SystemVersion current version.<br>- SystemVersion current highestUpdate.<br>- previousUpdateLevel = SystemVersion current highestUpdate<br>- ifTrue: ['']<br>- ifFalse: [previousUpdateLevel asString, ' -> '].<br>- self repository.<br>- MCMcmUpdater updateMapName.<br>- SystemVersion current description ifEmpty: [''] ifNotEmpty: [:d | String cr, String cr, d]})].<br> Transcript cr;<br> show: '========== Update completed: ' translated;<br> show: previousUpdateLevel;<br> show: ' -> ' ;<br> show: SystemVersion current highestUpdate;<br> show: ' =========='; cr ]<br> ifFalse: [<br> interactive<br> ifTrue: [ self inform: 'Update completed.' ].<br> Transcript cr; show: '========== Update completed. ==========' translated; cr ] ]<br> ensure: [ MCConfiguration ensureOpenTranscript: ensureTranscriptSetting].<br> <br> !<br><br>Item was changed:<br> ----- Method: MCMcmUpdater>>doUpdate:upTo: (in category 'updating') -----<br> doUpdate: interactive upTo: versionNumber<br> "Update the image by loading all pending updates from the server. If this is<br> the default updater for the system, update the system version when complete.<br> If interteractive use a modal notifier, otherwise only update the transcript.<br> Flush all caches. If a previous download failed this is often helpful"<br> <br> | config previousUpdateLevel |<br> previousUpdateLevel := SystemVersion current highestUpdate.<br> MCFileBasedRepository flushAllCaches.<br> config := self updateFromRepositories: { self repository } upTo: versionNumber.<br> config ifNil: [<br> interactive ifTrue: [ ^self inform: 'Unable to retrieve updates from remote repository.' translated ].<br> Transcript cr; show: '========== Unable to retrieve updates from remote repository. ==========' translated; cr.<br> ^ self ].<br> MCMcmUpdater default == self<br> ifTrue: [<br> config setSystemVersion.<br>+ interactive ifTrue: [<br>+ self inform: (self updateMessageFor: previousUpdateLevel)].<br>- interactive ifTrue: [ <br>- self inform: ('Update completed.\\Version: {1}\Update: {3}{2}\\Url: {4}\Map: ''{5}''{6}' translated withCRs format: {<br>- SystemVersion current version.<br>- SystemVersion current highestUpdate.<br>- previousUpdateLevel = SystemVersion current highestUpdate<br>- ifTrue: ['']<br>- ifFalse: [previousUpdateLevel asString, ' -> '].<br>- self repository.<br>- MCMcmUpdater updateMapName.<br>- SystemVersion current description ifEmpty: [''] ifNotEmpty: [:d | String cr, String cr, d]})].<br> Transcript cr;<br> show: '========== Update completed: ' translated;<br> show: previousUpdateLevel;<br> show: ' -> ' ;<br> show: SystemVersion current highestUpdate;<br> show: ' =========='; cr ]<br> ifFalse: [<br> interactive<br> ifTrue: [ self inform: 'Update completed.' ].<br> Transcript cr; show: '========== Update completed. ==========' translated; cr ]<br> !<br><br>Item was added:<br>+ ----- Method: MCMcmUpdater>>updateMessageFor: (in category 'private') -----<br>+ updateMessageFor: previousUpdateLevel<br>+ <br>+ ^ ('Update completed.<br><br>Version: {1}<br>Update: {3}<b>{2}</b><br><br>Url: <a>{4}</a><br>Map: ''{5}''<br>TravisCI status: <a><img></a>{6}' translated format: {<br>+ SystemVersion current version.<br>+ SystemVersion current highestUpdate.<br>+ previousUpdateLevel = SystemVersion current highestUpdate<br>+ ifTrue: ['']<br>+ ifFalse: [previousUpdateLevel asString, ' -> '].<br>+ self repository.<br>+ MCMcmUpdater updateMapName.<br>+ SystemVersion current description ifEmpty: [''] ifNotEmpty: [:d |<br>+ '<br><br>', (d copyReplaceAll: String cr with: '<br>')].<br>+ SystemVersion current ciStatusBadgeUrl.<br>+ SystemVersion current ciStatusPageUrl.<br>+ }) asTextFromHtml!<br><br><br></div></blockquote></div><br>
</blockquote></div>