Changes how standard texts in probes are created.

Author: codeZeilen

packages/Babylonian-Core.package/Text.extension/instance/bpProbeValueMorphIn..st

@@ -0,0 +1,8 @@
+*Babylonian-Core
+bpProbeValueMorphIn: traceValue
+
+	^ BPAnnotationMorph newContainerMorph 
+		addMorph: (self asMorph
+			color: (PluggableTextMorph basicNew userInterfaceTheme textColor);
+			yourself); 
+		yourself

packages/Babylonian-Core.package/Text.extension/methodProperties.json

@@ -4,5 +4,6 @@
 	"instance" : {
 		"asBPSource" : "pre 1/24/2020 15:25",
 		"asBPSourceWithoutExamples" : "pre 1/11/2021 14:56",
+		"bpProbeValueMorphIn:" : "pre 1/12/2023 13:45",
 		"textAnchorIntervals" : "pre 11/8/2019 18:46",
 		"textAnchors" : "pre 11/11/2019 09:53" } }

packages/Babylonian-UI.package/BPProbeMorph.class/instance/updateFrom..st

@@ -16,6 +16,7 @@ updateFrom: traces
 			scrollPane scroller removeAllMorphs.				
 
 			valuesMorph := (self valuesMorphFor: aTrace)
+				color: self defaultColor;
 				hResizing: #shrinkWrap;
 				yourself.
 			lineMorph setProperty: #bpValuesMorph toValue: valuesMorph.

packages/Babylonian-UI.package/BPProbeMorph.class/instance/valuesMorphFor..st

@@ -3,11 +3,12 @@ valuesMorphFor: trace
 
 	| values valuesContainer |
 	values := trace valuesForProbeId: self id.
-	values ifEmpty: [^ (self noValuesTextFor: trace) asMorph].
-	values first traceHasFailedBefore ifTrue: [^ (self exceptionTextFor: trace) asMorph].
+	values ifEmpty: [^ (self noValuesTextFor: trace) bpProbeValueMorphIn: nil].
+	values first traceHasFailedBefore ifTrue: [
+		^ (self exceptionTextFor: trace) bpProbeValueMorphIn: nil].
 
 	values := self filterValues: values throughSliderForTrace: trace.
-	values ifEmpty: [^ (self noValuesTextFor: trace) asMorph].
+	values ifEmpty: [^ (self noValuesTextFor: trace) bpProbeValueMorphIn: nil].
 
 	valuesContainer := self newContainerMorph.
 	values 

packages/Babylonian-UI.package/BPProbeMorph.class/methodProperties.json

@@ -28,9 +28,9 @@
 		"setLabelButtonClicked" : "lu 5/28/2021 21:37",
 		"updateErrorIndicatorMorphFrom:for:" : "jb 4/18/2021 20:32",
 		"updateExpressionMorphIfNecessary" : "pre 6/8/2021 11:02",
-		"updateFrom:" : "pre 6/8/2021 11:00",
+		"updateFrom:" : "pre 12/5/2022 10:43",
 		"updateLabelMorphIfNecessary" : "jb 10/28/2021 18:25",
 		"updateVisualizationMorphInside:over:for:" : "pre 5/26/2021 20:43",
 		"valueMorphFor:" : "jb 5/20/2021 01:01",
-		"valuesMorphFor:" : "jb 12/5/2021 02:45",
+		"valuesMorphFor:" : "pre 1/11/2023 10:28",
 		"visualizeButtonClickedFor:" : "pre 5/27/2021 12:06" } }