<div dir="ltr"><br><div class="gmail_extra"><br><div class="gmail_quote">On Mon, Mar 13, 2017 at 7:16 PM, <span dir="ltr"><<a href="mailto:commits@source.squeak.org" target="_blank">commits@source.squeak.org</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">Eliot Miranda uploaded a new version of Monticello to project The Trunk:<br>
<a href="http://source.squeak.org/trunk/Monticello-eem.666.mcz" rel="noreferrer" target="_blank">http://source.squeak.org/<wbr>trunk/Monticello-eem.666.mcz</a><br>
<br>
==================== Summary ====================<br>
<br>
Name: Monticello-eem.666<br></blockquote><div><br></div><div>I have a bad feeling about this ;-)</div><div> </div><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
Author: eem<br>
Time: 13 March 2017, 7:16:29.454362 pm<br>
UUID: f527e844-d0de-4339-b0cd-<wbr>f4052cf67d38<br>
Ancestors: Monticello-ul.665<br>
<br>
Remove an unnecessary block in MCRepositoryInspector>><wbr>versionList.<br>
Fix a bug in MCCacheRepository>><wbr>versionInfoForFileNamed: (it has a cache, but no infoCache).<br>
<br>
=============== Diff against Monticello-ul.665 ===============<br>
<br>
Item was changed:<br>
----- Method: MCCacheRepository>><wbr>versionInfoForFileNamed: (in category 'as yet unclassified') -----<br>
versionInfoForFileNamed: aString<br>
+ ^ cache at: aString ifAbsentPut: [self versionReaderForFileNamed: aString do: [:r | r info]]!<br>
- ^ self infoCache at: aString ifAbsentPut: [self versionReaderForFileNamed: aString do: [:r | r info]]!<br>
<br>
Item was changed:<br>
----- Method: MCRepositoryInspector>><wbr>versionList (in category 'morphic ui') -----<br>
versionList<br>
| result |<br>
result := selectedPackage<br>
+ ifNil: [ self versionNamesForNoPackageSelect<wbr>ion ]<br>
+ ifNotNil: [ self versionNamesForSelectedPackage ].<br>
- ifNil: [ self versionNamesForNoPackageSelect<wbr>ion ]<br>
- ifNotNil: [ self versionNamesForSelectedPackage ].<br>
(self orderSpecs at: order) value ifNotNil:<br>
+ [ : sortBlock |<br>
+ result sort: sortBlock ].<br>
+ ^result collect:<br>
- [ : sortBlock | result sort:<br>
- [ : a : b | sortBlock<br>
- value: a<br>
- value: b ] ].<br>
- ^ result collect:<br>
[ : each | self versionHighlight: each ]!<br>
<br>
<br>
</blockquote></div><br><br clear="all"><div><br></div>-- <br><div class="gmail_signature" data-smartmail="gmail_signature"><div dir="ltr"><div><span style="font-size:small;border-collapse:separate"><div>_,,,^..^,,,_<br></div><div>best, Eliot</div></span></div></div></div>
</div></div>