11163879852

Committed 03 Oct 2024 02:24PM UTC coverage: 58.906% (+25.2%) from 33.667%

Build # 11163879852

Build Type

push

github

Committed by

web-flow

Commit Message

Merge pull request #75 from moosetechnology/develop

V1.0.0

Run Details

6210 of 8212 new or added lines in 80 files covered. (75.62%)

130 existing lines in 6 files now uncovered.

8903 of 15114 relevant lines covered (58.91%)

0.59 hits per line

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

84.62

/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		1✔
36	groupedByDate	1✔
37	at: dateOver printString	1✔
38	ifPresent: [ :value \| value add: userMergeRequest ] ].	1✔
39		1✔
40		1✔
41	groupedByDate := groupedByDate collect: [ :group \| group size ].	1✔
42		1✔
43	^ groupedByDate average asFloat	1✔
44	]	1✔
45
46	{ #category : #accessing }
NEW 47	SelfMergedUnderAMinuteMergeRequestMetric >> description [	×
NEW 48		×
NEW 49	^ 'number of merge requests merged by its author under a minute after creation'	×
NEW 50	]	×
51
52	{ #category : #loading }
53	SelfMergedUnderAMinuteMergeRequestMetric >> load [	1✔
54		1✔
55	userMergeRequests := self	1✔
56	loadUserCompleteMergeRequestsSince:	1✔
57	(period at: #since)	1✔
58	until: (period at: #until)	1✔
59	]	1✔
60
61	{ #category : #accessing }
NEW 62	SelfMergedUnderAMinuteMergeRequestMetric >> name [	×
NEW 63		×
NEW 64	^ 'SelfMergedUnderAMinuteMergeRequest'	×
NEW 65	]	×

moosetechnology / GitProjectHealth / 11163879852

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