Minor tweaks in Morphic.

CoreUpdates/6800-DefaultColorTweaks-JuanVuletich-2024Oct24-11h09m-jmv.001.cs.st

@@ -0,0 +1,27 @@
+'From Cuis7.1 [latest update: #6792] on 24 October 2024 at 11:13:31 am'!
+
+!Theme methodsFor: 'colors' stamp: 'jmv 10/24/2024 11:03:23'!
+defaultButtonColor
+
+	^ self defaultWindowColor darker! !
+
+
+!TaskbarMorph methodsFor: 'initialization' stamp: 'jmv 10/24/2024 10:44:59'!
+defaultColor
+	^ `Color lightGray`! !
+
+
+!PluggableButtonMorph methodsFor: 'initialization' stamp: 'jmv 10/24/2024 10:56:43'!
+defaultColor
+	^Theme current defaultButtonColor! !
+
+
+!Theme methodsFor: 'tool colors' stamp: 'jmv 10/24/2024 10:59:37'!
+defaultWindowColor
+	^ `Color veryVeryLightGray`! !
+
+
+!LayoutMorph methodsFor: 'initialization' stamp: 'jmv 10/24/2024 10:45:43'!
+defaultColor
+	^ Theme current defaultWindowColor! !
+

CoreUpdates/6801-LabelMorph-Convenience-JuanVuletich-2024Oct24-16h45m-jmv.001.cs.st

@@ -0,0 +1,12 @@
+'From Cuis7.1 [latest update: #6793] on 24 October 2024 at 4:46:07 pm'!
+
+!LabelMorph class methodsFor: 'instance creation' stamp: 'jmv 10/24/2024 14:18:43'!
+contents: aString fontSize: pointSize
+	"
+	(LabelMorph contents: 'I am a LabelMorph' fontSize: 25) openInWorld.
+	"
+	^ self basicNew
+		initWithContents: aString
+		font: (FontFamily defaultFamilyPointSize: pointSize)
+		emphasis: 0.! !
+

CoreUpdates/6802-defaultExtent-for-BoxMorph-JuanVuletich-2024Oct24-16h46m-jmv.001.cs.st

@@ -0,0 +1,12 @@
+'From Cuis7.1 [latest update: #6793] on 24 October 2024 at 4:46:37 pm'!
+
+!BoxMorph methodsFor: 'initialization' stamp: 'jmv 10/24/2024 14:21:35'!
+defaultExtent
+	^`50@40`.! !
+
+
+!BoxMorph methodsFor: 'initialization' stamp: 'jmv 10/24/2024 14:21:41'!
+initialize
+	super initialize.
+	extent := self defaultExtent.! !
+