[core] space respects theme background, Live presentaion is first one…

… before raw
pharo-graphics · Nov 9, 2017 · b29cabb · b29cabb
1 parent 0b61df4
commit b29cabb
Show file tree

Hide file tree

Showing 4 changed files with 11 additions and 3 deletions.
diff --git a/src/Bloc-Animation.package/BlCompositeAnimation.class/class/with..st b/src/Bloc-Animation.package/BlCompositeAnimation.class/class/with..st
@@ -0,0 +1,5 @@
+instance creation
+with: aCollectionOfAnimations
+	<return: #BlCompositeAnimation>
+
+	^ self new addAll: aCollectionOfAnimations
diff --git a/src/Bloc-Extensions.package/BlElement.extension/instance/gtInspectorLiveIn..st b/src/Bloc-Extensions.package/BlElement.extension/instance/gtInspectorLiveIn..st
@@ -1,6 +1,6 @@
 *Bloc-Extensions
 gtInspectorLiveIn: composite
-	<gtInspectorPresentationOrder: 15>
+	<gtInspectorPresentationOrder: 5>
 
 	composite bloc
 		title: 'Live' translated;

diff --git a/src/Bloc.package/BlSpace.class/instance/defaultRoot.st b/src/Bloc.package/BlSpace.class/instance/defaultRoot.st
@@ -1,6 +1,6 @@
-accessing
+initialization
 defaultRoot
 	^ BlElement new
 		space: self;
-		background:(BlBackground paint: Color white);
+		background: self defaultRootBackground;
 		yourself
diff --git a/src/Bloc.package/BlSpace.class/instance/defaultRootBackground.st b/src/Bloc.package/BlSpace.class/instance/defaultRootBackground.st
@@ -0,0 +1,3 @@
+initialization
+defaultRootBackground
+	^ Smalltalk ui theme backgroundColor