From aa252e66f2618579fb230dfd0020ca56d0ceae7e Mon Sep 17 00:00:00 2001
From: octo <octo>
Date: Sun, 10 Apr 2005 16:34:09 +0000
Subject: [PATCH] Implemented ``del'' as required by the interface.

---
 lib/Onis/Data/Persistent/None.pm | 11 +++++++++++
 1 file changed, 11 insertions(+)

diff --git a/lib/Onis/Data/Persistent/None.pm b/lib/Onis/Data/Persistent/None.pm
index b9a7020..35a0dec 100644
--- a/lib/Onis/Data/Persistent/None.pm
+++ b/lib/Onis/Data/Persistent/None.pm
@@ -117,6 +117,17 @@ sub keys
 	}, @keys);
 }
 
+sub del
+{
+	my $obj = shift;
+	my $key = shift;
+
+	if (defined ($obj->{'data'}{$key}))
+	{
+		delete ($obj->{'data'}{$key});
+	}
+}
+
 =head1 AUTHOR
 
 Florian octo Forster, L<octo@verplant.org>
-- 
2.11.0