From c65a3eccf2535e1a4ee3d3ba275704e6ae922b05 Mon Sep 17 00:00:00 2001
From: Juraj Kubelka <juraj.kubelka.yuyv8@slmail.me>
Date: Wed, 6 Nov 2024 16:22:37 -0300
Subject: [PATCH] remove `BlUseAsyncFeatures` usage, register promise to a
 space

---
 src/GToolkit-Presenter/GtLiveSlide.class.st | 24 ++++++++-------------
 1 file changed, 9 insertions(+), 15 deletions(-)

diff --git a/src/GToolkit-Presenter/GtLiveSlide.class.st b/src/GToolkit-Presenter/GtLiveSlide.class.st
index 3a4d6bc5..ce7d4db8 100644
--- a/src/GToolkit-Presenter/GtLiveSlide.class.st
+++ b/src/GToolkit-Presenter/GtLiveSlide.class.st
@@ -255,7 +255,6 @@ GtLiveSlide >> previousStepWith: aSlider [
 
 { #category : #accessing }
 GtLiveSlide >> queueAsyncUpdate: aSpace [
-
 	"Submit a task to cache the receiver's elements"
 
 	| aSliceCommand |
@@ -263,20 +262,15 @@ GtLiveSlide >> queueAsyncUpdate: aSpace [
 
 	aSliceCommand := GtSlideCommand new slide: self.
 
-	BlUseAsyncFeatures
-		ifEnabledDo: [ 
-			BlFrameTelemetry
-				time: [ 
-					'Schedule slide {1} update command in UI pool' format:
-						{ self class name } ]
-				during: [ [ aSliceCommand execute ] asAsyncFuture 
-					await: self futureConfiguration ] ]
-		otherwise: [ 
-			BlFrameTelemetry
-				time: [ 
-					'Execute slide {1} update command directly' format:
-						{ self class name } ]
-				during: [ aSliceCommand execute ] ]
+	BlFrameTelemetry
+		time: [ 
+			'Schedule slide {1} update command in UI pool' format:
+				{ self class name } ]
+		during: [
+			| aPromise |
+			aPromise := [ aSliceCommand execute ] asAsyncFuture 
+				await: self futureConfiguration.
+			aSpace enqueueTask: (BlPromiseTask new promise: aPromise) ]
 ]
 
 { #category : #accessing }