21717268368

Committed 05 Feb 2026 03:22PM UTC coverage: 65.829% (+0.1%) from 65.706%

Build # 21717268368

Build Type

push

github

Committed by

web-flow

Commit Message

Merge pull request #1586 from moosetechnology/1573-Create-a-Propagate-to-button-for-all-browser

1573 create a "propagate to" button for all browser

Coverage Stats

88 of 93 new or added lines in 5 files covered. (94.62%)

21921 of 33300 relevant lines covered (65.83%)

1.32 hits per line

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

76.19

/src/MooseIDE-Core/MiPropagateMenuCommand.class.st

Class {
        #name : 'MiPropagateMenuCommand',
        #superclass : 'MiCommand',
        #category : 'MooseIDE-Core-Command',
        #package : 'MooseIDE-Core',
        #tag : 'Command'
}

{ #category : 'default' }
MiPropagateMenuCommand class >> defaultDescription [

        ^ 'Select the tag that will be used to tag the current entities in this browser'
]

{ #category : 'default' }
MiPropagateMenuCommand class >> defaultIconName [

        ^ #mooseOutgoing
]

{ #category : 'default' }
MiPropagateMenuCommand class >> defaultName [

        ^ 'Send to...'
]

{ #category : 'testing' }
MiPropagateMenuCommand >> canBeExecuted [

        ^ self context canPropagate
]

{ #category : 'executing' }
MiPropagateMenuCommand >> execute [

        (MiAbstractBrowser allBrowsersMenuRoot: SpMenuPresenter new
                  action: [ :browserClass | self context propagateToOtherBrowser: browserClass ]) openWithSpecAtPointer
]

1	Class {
2	#name : 'MiPropagateMenuCommand',
3	#superclass : 'MiCommand',
4	#category : 'MooseIDE-Core-Command',
5	#package : 'MooseIDE-Core',
6	#tag : 'Command'
7	}
8
9	{ #category : 'default' }
10	MiPropagateMenuCommand class >> defaultDescription [	2✔
11		2✔
12	^ 'Select the tag that will be used to tag the current entities in this browser'	2✔
13	]	2✔
14
15	{ #category : 'default' }
16	MiPropagateMenuCommand class >> defaultIconName [	2✔
17		2✔
18	^ #mooseOutgoing	2✔
19	]	2✔
20
21	{ #category : 'default' }
22	MiPropagateMenuCommand class >> defaultName [	2✔
23		2✔
24	^ 'Send to...'	2✔
25	]	2✔
26
27	{ #category : 'testing' }
28	MiPropagateMenuCommand >> canBeExecuted [	2✔
29		2✔
30	^ self context canPropagate	2✔
31	]	2✔
32
33	{ #category : 'executing' }
NEW 34	MiPropagateMenuCommand >> execute [	×
NEW 35		×
NEW 36	(MiAbstractBrowser allBrowsersMenuRoot: SpMenuPresenter new	×
NEW 37	action: [ :browserClass \| self context propagateToOtherBrowser: browserClass ]) openWithSpecAtPointer	×
NEW 38	]	×

moosetechnology / MooseIDE / 21717268368

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