add GtPharoStreamingMethodsScrollToTargetSignal>>#gtPromiseFor: [fe…

…enkcom/gtoolkit#3908]
feenkcom · Jul 19, 2024 · 297a0c0 · 297a0c0
1 parent 7a88946
commit 297a0c0
Show file tree

Hide file tree

Showing 2 changed files with 13 additions and 1 deletion.
diff --git a/src/GToolkit-Pharo-Coder-Method-UI/GtPharoStreamingMethodsCoderElementSignal.class.st b/src/GToolkit-Pharo-Coder-Method-UI/GtPharoStreamingMethodsCoderElementSignal.class.st
@@ -1,6 +1,6 @@
 Class {
 	#name : #GtPharoStreamingMethodsCoderElementSignal,
-	#superclass : #BeaconSignal,
+	#superclass : #ContextStackSignal,
 	#instVars : [
 		'element'
 	],

diff --git a/src/GToolkit-Pharo-Coder-Method-UI/GtPharoStreamingMethodsScrollToTargetSignal.class.st b/src/GToolkit-Pharo-Coder-Method-UI/GtPharoStreamingMethodsScrollToTargetSignal.class.st
@@ -8,6 +8,18 @@ Class {
 	#category : #'GToolkit-Pharo-Coder-Method-UI-Beacon Signals'
 }
 
+{ #category : #'gt - extensions' }
+GtPharoStreamingMethodsScrollToTargetSignal >> gtPromiseFor: aView [
+	<gtView>
+	self promise ifNil: [ ^ aView empty ].
+
+	^ aView forward
+		title: 'Promise';
+		priority: 1;
+		object: [ self promise ];
+		view: #gtPromiseFor:
+]
+
 { #category : #printing }
 GtPharoStreamingMethodsScrollToTargetSignal >> printOneLineContentsOn: stream [
 	self scrollTarget printTargetNameOn: stream.