Remove __is_stored flag if the object is removed from the database

charsbar · charsbar · commit 84b8f8f2ec69 · 2023-02-02T16:47:45.000+09:00
diff --git a/lib/Data/ObjectDriver/Driver/DBI.pm b/lib/Data/ObjectDriver/Driver/DBI.pm
@@ -565,7 +565,7 @@ sub remove {
 
     $obj->call_trigger('post_remove', $orig_obj);
 
-    $orig_obj->{__is_stored} = 1;
+    delete $orig_obj->{__is_stored};
     return $result;
 }
 

Original file line number	Diff line number	Diff line change
`@@ -565,7 +565,7 @@ sub remove {`
`565`	`565`
`566`	`566`	`$obj->call_trigger('post_remove', $orig_obj);`
`567`	`567`
`568`		`- $orig_obj->{__is_stored} = 1;`
	`568`	`+ delete $orig_obj->{__is_stored};`
`569`	`569`	`return $result;`
`570`	`570`	`}`
`571`	`571`