13808971590

Committed 12 Mar 2025 10:19AM UTC coverage: 66.991% (+0.5%) from 66.508%

Build # 13808971590

Build Type

Pull #145

github

Committed by

web-flow

Commit Message

Merge e2be7224d into 18804a2e4

Pull Request Pull Request #145: Code addition merge rerquest project metric

Coverage Stats

6994 of 8269 new or added lines in 94 files covered. (84.58%)

11907 of 17774 relevant lines covered (66.99%)

0.67 hits per line

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

84.31

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

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

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

        | groupedByDate mergedMergeRequest noVerificationMergeRequests dateOver gitAnalyzer |
        userMergeRequests ifNil: [ self load ].
        groupedByDate := self setupGroupedDate.

        gitAnalyzer := GitAnalyzer new.

        mergedMergeRequest := userMergeRequests select: [ :mr |
                                      mr merged_at isNotNil ].


        noVerificationMergeRequests := mergedMergeRequest select: [
                                               :userMergeRequest |
                                               | validation |
                                               validation := gitAnalyzer
                                                                     analyseMergeResquestValidation:
                                                                     userMergeRequest.

                                               userMergeRequest merge_user
                                               = userMergeRequest author and:
                                                       (validation at: #duration)
                                                       < 1 minutes ].


        noVerificationMergeRequests do: [ :userMergeRequest |
                dateOver := self transformDate: userMergeRequest created_at to: over.
                groupedByDate
                        at: dateOver printString
                        ifPresent: [ :value | value add: userMergeRequest ] ].


        groupedByDate := groupedByDate collect: [ :group | group size ].

        ^ groupedByDate average asFloat
]

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

        ^ 'number of merge requests merged by its author under a minute after creation'
]

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

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

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

        ^ 'SelfMergedUnderAMinuteMergeRequest'
]

1	Class {
2	#name : #SelfMergedUnderAMinuteMergeRequestMetric,
3	#superclass : #UserMergeRequestMetric,
4	#category : #'GitLabHealth-Model-Analysis'
5	}
6
7	{ #category : #calculating }
8	SelfMergedUnderAMinuteMergeRequestMetric >> calculate [	1✔
9		1✔
10	\| groupedByDate mergedMergeRequest noVerificationMergeRequests dateOver gitAnalyzer \|	1✔
11	userMergeRequests ifNil: [ self load ].	1✔
12	groupedByDate := self setupGroupedDate.	1✔
13		1✔
14	gitAnalyzer := GitAnalyzer new.	1✔
15		1✔
16	mergedMergeRequest := userMergeRequests select: [ :mr \|	1✔
17	mr merged_at isNotNil ].	1✔
18		1✔
19		1✔
20	noVerificationMergeRequests := mergedMergeRequest select: [	1✔
21	:userMergeRequest \|	1✔
22	\| validation \|	1✔
23	validation := gitAnalyzer	1✔
24	analyseMergeResquestValidation:	1✔
25	userMergeRequest.	1✔
26		1✔
27	userMergeRequest merge_user	1✔
28	= userMergeRequest author and:	1✔
29	(validation at: #duration)	1✔
30	< 1 minutes ].	1✔
31		1✔
32		1✔
33	noVerificationMergeRequests do: [ :userMergeRequest \|	1✔
34	dateOver := self transformDate: userMergeRequest created_at to: over.	1✔
35	groupedByDate	1✔
36	at: dateOver printString	1✔
37	ifPresent: [ :value \| value add: userMergeRequest ] ].	1✔
38		1✔
39		1✔
40	groupedByDate := groupedByDate collect: [ :group \| group size ].	1✔
41		1✔
42	^ groupedByDate average asFloat	1✔
43	]	1✔
44
45	{ #category : #accessing }
NEW 46	SelfMergedUnderAMinuteMergeRequestMetric >> description [	×
NEW 47		×
NEW 48	^ 'number of merge requests merged by its author under a minute after creation'	×
NEW 49	]	×
50
51	{ #category : #loading }
52	SelfMergedUnderAMinuteMergeRequestMetric >> load [	1✔
53		1✔
54	userMergeRequests := self	1✔
55	loadUserCompleteMergeRequestsSince:	1✔
56	(period at: #since)	1✔
57	until: (period at: #until)	1✔
58	]	1✔
59
60	{ #category : #accessing }
NEW 61	SelfMergedUnderAMinuteMergeRequestMetric >> name [	×
NEW 62		×
NEW 63	^ 'SelfMergedUnderAMinuteMergeRequest'	×
NEW 64	]	×

moosetechnology / GitProjectHealth / 13808971590

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