10880677211

Committed 16 Sep 2024 09:01AM UTC coverage: 20.332% (-0.2%) from 20.538%

Build # 10880677211

Build Type

push

github

Committed by

web-flow

Commit Message

Merge pull request #54 from moosetechnology/metrics-fixing

Metrics fixing

Run Details

0 of 178 new or added lines in 19 files covered. (0.0%)

18 existing lines in 6 files now uncovered.

1961 of 9645 relevant lines covered (20.33%)

0.2 hits per line

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

0.0

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

moosetechnology / GitProjectHealth / 10880677211

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