El jue, 21-01-2010 a las 21:18 -0800, Andreas Raab escribió:
Miguel Enrique Cobá Martinez wrote:
Is there somewhere a list of the users that have commited changes to the trunk?
Try this:
bag := Bag new. (MCHttpRepository location: 'http://source.squeak.org/trunk' user: '' password: '') allFileNames do:[:fname| (fname endsWith: '.mcz') ifTrue:[ bag add: ((fname copyAfterLast: $-) copyUpTo: $.)]]. bag sortedCounts.
With this quickly modified code:
bag := Bag new. (MCHttpRepository location: 'http://source.squeak.org/trunk' user: '' password: '') allFileNames do:[:fname| (fname endsWith: '.mcz') ifTrue:[ bag add: ((fname copyAfterLast: $-) copyUpTo: $.)]]. counts := bag sortedCounts. totalCommits := counts detectSum: [ :each | each key ]. totalCommiters := counts size. counts collect: [ :each | Array with: each value with: each key with: (each key / totalCommits * 100 asFloat).]
I get:
an OrderedCollection( #('ar' 517 34.14795244385733) #('nice' 465 30.71334214002642) #('ul' 128 8.45442536327609) #('dtl' 110 7.26552179656539) #('edc' 41 2.708058124174372) #('jmv' 35 2.311756935270806) #('laza' 26 1.717305151915456) #('jcg' 21 1.387054161162483) #('mha' 18 1.1889035667107) #('bf' 17 1.122853368560106) #('auto' 16 1.056803170409511) #('kb' 15 0.990752972258917) #('tfel' 11 0.726552179656539) #('rkrk' 11 0.726552179656539) #('eem' 9 0.59445178335535) #('cwp' 8 0.528401585204756) #('md' 8 0.528401585204756) #('rss' 7 0.462351387054161) #('bp' 6 0.3963011889035666) #('MAD' 5 0.330250990752972) #('Igor' 5 0.330250990752972) #('cbc' 4 0.264200792602378) #('tbn' 3 0.1981505944517833) #('sd' 3 0.1981505944517833) #('ml' 2 0.132100396301189) #('al' 2 0.132100396301189) #('it' 2 0.132100396301189) #('klc' 2 0.132100396301189) #('rej' 1 0.0660501981505945) #('gsa' 1 0.0660501981505945) #('MarcoSchmidt' 1 0.0660501981505945) #('sm' 1 0.0660501981505945) #('HenrikSperreJohansen' 1 0.0660501981505945) #('mir' 1 0.0660501981505945) #('ls' 1 0.0660501981505945) #('enno' 1 0.0660501981505945) #('dc' 1 0.0660501981505945) #('jdr' 1 0.0660501981505945) #('gk' 1 0.0660501981505945) #('dew' 1 0.0660501981505945) #('stephaneducasse' 1 0.0660501981505945) #('p4s' 1 0.0660501981505945) #('hpt' 1 0.0660501981505945))
there are 44 commiters, 15 of them just commited 1 fix. 5 of the commited 2 fixes 10 of them commited between 3 and 10 fixes 10 of them commited between 11 and 41 fixes
And this four commiters are the real, in practical terms, commiters and driving directions of pharo.
#('ar' 517 34.14795244385733) #('nice' 465 30.71334214002642) #('ul' 128 8.45442536327609) #('dtl' 110 7.26552179656539)
they together have made 34.14 + 30.71 + 8.45 + 7.26 = 80.56% of all the commits.
To me this is a community of four (or 14 adding the next 10 most frequent commiters).
Interesting.
Cheers,
- Andreas