feature/fix tests (#39)

* Removed animation tests
* Added accessing tests for all propertys
* Restructured animations editor tests
* Update .smalltalk.ston

Co-authored-by: Tim <49529745+1T1m@users.noreply.github.com>

packages/AnimationsEditor-Core.package/AnimationsEditor.class/instance/defaultEmptyPanels.st

@@ -0,0 +1,3 @@
+defaults
+defaultEmptyPanels
+	^ OrderedCollection new.

packages/AnimationsEditor-Core.package/AnimationsEditor.class/instance/emptyPanels.st

@@ -1,6 +1,6 @@
 accessing
 emptyPanels
 	emptyPanels
-		ifNil: [self emptyPanels: OrderedCollection new].
+		ifNil: [self emptyPanels: self defaultEmptyPanels].
 
 	^ emptyPanels.

packages/AnimationsEditor-Core.package/AnimationsEditor.class/instance/informationBar..st

@@ -1,3 +1,3 @@
-buildComponents
+accessing
 informationBar: aPluggableTextSpec
 	informationBar := aPluggableTextSpec.

packages/AnimationsEditor-Core.package/AnimationsEditor.class/instance/informationBar.st

@@ -1,3 +1,3 @@
-buildComponents
+accessing
 informationBar
 	^ informationBar.

packages/AnimationsEditor-Core.package/AnimationsEditor.class/methodProperties.json

@@ -23,10 +23,11 @@
 		"createPositionPropertyFrom:" : "DM 8/6/2020 10:09",
 		"createRotationPropertyFrom:" : "DM 7/8/2020 14:29",
 		"createSizePropertyFrom:" : "DM 7/8/2020 14:29",
+		"defaultEmptyPanels" : "DM 8/7/2020 17:37",
 		"defaultPropertyPanelPosition" : "DM 8/6/2020 10:38",
 		"editorTitle" : "LH 8/4/2020 10:31",
 		"editorTitle:" : "DM 8/3/2020 15:40",
-		"emptyPanels" : "DM 8/6/2020 10:40",
+		"emptyPanels" : "DM 8/7/2020 17:37",
 		"emptyPanels:" : "DM 6/12/2020 20:40",
 		"getDeepestMorph:at:" : "DM 6/22/2020 01:25",
 		"handleListenEvent:" : "DM 8/5/2020 21:11",

packages/AnimationsEditor-Core.package/AnimationsEditorProperty.class/instance/defaultSubproperties.st

@@ -1,3 +1,3 @@
-default
+defaults
 defaultSubproperties
 	^ (OrderedCollection new).

packages/AnimationsEditor-Core.package/AnimationsEditorProperty.class/instance/defaultTargetDuration.st

@@ -1,3 +1,3 @@
-default
+defaults
 defaultTargetDuration
 	^ 500.

packages/AnimationsEditor-Core.package/AnimationsEditorPropertyColor.class/instance/animationString.st

@@ -7,7 +7,7 @@ animationString
 				startValue: 1.0;
 				endValue: 0.0;
 				duration: ', (self targetDuration//2),';
-				finishBlock: [aMorph color: ', self colorAsString, '.]);
+				finishBlock: [aMorph color: ', self targetColorAsString, '.]);
 			add: (AnimAlphaBlendAnimation new
 				morph: aMorph;
 				startValue: 0.0;

packages/AnimationsEditor-Core.package/AnimationsEditorPropertyColor.class/instance/defaultTargetColor.st

@@ -0,0 +1,3 @@
+defaults
+defaultTargetColor
+	^ Color white.

packages/AnimationsEditor-Core.package/AnimationsEditorPropertyColor.class/instance/targetColor.st

@@ -1,6 +1,6 @@
 accessing
 targetColor
 	targetColor
-		ifNil: [self targetColor: Color veryLightGray].
+		ifNil: [self targetColor: self defaultTargetColor].
 
 	 ^ targetColor.

packages/AnimationsEditor-Core.package/AnimationsEditorPropertyColor.class/methodProperties.json

@@ -2,16 +2,16 @@
 	"class" : {
 		 },
 	"instance" : {
-		"animationString" : "DM 8/6/2020 10:15",
+		"animationString" : "DM 8/7/2020 17:18",
 		"buildInputColorWith:" : "DM 8/7/2020 10:49",
 		"buildPanelWith:" : "DM 7/7/2020 10:13",
 		"buildUIWith:" : "JIZ 6/3/2020 17:10",
 		"canCreateAnimation" : "DM 8/6/2020 10:26",
 		"canRenderUI" : "DM 8/5/2020 21:07",
-		"colorAsString" : "DM 8/6/2020 10:42",
 		"createAnimationFor:" : "DM 8/6/2020 10:20",
 		"createAnimationFor:withDuration:" : "DM 8/6/2020 11:03",
+		"defaultTargetColor" : "DM 8/7/2020 17:34",
 		"initialize" : "DM 7/7/2020 10:44",
-		"targetColor" : "DM 8/6/2020 10:43",
+		"targetColor" : "DM 8/7/2020 17:19",
 		"targetColor:" : "DM 8/6/2020 10:41",
 		"targetColorAsString" : "DM 8/7/2020 10:49" } }

