From 84b8f8f2ec69c42b914820759493b9a981bb0e01 Mon Sep 17 00:00:00 2001
From: Kenichi Ishigaki <ishigaki@cpan.org>
Date: Thu, 2 Feb 2023 16:47:45 +0900
Subject: [PATCH] Remove __is_stored flag if the object is removed from the
 database

---
 lib/Data/ObjectDriver/Driver/DBI.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/Data/ObjectDriver/Driver/DBI.pm b/lib/Data/ObjectDriver/Driver/DBI.pm
index be49abe..148db0d 100644
--- 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;
 }