diff --git a/packages/AnimationsEditor-Tests.package/AnimationsEditorTest.class/instance/testDeleteMorphIsTimeConsistent.st b/packages/AnimationsEditor-Tests.package/AnimationsEditorTest.class/instance/testDeleteMorphIsTimeConsistent.st
new file mode 100644
index 0000000..3ae539d
--- /dev/null
+++ b/packages/AnimationsEditor-Tests.package/AnimationsEditorTest.class/instance/testDeleteMorphIsTimeConsistent.st
@@ -0,0 +1,7 @@
+testing
+testDeleteMorphIsTimeConsistent
+	| beforeTime afterTime |
+	beforeTime := self animationsEditorInstance propertyStartEnd endTime.
+	self animationsEditorInstance deleteMorph.
+	afterTime := self animationsEditorInstance propertyStartEnd endTime.
+	self assert: (beforeTime <= afterTime).
\ No newline at end of file
diff --git a/packages/AnimationsEditor-Tests.package/AnimationsEditorTest.class/methodProperties.json b/packages/AnimationsEditor-Tests.package/AnimationsEditorTest.class/methodProperties.json
index 76987d5..7a4d61b 100644
--- a/packages/AnimationsEditor-Tests.package/AnimationsEditorTest.class/methodProperties.json
+++ b/packages/AnimationsEditor-Tests.package/AnimationsEditorTest.class/methodProperties.json
@@ -12,6 +12,7 @@
 		"tearDown" : "ob 7/30/2022 17:10",
 		"testDeleteMorphButtonMorphStayedInWorld" : "ob 7/30/2022 17:10",
 		"testDeleteMorphButtonTreeSpecUpdated" : "ob 7/30/2022 17:18",
+		"testDeleteMorphIsTimeConsistent" : "ps 8/2/2022 13:31",
 		"testGetDeepestMorph" : "MH 8/1/2021 18:40",
 		"testInstanceCreation" : "LW 6/27/2021 13:30",
 		"testMorphClosedInWorldTreeSpecUpdated" : "NR 7/30/2022 16:24",