Adjusts layout properties for annotation morphs

hpi-swa-lab · Aug 9, 2023 · 67dac77 · 67dac77
1 parent fbc6f67
commit 67dac77
Show file tree

Hide file tree

Showing 13 changed files with 21 additions and 21 deletions.
diff --git a/...onian-UI.package/BPAnnotationMorph.class/instance/editFieldFor.text.onChange.onAccept..st b/...onian-UI.package/BPAnnotationMorph.class/instance/editFieldFor.text.onChange.onAccept..st
@@ -11,7 +11,7 @@ editFieldFor: model text: getTextSelector onChange: setTextSelector onAccept: ac
 		borderWidth: 0;
 		editTextSelector: setTextSelector;
 		vResizing: #shrinkWrap;
-		hResizing: #rigid;
+		hResizing: #shrinkWrap;
 		wrapFlag: true;
 		wantsFrameAdornments: false; 
 		cellPositioning: #topLeft;

diff --git a/packages/Babylonian-UI.package/BPAnnotationMorph.class/instance/initialize.st b/packages/Babylonian-UI.package/BPAnnotationMorph.class/instance/initialize.st
@@ -11,7 +11,7 @@ initialize
 		listDirection: #leftToRight;
 		vResizing: #shrinkWrap;
 		cellInset: 1; 
