From eb258ebad432e69b74414dc3475b015301f35f58 Mon Sep 17 00:00:00 2001
From: DEMAREY Christophe <christophe.demarey@inria.fr>
Date: Thu, 30 May 2024 11:20:15 +0200
Subject: [PATCH] fix bad label before first progress event. fixes #1550

---
 src/Spec2-Dialogs/SpProgressDialog.class.st | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/Spec2-Dialogs/SpProgressDialog.class.st b/src/Spec2-Dialogs/SpProgressDialog.class.st
index 5997d79e..c54791ec 100644
--- a/src/Spec2-Dialogs/SpProgressDialog.class.st
+++ b/src/Spec2-Dialogs/SpProgressDialog.class.st
@@ -100,7 +100,8 @@ SpProgressDialog >> initializePresenters [
 		borderWidth: 5;
 		add: (label := self newLabel) expand: false;
 		add: (progressBar := self newProgressBar) expand: false;
-		yourself)
+		yourself).
+	self progressPercent: 0.
 ]
 
 { #category : 'accessing' }