How to display monticello package version ?

Hi

I often find the need to display packages versions that are loaded ...
I decided to try but it's late and all I have is package names... I
just do that:

packInf:=(PackageInfo allPackages
                select: [:aPackInfo | (aPackInfo packageName startsWith: 'OB') 
or: [
                                (aPackInfo packageName startsWith: 'Omni')] ]).
packInf do: [:ea | Transcript cr; show: ea packageName].

You guessed I wanted to display my OB configuration... :)  Did I miss
a method to get the version ?

[later]

I finally played a bit more... I get the versions but not really happy
with it (time to go to bed...)

(MCPackage allInstances do: [:ea |
        (ea name startsWith: 'OB') ifTrue: [
             Transcript cr;
                 show: ((MCWorkingCopy forPackage: ea)  ancestry
ancestors first name printString)]])

Can you correct or show a better way to do ?

Thanks

Cédrick
_______________________________________________
Beginners mailing list
Beginners@xxxxxxxxxxxxxxxxxxxxxxxxxx
http://lists.squeakfoundation.org/mailman/listinfo/beginners