projects
/
onis.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
Implemented ``del'' as required by the interface.
[onis.git]
/
lib
/
Onis
/
Data
/
Persistent
/
None.pm
diff --git
a/lib/Onis/Data/Persistent/None.pm
b/lib/Onis/Data/Persistent/None.pm
index
b9a7020
..
35a0dec
100644
(file)
--- 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>