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' }