more traces

pharo-spec · Jan 22, 2024 · 2c3adfa · 2c3adfa
1 parent a772cb1
commit 2c3adfa
Showing 1 changed file with 4 additions and 3 deletions.
diff --git a/src/BaselineOfNewTools/BaselineOfNewTools.class.st b/src/BaselineOfNewTools/BaselineOfNewTools.class.st
@@ -195,9 +195,10 @@ BaselineOfNewTools >> postload: loader package: packageSpec [
 		| size firstMorphIndex |
 		size := innerWidget submorphs size.
 		(''size := {1}'' format: { size }) traceCr.
-		(''widget := {1}, { 2 } '' format: {
-				 innerWidget.
-				 innerWidget submorphs }) traceCr.
+		(''widget := {1} '' format: { innerWidget }) traceCr.
+		(''widget submorphs := {1}'' format: { innerWidget submorphs })
+			traceCr.
+
 		firstMorphIndex := size - self presenter visiblePages + 1.
 		(''self presenter visiblePages := {1}'' format:
 			 { self presenter visiblePages }) traceCr.