packages/AnimationsEditor-Tests.package/AnimationsEditorPropertyColorTest.class/instance/testCanCreateAnimation.st

@@ -0,0 +1,6 @@
+as yet unclassified
+testCanCreateAnimation
+	| p |
+	p := AnimationsEditorPropertyColor new.
+
+	self assert: (p canCreateAnimation = true).

packages/AnimationsEditor-Tests.package/AnimationsEditorPropertyColorTest.class/instance/testCanRenderUI.st

@@ -0,0 +1,6 @@
+as yet unclassified
+testCanRenderUI
+	| p |
+	p := AnimationsEditorPropertyColor new.
+
+	self assert: (p canRenderUI = true).

packages/AnimationsEditor-Tests.package/AnimationsEditorPropertyColorTest.class/instance/testInstanceCreation.st

@@ -0,0 +1,3 @@
+as yet unclassified
+testInstanceCreation
+	self assert: (AnimationsEditorPropertyColor new = nil) not.

packages/AnimationsEditor-Tests.package/AnimationsEditorPropertyColorTest.class/instance/testTargetColorGetter.st

@@ -0,0 +1,6 @@
+as yet unclassified
+testTargetColorGetter
+	| p |
+	p := AnimationsEditorPropertyColor new.
+
+	self assert: (p targetColor =  p defaultTargetColor).

packages/AnimationsEditor-Tests.package/AnimationsEditorPropertyColorTest.class/instance/testTargetColorGetterAsString.st

@@ -0,0 +1,6 @@
+as yet unclassified
+testTargetColorGetterAsString
+	| p |
+	p := AnimationsEditorPropertyColor new.
+
+	self assert: (p targetColorAsString =  p defaultTargetColor asString).

packages/AnimationsEditor-Tests.package/AnimationsEditorPropertyColorTest.class/instance/testTargetColorSetter.st

@@ -0,0 +1,8 @@
+as yet unclassified
+testTargetColorSetter
+	| p testColor |
+	p := AnimationsEditorPropertyColor new.
+
+	testColor := 'red'.
+	p targetColor: testColor.
+	self assert: (p targetColor = Color red).

packages/AnimationsEditor-Tests.package/AnimationsEditorPropertyColorTest.class/methodProperties.json

@@ -0,0 +1,10 @@
+{
+	"class" : {
+		 },
+	"instance" : {
+		"testCanCreateAnimation" : "DM 8/7/2020 17:19",
+		"testCanRenderUI" : "DM 8/7/2020 17:19",
+		"testInstanceCreation" : "DM 8/7/2020 17:19",
+		"testTargetColorGetter" : "DM 8/7/2020 17:32",
+		"testTargetColorGetterAsString" : "DM 8/7/2020 17:31",
+		"testTargetColorSetter" : "DM 8/7/2020 17:21" } }

packages/AnimationsEditor-Tests.package/AnimationsEditorPropertyColorTest.class/properties.json

@@ -0,0 +1,14 @@
+{
+	"category" : "AnimationsEditor-Tests",
+	"classinstvars" : [
+		 ],
+	"classvars" : [
+		 ],
+	"commentStamp" : "",
+	"instvars" : [
+		 ],
+	"name" : "AnimationsEditorPropertyColorTest",
+	"pools" : [
+		 ],
+	"super" : "TestCase",
+	"type" : "normal" }

