[Pkg] The Trunk: ScriptLoader-fbs.336.mcz
commits at source.squeak.org
commits at source.squeak.org
Fri May 3 08:42:23 UTC 2013
Frank Shearar uploaded a new version of ScriptLoader to project The Trunk:
http://source.squeak.org/trunk/ScriptLoader-fbs.336.mcz
==================== Summary ====================
Name: ScriptLoader-fbs.336
Author: fbs
Time: 3 May 2013, 9:41:56.186 am
UUID: 0c887eeb-7749-44e9-8828-ccfab8144b57
Ancestors: ScriptLoader-eem.335
It's better to refer to one's own class through #class: it plays much nicer when someone subclasses you.
=============== Diff against ScriptLoader-eem.335 ===============
Item was changed:
----- Method: ScriptLoader>>getLatestScriptNumber (in category 'private helpers') -----
getLatestScriptNumber
| upfroms |
+ upfroms := self class selectors select: [:each | 'script*' match: each ].
- upfroms := ScriptLoader selectors select: [:each | 'script*' match: each ].
upfroms := upfroms collect: [:each | (each asString allButFirst: 6)].
upfroms := upfroms reject: [:each | '*Log*' match: each ].
upfroms := upfroms reject: [:each | '*XXX*' match: each ].
upfroms := upfroms collect: [:each | each asNumber].
^ upfroms asSortedCollection last
!
Item was changed:
----- Method: ScriptLoader>>getLatestUpdateNumber (in category 'private helpers') -----
getLatestUpdateNumber
| upfroms |
+ upfroms := self class selectors select: [:each | 'updateFrom*' match: each ].
- upfroms := ScriptLoader selectors select: [:each | 'updateFrom*' match: each ].
upfroms := upfroms collect: [:each | (each asString last: 4) asNumber].
^ upfroms asSortedCollection last!
More information about the Packages
mailing list