define GtPhlowToolCommonViewModel [feenkcom/gtoolkit#3422]

JurajKubelka · JurajKubelka · commit c227ffcd5bb6 · 2024-10-30T18:16:17.000-03:00
diff --git a/src/GToolkit-Inspector/GtInspector.class.st b/src/GToolkit-Inspector/GtInspector.class.st
@@ -162,6 +162,10 @@ GtInspector >> initialize [
 	self initializeListeners.
 	self matchParent.
 	self playgroundElement collapse.
+	self phlow 
+		accessTool: (GtPhlowToolClassType forClass: self class) 
+		viewModel: #objectHolder 
+		object: #object.
 ]
 
 { #category : #initialization }
diff --git a/src/GToolkit-Inspector/GtInspectorTool.class.st b/src/GToolkit-Inspector/GtInspectorTool.class.st
@@ -75,6 +75,13 @@ GtInspectorTool >> context: aPhlowContext [
 	self objectHolder context: aPhlowContext
 ]
 
+{ #category : #accessing }
+GtInspectorTool >> contextWithNavigationContext: aNavigationContext [
+	"Tools may use phlow context with the given navigation context"
+
+	self context: (GtPhlowContext new navigationContext: aNavigationContext)
+]
+
 { #category : #'api - accessing' }
 GtInspectorTool >> databasesRegistry: aDatabasesRegistry [
 	databasesRegistry := aDatabasesRegistry
