For some reason I can no longer open Zinc's old school MC repository in 
Pharo-7.0+alpha.build.690.sha.ffd58dcc88a0698be21b52b565a86316799cb25d (32 Bit)

MCHttpRepository
 location: 'http://mc.stfx.eu/ZincHTTPComponents'
 user: ''
 password: ''.

> Open repository (browser UI)

gives me a DNU see [1]

I just don't see what is wrong, maybe it has to do with the latest commit in 
the repo, (it took a git version number from the image as ancestor), but this 
code is hard to look at.

Now I am stuck trying to fix a problem with Zinc.

Any help would be appreciated,

Sven

[1]

UndefinedObject(Object)>>doesNotUnderstand: #<
[ :ancestor | 
(ancestor versionNumber < aVersionArray third
        or: [ ancestor versionNumber = aVersionArray third
                        and: [ ancestor author ~= aVersionArray second ] ])
        ifTrue: [ newer add: ancestor name ] ] in [ :aVersionArray | 
workingCopy ancestors
        do: [ :ancestor | 
                (ancestor versionNumber < aVersionArray third
                        or: [ ancestor versionNumber = aVersionArray third
                                        and: [ ancestor author ~= aVersionArray 
second ] ])
                        ifTrue: [ newer add: ancestor name ] ] ] in [ 
:workingCopy | 
| versionsForPackage |
workingCopy ancestors do: [ :ancestor | loaded add: ancestor name ].
versionsForPackage := versions
        select: [ :v | v first = workingCopy package name ].
versionsForPackage
        do: [ :aVersionArray | 
                workingCopy ancestors
                        do: [ :ancestor | 
                                (ancestor versionNumber < aVersionArray third
                                        or: [ ancestor versionNumber = 
aVersionArray third
                                                        and: [ ancestor author 
~= aVersionArray second ] ])
                                        ifTrue: [ newer add: ancestor name ] ] 
] ] in MCFileRepositoryInspector>>refresh in Block: [ :ancestor | ...
Array(SequenceableCollection)>>do:
[ :aVersionArray | 
workingCopy ancestors
        do: [ :ancestor | 
                (ancestor versionNumber < aVersionArray third
                        or: [ ancestor versionNumber = aVersionArray third
                                        and: [ ancestor author ~= aVersionArray 
second ] ])
                        ifTrue: [ newer add: ancestor name ] ] ] in [ 
:workingCopy | 
| versionsForPackage |
workingCopy ancestors do: [ :ancestor | loaded add: ancestor name ].
versionsForPackage := versions
        select: [ :v | v first = workingCopy package name ].
versionsForPackage
        do: [ :aVersionArray | 
                workingCopy ancestors
                        do: [ :ancestor | 
                                (ancestor versionNumber < aVersionArray third
                                        or: [ ancestor versionNumber = 
aVersionArray third
                                                        and: [ ancestor author 
~= aVersionArray second ] ])
                                        ifTrue: [ newer add: ancestor name ] ] 
] ] in MCFileRepositoryInspector>>refresh in Block: [ :aVersionArray | ...
Array(SequenceableCollection)>>do:
[ :workingCopy | 
| versionsForPackage |
workingCopy ancestors do: [ :ancestor | loaded add: ancestor name ].
versionsForPackage := versions
        select: [ :v | v first = workingCopy package name ].
versionsForPackage
        do: [ :aVersionArray | 
                workingCopy ancestors
                        do: [ :ancestor | 
                                (ancestor versionNumber < aVersionArray third
                                        or: [ ancestor versionNumber = 
aVersionArray third
                                                        and: [ ancestor author 
~= aVersionArray second ] ])
                                        ifTrue: [ newer add: ancestor name ] ] 
] ] in MCFileRepositoryInspector>>refresh in Block: [ :workingCopy | ...
Array(SequenceableCollection)>>do:
MCFileRepositoryInspector>>refresh
[ self refresh.
MCWorkingCopy addDependent: self ] in 
MCFileRepositoryInspector>>setRepository:workingCopy: in Block: [ self 
refresh....
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess in Block: [ self 
value....



Reply via email to