Use always-incrementing morph number that is kept on delete.

hpi-swa-teaching · Aug 1, 2022 · 38bd573 · 38bd573
1 parent 785736c
commit 38bd573
Show file tree

Hide file tree

Showing 7 changed files with 27 additions and 3 deletions.
diff --git a/...ages/AnimationsEditor-Core.package/AnimationsEditor.class/instance/createPropertyWith..st b/...ages/AnimationsEditor-Core.package/AnimationsEditor.class/instance/createPropertyWith..st
@@ -2,5 +2,5 @@ buildComponents
 createPropertyWith: aMorph 
 	^ AnimationsEditorProperty new animationsEditor: self;
 		 targetMorph: aMorph;
-		 title: '' , (self propertyList size + 1), ' - ' , aMorph className;
+		 title: '' , (self incrementMorphNumber), ' - ' , aMorph className;
 		 yourself.
diff --git a/...ges/AnimationsEditor-Core.package/AnimationsEditor.class/instance/incrementMorphNumber.st b/...ges/AnimationsEditor-Core.package/AnimationsEditor.class/instance/incrementMorphNumber.st
@@ -0,0 +1,7 @@
+accessing
+incrementMorphNumber
+	| oldNumber |
+
+	oldNumber := self morphNumber.
+	self morphNumber: oldNumber + 1.
+	^ oldNumber.
diff --git a/packages/AnimationsEditor-Core.package/AnimationsEditor.class/instance/initialMorphNumber.st b/packages/AnimationsEditor-Core.package/AnimationsEditor.class/instance/initialMorphNumber.st
@@ -0,0 +1,3 @@
+accessing
+initialMorphNumber
+	^ 1.
diff --git a/packages/AnimationsEditor-Core.package/AnimationsEditor.class/instance/morphNumber..st b/packages/AnimationsEditor-Core.package/AnimationsEditor.class/instance/morphNumber..st
@@ -0,0 +1,3 @@
+accessing
+morphNumber: aNumber
+	morphNumber := aNumber.
diff --git a/packages/AnimationsEditor-Core.package/AnimationsEditor.class/instance/morphNumber.st b/packages/AnimationsEditor-Core.package/AnimationsEditor.class/instance/morphNumber.st
@@ -0,0 +1,6 @@
+accessing
+morphNumber
+	morphNumber
+		ifNil:[self morphNumber: self initialMorphNumber].
+
+	^ morphNumber.
diff --git a/packages/AnimationsEditor-Core.package/AnimationsEditor.class/methodProperties.json b/packages/AnimationsEditor-Core.package/AnimationsEditor.class/methodProperties.json
@@ -31,7 +31,7 @@
 		"createColorPropertyOn:" : "FH 8/1/2021 18:45",
 		"createImageSourcePropertyOn:" : "LW 7/26/2021 16:42",
 		"createPositionPropertyOn:" : "LW 7/26/2021 16:43",
-		"createPropertyWith:" : "Noel Bastubbe 6/22/2022 12:14",
+		"createPropertyWith:" : "ps 8/2/2022 00:17",
 		"createRotationPropertyOn:" : "LW 7/26/2021 16:43",
 		"createSizePropertyOn:" : "LW 7/26/2021 16:43",
 		"createTextPropertyOn:" : "LW 7/26/2021 16:44",
@@ -45,10 +45,12 @@
 		"getDeepestMorph:at:" : "FH 8/1/2021 18:48",
 		"handleListenEvent:" : "FH 8/1/2021 18:48",
 		"handleLoadJsonButton" : "FH 8/1/2021 18:48",
+		"incrementMorphNumber" : "ps 8/2/2022 00:18",
 		"informationBar" : "DM 7/8/2020 15:03",
 		"informationBar:" : "DM 7/8/2020 15:03",
 		"informationBarText" : "FH 8/1/2021 18:49",
 		"informationBarText:" : "FH 8/1/2021 18:50",
+		"initialMorphNumber" : "ps 8/2/2022 00:16",
 		"initialize" : "lka 7/21/2022 16:35",
 		"initializeJsonHandler" : "FH 8/1/2021 18:49",
 		"initializePropertyEditorPanel" : "ob 7/12/2022 18:00",
@@ -66,6 +68,8 @@
 		"messageNoMorphSelected" : "ob 7/30/2022 16:48",
 		"messageNoPropertySelected" : "ob 7/30/2022 16:49",
 		"messagePlayAnimations" : "ob 7/30/2022 16:48",
+		"morphNumber" : "ps 8/2/2022 00:16",
+		"morphNumber:" : "ps 8/2/2022 00:15",
 		"numberButtons" : "lka 7/1/2022 16:04",
 		"playAnimations" : "lka 7/21/2022 16:56",
 		"propertyEditorPanel" : "DM 6/22/2020 01:27",

diff --git a/packages/AnimationsEditor-Core.package/AnimationsEditor.class/properties.json b/packages/AnimationsEditor-Core.package/AnimationsEditor.class/properties.json
@@ -21,7 +21,8 @@
 		"timelines",
 		"propertyStartEnd",
 		"jsonHandler",
-		"timeline" ],
+		"timeline",
+		"morphNumber" ],
 	"name" : "AnimationsEditor",
 	"pools" : [
 		 ],