packages/AnimationsEditor-Tests.package/AnimationsEditorPropertyPositionTest.class/instance/testCanCreateAnimation.st

@@ -0,0 +1,6 @@
+as yet unclassified
+testCanCreateAnimation
+	| p |
+	p := AnimationsEditorPropertyPosition new.
+
+	self assert: (p canCreateAnimation = true).

packages/AnimationsEditor-Tests.package/AnimationsEditorPropertyPositionTest.class/instance/testCanRenderUI.st

@@ -0,0 +1,6 @@
+as yet unclassified
+testCanRenderUI
+	| p |
+	p := AnimationsEditorPropertyPosition new.
+
+	self assert: (p canRenderUI = true).

packages/AnimationsEditor-Tests.package/AnimationsEditorPropertyPositionTest.class/instance/testPositionXGetter.st

@@ -0,0 +1,5 @@
+as yet unclassified
+testPositionXGetter
+	| p |
+	p := AnimationsEditorPropertyPosition new.
+	self assert: (p positionX =  (p defaultTargetPosition x) asString).

packages/AnimationsEditor-Tests.package/AnimationsEditorPropertyPositionTest.class/instance/testPositionXSetter.st

@@ -0,0 +1,8 @@
+as yet unclassified
+testPositionXSetter
+	| p testX |
+	p := AnimationsEditorPropertyPosition new.
+
+	testX := 3423.
+	p positionX: testX.
+	self assert: (p positionX = testX asString).

packages/AnimationsEditor-Tests.package/AnimationsEditorPropertyPositionTest.class/instance/testPositionYGetter.st

@@ -0,0 +1,5 @@
+as yet unclassified
+testPositionYGetter
+	| p |
+	p := AnimationsEditorPropertyPosition new.
+	self assert: (p positionY =  (p defaultTargetPosition y) asString).

packages/AnimationsEditor-Tests.package/AnimationsEditorPropertyPositionTest.class/instance/testPositionYSetter.st

@@ -0,0 +1,8 @@
+as yet unclassified
+testPositionYSetter
+	| p testY |
+	p := AnimationsEditorPropertyPosition new.
+
+	testY := 3423.
+	p positionY: testY.
+	self assert: (p positionY = testY asString).

packages/AnimationsEditor-Tests.package/AnimationsEditorPropertyPositionTest.class/instance/testTargetPositionGetter.st

@@ -0,0 +1,5 @@
+as yet unclassified
+testTargetPositionGetter
+	| p |
+	p := AnimationsEditorPropertyPosition new.
+	self assert: (p targetPosition =  p defaultTargetPosition).

packages/AnimationsEditor-Tests.package/AnimationsEditorPropertyPositionTest.class/instance/testTargetPositionSetter.st

@@ -0,0 +1,8 @@
+as yet unclassified
+testTargetPositionSetter
+	| p tempPosition |
+	p := AnimationsEditorPropertyPosition new.
+	tempPosition := 200@100.
+	p targetPosition: tempPosition.
+
+	self assert: (p targetPosition =  tempPosition).

packages/AnimationsEditor-Tests.package/AnimationsEditorPropertyPositionTest.class/methodProperties.json

@@ -2,7 +2,12 @@
 	"class" : {
 		 },
 	"instance" : {
-		"testCreateAnimation" : "DM 8/4/2020 13:37",
+		"testCanCreateAnimation" : "DM 8/7/2020 13:41",
+		"testCanRenderUI" : "DM 8/7/2020 13:42",
 		"testInstanceCreation" : "DM 8/4/2020 13:33",
-		"testPositionAccessors" : "DM 8/4/2020 13:44",
-		"testSetPosition" : "DM 8/4/2020 13:44" } }
+		"testPositionXGetter" : "DM 8/7/2020 13:15",
+		"testPositionXSetter" : "DM 8/7/2020 13:13",
+		"testPositionYGetter" : "DM 8/7/2020 13:15",
+		"testPositionYSetter" : "DM 8/7/2020 13:14",
+		"testTargetPositionGetter" : "DM 8/7/2020 13:38",
+		"testTargetPositionSetter" : "DM 8/7/2020 13:39" } }

