19461083505

Committed 18 Nov 2025 09:32AM UTC coverage: 78.047% (+0.1%) from 77.946%

Build # 19461083505

Build Type

Pull #240

github

Committed by

web-flow

Commit Message

Merge 2b798f965 into 18c5cb3fc

Pull Request Pull Request #240: Improve metrics

Run Details

792 of 974 new or added lines in 12 files covered. (81.31%)

3 existing lines in 1 file now uncovered.

23798 of 30492 relevant lines covered (78.05%)

0.78 hits per line

Source File
Press 'n' to go to next uncovered line, 'b' for previous

90.24

/src/GitLabHealth-Model-Analysis/MergeRequestMergedByUserMetric.class.st

Class {
        #name : #MergeRequestMergedByUserMetric,
        #superclass : #UserMergeRequestMetric,
        #instVars : [
                'allMergeRequestDuringPeriod'
        ],
        #category : #'GitLabHealth-Model-Analysis'
}

{ #category : #calculating }
MergeRequestMergedByUserMetric >> calculate [

        | groupedByDate userMergedMergeRequests dateOver |
        allMergeRequestDuringPeriod ifNil: [ self load ].

        groupedByDate := self setupGroupedDate.

        "filter to see the MR associated to one user"
        userMergedMergeRequests := allMergeRequestDuringPeriod select: [
                                           :userMergeRequest |
                                           userMergeRequest merge_user isNotNil
                                                   and: [
                                                   userMergeRequest merge_user id = user id ] ].

        "filter to reject MR that are not merge"
        userMergedMergeRequests := userMergedMergeRequests reject: [ :mr |
                                           mr merged_at isNil ].

        userMergedMergeRequests do: [ :userMergeRequest | "here we look at the specific date of its merged"
                dateOver := self transformDate: userMergeRequest merged_at to: over.
                groupedByDate
                        at: dateOver printString
                        ifPresent: [ :value | value add: userMergeRequest ] ].
        groupedByDate := groupedByDate collect: [ :group | group size ].

        ^ groupedByDate average asFloat
]

{ #category : #accessing }
MergeRequestMergedByUserMetric >> description [

        ^ 'number of merge request merged by this user'
]

{ #category : #loading }
MergeRequestMergedByUserMetric >> load [

        allMergeRequestDuringPeriod := self
                                     loadMergeRequestsSince: (period at: #since)
                                     until: (period at: #until)
]

{ #category : #accessing }
MergeRequestMergedByUserMetric >> name [

        ^ 'mergeRequestMergedByThisUser'
]

1	Class {
2	#name : #MergeRequestMergedByUserMetric,
3	#superclass : #UserMergeRequestMetric,
4	#instVars : [
5	'allMergeRequestDuringPeriod'
6	],
7	#category : #'GitLabHealth-Model-Analysis'
8	}
9
10	{ #category : #calculating }
11	MergeRequestMergedByUserMetric >> calculate [	1✔
12		1✔
13	\| groupedByDate userMergedMergeRequests dateOver \|	1✔
14	allMergeRequestDuringPeriod ifNil: [ self load ].	1✔
15		1✔
16	groupedByDate := self setupGroupedDate.	1✔
17		1✔
18	"filter to see the MR associated to one user"	1✔
19	userMergedMergeRequests := allMergeRequestDuringPeriod select: [	1✔
20	:userMergeRequest \|	1✔
21	userMergeRequest merge_user isNotNil	1✔
22	and: [	1✔
23	userMergeRequest merge_user id = user id ] ].	1✔
24		1✔
25	"filter to reject MR that are not merge"	1✔
26	userMergedMergeRequests := userMergedMergeRequests reject: [ :mr \|	1✔
27	mr merged_at isNil ].	1✔
28		1✔
29	userMergedMergeRequests do: [ :userMergeRequest \| "here we look at the specific date of its merged"	1✔
30	dateOver := self transformDate: userMergeRequest merged_at to: over.	1✔
31	groupedByDate	1✔
32	at: dateOver printString	1✔
33	ifPresent: [ :value \| value add: userMergeRequest ] ].	1✔
34	groupedByDate := groupedByDate collect: [ :group \| group size ].	1✔
35		1✔
36	^ groupedByDate average asFloat	1✔
37	]	1✔
38
39	{ #category : #accessing }
40	MergeRequestMergedByUserMetric >> description [	1✔
41		1✔
42	^ 'number of merge request merged by this user'	1✔
43	]	1✔
44
45	{ #category : #loading }
46	MergeRequestMergedByUserMetric >> load [	1✔
47		1✔
48	allMergeRequestDuringPeriod := self	1✔
49	loadMergeRequestsSince: (period at: #since)	1✔
50	until: (period at: #until)	1✔
51	]	1✔
52
53	{ #category : #accessing }
NEW 54	MergeRequestMergedByUserMetric >> name [	×
NEW 55		×
NEW 56	^ 'mergeRequestMergedByThisUser'	×
NEW 57	]	×

moosetechnology / GitProjectHealth / 19461083505

Source File Press 'n' to go to next uncovered line, 'b' for previous

Source File
Press 'n' to go to next uncovered line, 'b' for previous