diff --git a/src/Squot.package/SquotPluggableWorkspace.class/instance/buildWith..st b/src/Squot.package/SquotPluggableWorkspace.class/instance/buildWith..st
index e102df092..9afe3ead1 100644
--- a/src/Squot.package/SquotPluggableWorkspace.class/instance/buildWith..st
+++ b/src/Squot.package/SquotPluggableWorkspace.class/instance/buildWith..st
@@ -1,3 +1,5 @@
 toolbuilder
 buildWith: builder
-	^ self buildCodePaneWith: builder
\ No newline at end of file
+	^ (self buildCodePaneWith: builder)
+		minimumHeight: (self minHeightWith: builder);
+		yourself
\ No newline at end of file
diff --git a/src/Squot.package/SquotPluggableWorkspace.class/instance/minHeightWith..st b/src/Squot.package/SquotPluggableWorkspace.class/instance/minHeightWith..st
new file mode 100644
index 000000000..bf182d553
--- /dev/null
+++ b/src/Squot.package/SquotPluggableWorkspace.class/instance/minHeightWith..st
@@ -0,0 +1,3 @@
+toolbuilder
+minHeightWith: builder
+	^ builder inputFieldHeightFor: 3 "lines"
\ No newline at end of file
diff --git a/src/Squot.package/SquotPluggableWorkspace.class/methodProperties.json b/src/Squot.package/SquotPluggableWorkspace.class/methodProperties.json
index f6c05f73e..399606de6 100644
--- a/src/Squot.package/SquotPluggableWorkspace.class/methodProperties.json
+++ b/src/Squot.package/SquotPluggableWorkspace.class/methodProperties.json
@@ -2,8 +2,9 @@
 	"class" : {
 		 },
 	"instance" : {
-		"buildWith:" : "mad 9/15/2023 16:17",
+		"buildWith:" : "mad 10/19/2023 18:01",
 		"contents:notifying:" : "mad 9/13/2023 17:44",
 		"evaluate:notifying:ifFail:" : "mad 9/13/2023 17:40",
+		"minHeightWith:" : "mad 10/19/2023 18:01",
 		"onSave" : "mad 9/10/2023 21:03",
 		"onSave:" : "mad 9/10/2023 21:03" } }