[squeak-dev] The Trunk: System-mt.1239.mcz

commits at source.squeak.org commits at source.squeak.org
Tue Jul 6 12:35:58 UTC 2021


Marcel Taeumel uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-mt.1239.mcz

==================== Summary ====================

Name: System-mt.1239
Author: mt
Time: 6 July 2021, 2:35:53.603497 pm
UUID: 1d81acc6-d644-49a9-ad41-2f5bc9ccfa60
Ancestors: System-mt.1238

Complements previous commit. Increases robustness. To be used in MCMcmUpdater.

=============== Diff against System-mt.1238 ===============

Item was changed:
  ----- Method: SystemVersion>>ciStatusTimestamp (in category 'continuous integration') -----
  ciStatusTimestamp
  
  	| stamp " 'Mon, 05 Jul 2021 17:52:11 GMT' " dateAndTime |
  	stamp := (WebClient httpGet: self ciStatusBadgeUrl) headerAt: 'last-modified'.
+ 	stamp ifEmpty: [^ stamp].
  	dateAndTime := DateAndTime readFrom: (((stamp allButFirst: 4) allButLast: 4), ' Z') readStream.
  	^ String streamContents: [:s |
  		dateAndTime asDate = Date today
  			ifTrue: [s nextPutAll: 'Today' translated, ',']
  			ifFalse: [dateAndTime asDate = Date yesterday
  				ifTrue: [s nextPutAll: 'Yesterday' translated, ',']
  				ifFalse: [dateAndTime printYMDOn: s]].
  		s space.
  		dateAndTime printHMSOn: s]!



More information about the Squeak-dev mailing list