add element phlow spawnObject:viewName: and similar API variations [feenkcom/gtoolkit#5119]

JurajKubelka · JurajKubelka · commit 6be8fd3cbd47 · 2026-06-19T10:29:59.000-04:00
diff --git a/src/GToolkit-Phlow/GtPhlowElementContext.class.st b/src/GToolkit-Phlow/GtPhlowElementContext.class.st
@@ -527,6 +527,24 @@ GtPhlowElementContext >> selectObject: anObject [
 	self selectTool: anObject gtDefaultInspectorTool
 ]
 
+{ #category : #'api - events' }
+GtPhlowElementContext >> selectObject: anObject viewName: aViewName [
+	"Select an object and request to select its view called aViewName.
+	aViewName is kind of String object."
+
+	self selectTool: anObject gtDefaultInspectorTool viewName: aViewName
+]
+
+{ #category : #'api - events' }
+GtPhlowElementContext >> selectObject: anObject withSelectionState: aSelectionStateOrNil [
+	"Select a tool and request to display specific part of its tool using aSelectionStateOrNil.
+	aSelectionStateOrNil is kind of GtPhlowToolSelectionState object or nil."
+
+	self
+		selectTool: anObject gtDefaultInspectorTool
+		withSelectionState: aSelectionStateOrNil
+]
+
 { #category : #'api - events' }
 GtPhlowElementContext >> selectPreviousEvent: aPreviousSelectEvent [
 	| aNewEvent |
@@ -550,6 +568,32 @@ GtPhlowElementContext >> selectTool: aTool [
 		sourceElement: self element) 
 ]
 
+{ #category : #'api - events' }
+GtPhlowElementContext >> selectTool: aTool viewName: aViewName [
+	"Select a tool and request to select its view called aViewName.
+	aTool is kind of GtPhlowTool object.
+	aViewName is kind of String object."
+
+	self element
+		fireEvent: (GtPhlowObjectToSelect new
+				tool: aTool;
+				toolTabIdentifier: aTool toolTabIdentifier viewName: aViewName;
+				sourceElement: self element)
+]
+
+{ #category : #'api - events' }
+GtPhlowElementContext >> selectTool: aTool withSelectionState: aSelectionStateOrNil [
+	"Select a tool and request to display specific part of the tool using aSelectionStateOrNil.
+	aTool is kind of GtPhlowTool object.
+	aSelectionStateOrNil is kind of GtPhlowToolSelectionState object or nil."
+
+	self element
+		fireEvent: (GtPhlowObjectToSelect new
+				tool: aTool;
+				selectionState: aSelectionStateOrNil;
+				sourceElement: self element)
+]
+
 { #category : #'api - space' }
 GtPhlowElementContext >> showObject: anObject [
 	^ BlSpace new
@@ -589,13 +633,55 @@ GtPhlowElementContext >> spawnObject: anObject [
 	^ self spawnTool: anObject gtDefaultInspectorTool
 ]
 
+{ #category : #'api - events' }
+GtPhlowElementContext >> spawnObject: anObject viewName: aViewName [
+	"Spawn an object and request to select its view called aViewName.
+	aViewName is kind of String object."
+
+	^ self spawnTool: anObject gtDefaultInspectorTool viewName: aViewName
+]
+
 { #category : #'api - events' }
 GtPhlowElementContext >> spawnObject: anObject withDestination: aPhlowDestination [
 	self 
 		spawnTool: anObject gtDefaultInspectorTool
 		withDestination: aPhlowDestination
 ]
 
+{ #category : #'api - events' }
+GtPhlowElementContext >> spawnObject: anObject withDestination: aPhlowDestination viewName: aViewName [
+	"Spawn an object and request to select its view called aViewName.
+	aPhlowDestination is kind of GtPhlowSpawnDesiredDestination object.
+	aViewName is kind of String object."
+
+	self
+		spawnTool: anObject gtDefaultInspectorTool
+		withDestination: aPhlowDestination
+		viewName: aViewName
+]
+
+{ #category : #'api - events' }
+GtPhlowElementContext >> spawnObject: anObject withDestination: aPhlowDestination withSelectionState: aSelectionStateOrNil [
+	"Spawn a tool at a destination and request to display specific part of the tool using aSelectionStateOrNil.
+	aPhlowDestination is kind of GtPhlowSpawnDesiredDestination object.
+	aSelectionStateOrNil is kind of GtPhlowToolSelectionState object or nil."
+
+	self
+		spawnTool: anObject gtDefaultInspectorTool
+		withDestination: aPhlowDestination
+		withSelectionState: aSelectionStateOrNil
+]
+
+{ #category : #'api - events' }
+GtPhlowElementContext >> spawnObject: anObject withSelectionState: aSelectionStateOrNil [
+	"Spawn a tool at a destination and request to display specific part of the tool using aSelectionStateOrNil.
+	aSelectionStateOrNil is kind of GtPhlowToolSelectionState object or nil."
+
+	^ self
+		spawnTool: anObject gtDefaultInspectorTool
+		withSelectionState: aSelectionStateOrNil
+]
+
 { #category : #'api - space' }
 GtPhlowElementContext >> spawnOrShowObject: anObject [
 	<return: #BlSpace or: nil>
@@ -621,17 +707,71 @@ GtPhlowElementContext >> spawnTool: aTool [
 		withDestination: GtPhlowSpawnDesiredDestination defaultDestination
 ]
 
+{ #category : #'api - events' }
+GtPhlowElementContext >> spawnTool: aTool viewName: aViewName [
+	"Spawn a tool and request to select its view called aViewName.
+	aViewName is kind of String object."
+
+	^ self
+		spawnTool: aTool
+		withDestination: GtPhlowSpawnDesiredDestination defaultDestination
+		viewName: aViewName
+]
+
 { #category : #'api - events' }
 GtPhlowElementContext >> spawnTool: aTool withDestination: aPhlowDestination [
+	^ self
+		spawnTool: aTool
+		withDestination: aPhlowDestination
+		withSelectionState: nil
+]
+
+{ #category : #'api - events' }
+GtPhlowElementContext >> spawnTool: aTool withDestination: aPhlowDestination viewName: aViewName [
+	"Spawn a tool and request to select its view called aViewName.
+	aTool is kind of GtPhlowTool object.
+	aPhlowDestination is kind of GtPhlowSpawnDesiredDestination object.
+	aViewName is kind of String object."
+
 	| anEvent |
 	anEvent := GtPhlowObjectToSpawn new
 			tool: aTool;
 			spawnDestination: aPhlowDestination;
+			toolTabIdentifier: aTool toolTabIdentifier viewName: aViewName;
 			sourceElement: self element.
 	self element fireEvent: anEvent.
 	^ anEvent
 ]
 
+{ #category : #'api - events' }
+GtPhlowElementContext >> spawnTool: aTool withDestination: aPhlowDestination withSelectionState: aSelectionStateOrNil [
+	"Spawn a tool at a destination and request to display specific part of the tool using aSelectionStateOrNil.
+	aTool is kind of GtPhlowTool object.
+	aPhlowDestination is kind of GtPhlowSpawnDesiredDestination object.
+	aSelectionStateOrNil is kind of GtPhlowToolSelectionState object or nil."
+
+	| anEvent |
+	anEvent := GtPhlowObjectToSpawn new
+			tool: aTool;
+			spawnDestination: aPhlowDestination;
+			selectionState: aSelectionStateOrNil;
+			sourceElement: self element.
+	self element fireEvent: anEvent.
+	^ anEvent
+]
+
+{ #category : #'api - events' }
+GtPhlowElementContext >> spawnTool: aTool withSelectionState: aSelectionStateOrNil [
+	"Spawn a tool and request to display specific part of the tool using aSelectionStateOrNil.
+	aTool is kind of GtPhlowTool object.
+	aSelectionStateOrNil is kind of GtPhlowToolSelectionState object or nil."
+
+	^ self
+		spawnTool: aTool
+		withDestination: GtPhlowSpawnDesiredDestination defaultDestination
+		withSelectionState: aSelectionStateOrNil
+]
+
 { #category : #'api - updating' }
 GtPhlowElementContext >> syncUpdate [
 	self entity updateContent: self element.
diff --git a/src/GToolkit-Phlow/TGtPhlowWithSelectionState.trait.st b/src/GToolkit-Phlow/TGtPhlowWithSelectionState.trait.st
@@ -27,13 +27,13 @@ TGtPhlowWithSelectionState >> selectionStateDo: aSelectionStateBlock ifAbsent: a
 ]
 
 { #category : #'api - selection state' }
-TGtPhlowWithSelectionState >> tabName: aString [
-	self toolTabIdentifier: GtPhlowTool default toolTabIdentifier tabName: aString
-]
-
-{ #category : #'api - selection state' }
-TGtPhlowWithSelectionState >> toolTabIdentifier: aToolTabIdentifier tabName: aString [
+TGtPhlowWithSelectionState >> toolTabIdentifier: aToolTabIdentifier viewName: aString [
 	selectionState := GtPhlowTabbedToolSelectionState new
 			targetToolIdentifier: aToolTabIdentifier;
 			tabIdentifier: (GtPhlowTabName new string: aString asString)
 ]
+
+{ #category : #'api - selection state' }
+TGtPhlowWithSelectionState >> viewName: aString [
+	self toolTabIdentifier: GtPhlowTool default toolTabIdentifier viewName: aString
+]
