18718485692

Committed 22 Oct 2025 01:51PM UTC coverage: 78.146% (+0.2%) from 77.946%

Build # 18718485692

Build Type

Pull #238

github

Committed by

web-flow

Commit Message

Merge 5336fc472 into 9215ab54a

Pull Request Pull Request #238: Merged merge request

Coverage Stats

325 of 329 new or added lines in 4 files covered. (98.78%)

23354 of 29885 relevant lines covered (78.15%)

0.78 hits per line

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

90.0

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

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

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

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

        groupedByDate := self setupGroupedDate.

        "filter to see the MR associated to one user"
        userMergedMergeRequests := userMergeRequests 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 : #'as yet unclassified' }
MergeRequestMergedByUserMetric >> load [

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

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

        ^ 'selfMergedMergeRequest'
]

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

moosetechnology / GitProjectHealth / 18718485692

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