MNU: GitFileTreePcakageEntry>>beginsWith:

GitFileTreePackageEntry(Object)>>doesNotUnderstand: #beginsWith:
[ :each | each beginsWith: aPackage , '-' ] in MCFileTreeGitRepositoryInspector(MCFileRepositoryInspector)>>packageIcon: in Block: [ :each | each beginsWith: aPackage , '-' ]
[ :each |
(aBlock value: each)
������ ifTrue: [ ^ true ] ] in Set(Collection)>>anySatisfy: in Block: [ :each | ...
Set>>do:
Set(Collection)>>anySatisfy:
MCFileTreeGitRepositoryInspector(MCFileRepositoryInspector)>>packageIcon:
MCFileTreeGitRepositoryInspector(Object)>>perform:withEnoughArguments:
PluggableIconListMorph>>itemMorphFor:index:
[ :item :index | self itemMorphFor: item index: index ] in PluggableIconListMorph>>getList in Block: [ :item :index | self itemMorphFor: item index: in...etc...
Array(SequenceableCollection)>>withIndexCollect:
Array(SequenceableCollection)>>collectWithIndex:
PluggableIconListMorph>>getList
PluggableIconListMorph(PluggableListMorph)>>getListSize
LazyMorphListMorph(LazyListMorph)>>getListSize
LazyMorphListMorph>>listChanged
PluggableIconListMorph(PluggableListMorph)>>updateList
PluggableIconListMorph(PluggableListMorph)>>update:
[ :aDependent | aDependent update: aParameter ] in MCFileTreeGitRepositoryInspector(Object)>>changed: in Block: [ :aDependent | aDependent update: aParameter ]
DependentsArray>>do:
MCFileTreeGitRepositoryInspector(Object)>>changed:
[
packageList := result.
self changed: #packageList ] in [
versions
������ ifNotNil: [
������ ������ result := Set new: versions size.
������ ������ versions do: [ :each | result add: each first ].������ "sort loaded packages first, then alphabetically"
������ ������ loadedPackages := Set new: loaded size.
������ ������ loaded do: [ :each | loadedPackages add: (each copyUpToLast: $-) ].
������ ������ result := result asArray
������ ������ ������ sort: [ :a :b |
������ ������ ������ ������ | loadedA loadedB |
������ ������ ������ ������ loadedA := loadedPackages includes: a.
������ ������ ������ ������ loadedB := loadedPackages includes: b.
������ ������ ������ ������ loadedA = loadedB
������ ������ ������ ������ ������ ifTrue: [ a < b ]
������ ������ ������ ������ ������ ifFalse: [ loadedA ] ].
������ ������ packagePattern
������ ������ ������ ifNotEmpty: [ result := result select: [ :package | package name asLowercase includesSubstring: packagePattern ] ].
������ ������ UIManager default
������ ������ ������ defer: [
������ ������ ������ ������ packageList := result.
������ ������ ������ ������ self changed: #packageList ] ] ] in MCFileTreeGitRepositoryInspector(MCFileRepositoryInspector)>>packageListUpdate in Block: [ ...
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
[
[
World doOneCycle.
Processor yield.
false ] whileFalse: [�� ] ] in MorphicUIManager>>spawnNewProcess in Block: [ ...
[
self value.
Processor terminateActive ] in BlockClosure>>newProcess in Block: [ ...