packages/AnimationsEditor-Tests.package/AnimationsEditorPropertyRotationTest.class/instance/testCanCreateAnimation.st

@@ -0,0 +1,6 @@
+as yet unclassified
+testCanCreateAnimation
+	| p |
+	p := AnimationsEditorPropertyRotation new.
+
+	self assert: (p canCreateAnimation = true).

packages/AnimationsEditor-Tests.package/AnimationsEditorPropertyRotationTest.class/instance/testCanRenderUI.st

@@ -0,0 +1,6 @@
+as yet unclassified
+testCanRenderUI
+	| p |
+	p := AnimationsEditorPropertyRotation new.
+
+	self assert: (p canRenderUI = true).

packages/AnimationsEditor-Tests.package/AnimationsEditorPropertyRotationTest.class/instance/testInstanceCreation.st

@@ -0,0 +1,3 @@
+as yet unclassified
+testInstanceCreation
+	self assert: (AnimationsEditorPropertyRotation new = nil) not.

packages/AnimationsEditor-Tests.package/AnimationsEditorPropertyRotationTest.class/instance/testTargetRotationGetter.st

@@ -0,0 +1,5 @@
+as yet unclassified
+testTargetRotationGetter
+	| p |
+	p := AnimationsEditorPropertyRotation new.
+	self assert: (p targetRotation =  p defaultTargetRotation).

packages/AnimationsEditor-Tests.package/AnimationsEditorPropertyRotationTest.class/instance/testTargetRotationGetterAsString.st

@@ -0,0 +1,5 @@
+as yet unclassified
+testTargetRotationGetterAsString
+	| p |
+	p := AnimationsEditorPropertyRotation new.
+	self assert: (p targetRotationAsString =  p defaultTargetRotation asString).

packages/AnimationsEditor-Tests.package/AnimationsEditorPropertyRotationTest.class/instance/testTargetRotationSetter.st

@@ -0,0 +1,8 @@
+as yet unclassified
+testTargetRotationSetter
+	| p testRotation |
+	p := AnimationsEditorPropertyRotation new.
+
+	testRotation := 3423.
+	p targetRotation: testRotation.
+	self assert: (p targetRotation = testRotation).

packages/AnimationsEditor-Tests.package/AnimationsEditorPropertyRotationTest.class/methodProperties.json

@@ -0,0 +1,10 @@
+{
+	"class" : {
+		 },
+	"instance" : {
+		"testCanCreateAnimation" : "DM 8/7/2020 17:14",
+		"testCanRenderUI" : "DM 8/7/2020 17:14",
+		"testInstanceCreation" : "DM 8/7/2020 17:14",
+		"testTargetRotationGetter" : "DM 8/7/2020 17:17",
+		"testTargetRotationGetterAsString" : "DM 8/7/2020 17:17",
+		"testTargetRotationSetter" : "DM 8/7/2020 17:16" } }

packages/AnimationsEditor-Tests.package/AnimationsEditorPropertyRotationTest.class/properties.json

@@ -0,0 +1,14 @@
+{
+	"category" : "AnimationsEditor-Tests",
+	"classinstvars" : [
+		 ],
+	"classvars" : [
+		 ],
+	"commentStamp" : "",
+	"instvars" : [
+		 ],
+	"name" : "AnimationsEditorPropertyRotationTest",
+	"pools" : [
+		 ],
+	"super" : "TestCase",
+	"type" : "normal" }

packages/AnimationsEditor-Tests.package/AnimationsEditorPropertySizeTest.class/instance/testCanCreateAnimation.st

@@ -0,0 +1,6 @@
+as yet unclassified
+testCanCreateAnimation
+	| p |
+	p := AnimationsEditorPropertySize new.
+
+	self assert: (p canCreateAnimation = true).

packages/AnimationsEditor-Tests.package/AnimationsEditorPropertySizeTest.class/instance/testCanRenderUI.st

@@ -0,0 +1,6 @@
+as yet unclassified
+testCanRenderUI
+	| p |
+	p := AnimationsEditorPropertySize new.
+
+	self assert: (p canRenderUI = true).