21393807421

Committed 27 Jan 2026 10:33AM UTC coverage: 65.818% (+0.5%) from 65.314%

Build # 21393807421

Build Type

push

github

Committed by

web-flow

Commit Message

Merge pull request #1571 from moosetechnology/has-settings-fixes

Has settings fixes

Coverage Stats

11 of 47 new or added lines in 5 files covered. (23.4%)

1 existing line in 1 file now uncovered.

21805 of 33129 relevant lines covered (65.82%)

1.32 hits per line

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

0.0

/src/MooseIDE-ClassBlueprint/MiClassBlueprintBrowser.class.st

"
I am a visualization that displays the structure of a class.
Accepted entities: a famix class.

This visualization is used to understand a class structure and presents dead artifacts within a class.
"
Class {
        #name : 'MiClassBlueprintBrowser',
        #superclass : 'MiAbstractVisualizationBrowser',
        #category : 'MooseIDE-ClassBlueprint',
        #package : 'MooseIDE-ClassBlueprint'
}

{ #category : 'accessing' }
MiClassBlueprintBrowser class >> mapClass [

        ^ MiClassBlueprintVisualization
]

{ #category : 'world menu' }
MiClassBlueprintBrowser class >> menuCommandOn: aBuilder [

        <worldMenu>
        <miBrowsersMenu>
        ^ self buildMenuItemIn: aBuilder
]

{ #category : 'world menu' }
MiClassBlueprintBrowser class >> menuItem [

        ^ #ClassBlueprintBrowser
]

{ #category : 'world menu' }
MiClassBlueprintBrowser class >> menuPriority [

        ^ self menuVisualizationToolsPriority + 5
]

{ #category : 'instance creation' }
MiClassBlueprintBrowser class >> newModel [

        ^ MiClassBlueprintModel new
]

{ #category : 'instance creation' }
MiClassBlueprintBrowser class >> open [ 
        <script>
        super open
]

{ #category : 'instance creation' }
MiClassBlueprintBrowser class >> title [ 
        ^ 'Class Blueprint'
]

{ #category : 'testing' }
MiClassBlueprintBrowser >> canFollowEntity: anObject [

        ^ anObject usesFamixTrait: FamixTType
]

{ #category : 'actions' }
MiClassBlueprintBrowser >> followEntity: anEntity [

        super followEntity: anEntity.
        specModel currentType: anEntity.
        self runVisualization
]

{ #category : 'actions' }
MiClassBlueprintBrowser >> updateWindowTitleWith: anEntity [

        self withWindowDo: [ :window |
                window title: 'Blueprint of' , anEntity name ]
]

1	"
2	I am a visualization that displays the structure of a class.
3	Accepted entities: a famix class.
4
5	This visualization is used to understand a class structure and presents dead artifacts within a class.
6	"
7	Class {
8	#name : 'MiClassBlueprintBrowser',
9	#superclass : 'MiAbstractVisualizationBrowser',
10	#category : 'MooseIDE-ClassBlueprint',
11	#package : 'MooseIDE-ClassBlueprint'
12	}
13
14	{ #category : 'accessing' }
NEW 15	MiClassBlueprintBrowser class >> mapClass [	×
NEW 16		×
NEW 17	^ MiClassBlueprintVisualization	×
NEW 18	]	×
19
20	{ #category : 'world menu' }
21	MiClassBlueprintBrowser class >> menuCommandOn: aBuilder [	×
22		×
23	<worldMenu>	×
24	<miBrowsersMenu>	×
25	^ self buildMenuItemIn: aBuilder	×
26	]	×
27
28	{ #category : 'world menu' }
29	MiClassBlueprintBrowser class >> menuItem [	×
30		×
31	^ #ClassBlueprintBrowser	×
32	]	×
33
34	{ #category : 'world menu' }
35	MiClassBlueprintBrowser class >> menuPriority [	×
36		×
37	^ self menuVisualizationToolsPriority + 5	×
38	]	×
39
40	{ #category : 'instance creation' }
NEW 41	MiClassBlueprintBrowser class >> newModel [	×
NEW 42		×
NEW 43	^ MiClassBlueprintModel new	×
NEW 44	]	×
45
46	{ #category : 'instance creation' }
47	MiClassBlueprintBrowser class >> open [	×
48	<script>	×
49	super open	×
50	]	×
51
52	{ #category : 'instance creation' }
53	MiClassBlueprintBrowser class >> title [	×
54	^ 'Class Blueprint'	×
55	]	×
56
57	{ #category : 'testing' }
58	MiClassBlueprintBrowser >> canFollowEntity: anObject [	×
59		×
NEW 60	^ anObject usesFamixTrait: FamixTType	×
61	]	×
62
63	{ #category : 'actions' }
64	MiClassBlueprintBrowser >> followEntity: anEntity [	×
65		×
66	super followEntity: anEntity.	×
NEW 67	specModel currentType: anEntity.	×
NEW 68	self runVisualization	×
UNCOV 69	]	×
70
71	{ #category : 'actions' }
72	MiClassBlueprintBrowser >> updateWindowTitleWith: anEntity [	×
73		×
74	self withWindowDo: [ :window \|	×
75	window title: 'Blueprint of' , anEntity name ]	×
76	]	×

moosetechnology / MooseIDE / 21393807421

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