-		layoutInset: 1.
+		layoutInset: 5@1.
 
 	BPStyler 
 		withSidebarAnnotations: [

diff --git a/packages/Babylonian-UI.package/BPAnnotationMorph.class/instance/rightSideOffset.st b/packages/Babylonian-UI.package/BPAnnotationMorph.class/instance/rightSideOffset.st
diff --git a/packages/Babylonian-UI.package/BPAnnotationMorph.class/instance/step.st b/packages/Babylonian-UI.package/BPAnnotationMorph.class/instance/step.st
diff --git a/packages/Babylonian-UI.package/BPAnnotationMorph.class/methodProperties.json b/packages/Babylonian-UI.package/BPAnnotationMorph.class/methodProperties.json
@@ -17,7 +17,7 @@
 		"codeContentChanged" : "pre 1/21/2021 16:45",
 		"containingBrowser" : "pre 1/6/2021 19:45",
 		"createErrorIndicatorFor:" : "pre 2/22/2021 12:15",
-		"editFieldFor:text:onChange:onAccept:" : "pre 6/7/2021 16:27",
+		"editFieldFor:text:onChange:onAccept:" : "joabe 8/9/2023 16:11",
 		"editFieldInitialContent:onChange:onAccept:" : "pre 7/20/2022 17:19",
 		"editFieldStyledInitialContent:onChange:onAccept:" : "pre 7/20/2022 17:17",
 		"emptyTraces" : "pre 5/3/2021 16:56",
@@ -31,7 +31,7 @@
 		"iconSize" : "pre 7/24/2019 13:18",
 		"id" : "pre 7/2/2019 16:38",
 		"id:" : "pre 7/2/2019 16:38",
-		"initialize" : "joabe 5/31/2023 14:28",
+		"initialize" : "joabe 8/9/2023 16:59",
 		"isAssertion" : "pre 7/3/2019 11:11",
 		"isBPAnnotationMorph" : "pre 7/3/2019 11:10",
 		"isExample" : "pre 7/23/2019 12:47",
@@ -51,11 +51,9 @@
 		"openInBrowser" : "jb 2/22/2022 20:45",
 		"refreshTextComposition" : "pre 1/11/2021 11:31",
 		"removeButtonClicked" : "jb 12/7/2020 18:57",
-		"rightSideOffset" : "ek 7/14/2023 11:38",
 		"scrollBarSize" : "pre 7/23/2019 11:18",
 		"smallFontHeight" : "pre 10/6/2020 16:54",
 		"startTag" : "pre 7/25/2019 15:42",
-		"step" : "ek 7/14/2023 11:38",
 		"stopTag" : "pre 7/25/2019 15:42",
 		"textEmphasis" : "pre 11/14/2019 14:29",
 		"updateLabelGraphicOf:labeled:" : "joabe 7/1/2023 20:16",

diff --git a/packages/Babylonian-UI.package/BPExampleMorph.class/instance/initialize.st b/packages/Babylonian-UI.package/BPExampleMorph.class/instance/initialize.st
@@ -14,4 +14,6 @@ initialize
 	self 
 		cellPositioning: #leftCenter;
 		cellInset: 0;
-		cellGap: ((0.7 * self fontWidth) rounded max: 2)
+		cellGap: ((0.7 * self fontWidth) rounded max: 2);
+		layoutInset: 20@2;
+		hResizing: #spaceFill.
diff --git a/packages/Babylonian-UI.package/BPExampleMorph.class/instance/step.st b/packages/Babylonian-UI.package/BPExampleMorph.class/instance/step.st
@@ -2,7 +2,6 @@ stepping and presenter
 step
 
 	| trace |
-	super step.
 	trace := self example currentTrace.
 	(trace notNil and: [trace exampleErrored])
 		ifTrue: [self ensureErrorIndicatorFor: trace]

diff --git a/packages/Babylonian-UI.package/BPExampleMorph.class/methodProperties.json b/packages/Babylonian-UI.package/BPExampleMorph.class/methodProperties.json
@@ -28,7 +28,7 @@
 		"example:" : "jb 12/7/2020 18:58",
 		"expand" : "pre 7/19/2022 15:29",
 		"expandInExamplesMorph" : "pre 7/19/2022 15:41",
-		"initialize" : "ek 7/14/2023 14:07",
+		"initialize" : "joabe 8/9/2023 17:00",
 		"isCollapsed" : "pre 1/12/2021 10:20",
 		"isExample" : "pre 9/30/2020 10:34",
 		"isExampleActive" : "pre 9/30/2020 10:34",
@@ -40,7 +40,7 @@
 		"openExampleInProbeLog" : "joabe 5/9/2023 17:37",
 		"openInProbeLogClicked" : "joabe 5/9/2023 17:34",
 		"removeButtonClicked" : "jb 1/10/2022 19:46",
-		"step" : "ek 7/14/2023 13:48",
+		"step" : "joabe 8/9/2023 13:56",
 		"textEmphasis" : "pre 9/30/2020 10:35",
 		"timeoutButtonClicked" : "joabe 9/27/2022 22:35",
 		"updateAssertResultIcon" : "jb 12/30/2021 22:33",

diff --git a/packages/Babylonian-UI.package/BPMethodExampleMorph.class/instance/defaultCellInset.st b/packages/Babylonian-UI.package/BPMethodExampleMorph.class/instance/defaultCellInset.st
@@ -0,0 +1,4 @@
+private - ui
+defaultCellInset
+
+	^ 3@0
diff --git a/packages/Babylonian-UI.package/BPMethodExampleMorph.class/instance/defaultLayoutInset.st b/packages/Babylonian-UI.package/BPMethodExampleMorph.class/instance/defaultLayoutInset.st
@@ -0,0 +1,4 @@
+private - ui
+defaultLayoutInset
+
+	^ 20@0
diff --git a/packages/Babylonian-UI.package/BPMethodExampleMorph.class/methodProperties.json b/packages/Babylonian-UI.package/BPMethodExampleMorph.class/methodProperties.json
@@ -5,5 +5,7 @@
 		"addArgumentScriptMorphs" : "joabe 7/4/2023 11:23",
 		"addExampleSpecificMorphs" : "pre 1/8/2021 13:48",
 		"addReceiverConstructorMorph" : "joabe 7/4/2023 11:24",
+		"defaultCellInset" : "joabe 8/9/2023 16:46",
+		"defaultLayoutInset" : "joabe 8/9/2023 16:46",
 		"newSpecimenSelectionButtonOnClick:" : "jb 12/5/2021 01:50",
 		"selectLiveSpecimen:then:" : "pre 1/10/2023 16:19" } }
diff --git a/packages/Babylonian-UI.package/BPTraceBasedMorph.class/instance/step.st b/packages/Babylonian-UI.package/BPTraceBasedMorph.class/instance/step.st
@@ -3,7 +3,7 @@ step
 
 	| newTraces tracesChanged |
 	self methodReference ifNil: [^ false].
-	super step.
+
 	self resetHeight.
 
 	newTraces := self getTraces asIdentitySet.

diff --git a/packages/Babylonian-UI.package/BPTraceBasedMorph.class/methodProperties.json b/packages/Babylonian-UI.package/BPTraceBasedMorph.class/methodProperties.json
@@ -12,7 +12,7 @@
 		"removeLinesWithoutCurrentTrace:" : "jb 12/7/2020 19:00",
 		"resetHeight" : "pre 1/11/2021 13:59",
 		"rightSideOffset" : "ek 7/14/2023 11:49",
-		"step" : "ek 7/14/2023 11:37",
+		"step" : "joabe 8/9/2023 13:55",
 		"stepTime" : "pre 8/20/2020 17:35",
 		"update:" : "jb 12/7/2020 19:00",
 		"updateFrom:" : "jb 12/7/2020 19:00" } }