Added test for importing an array

[dbsrgits/DBM-Deep.git] / lib / DBM / Deep.pm

diff --git a/lib/DBM/Deep.pm b/lib/DBM/Deep.pm
index 03dd371..d93d268 100644 (file)
--- a/lib/DBM/Deep.pm
+++ b/lib/DBM/Deep.pm
@@ -199,13 +199,13 @@ sub _copy_value {
     return 1;
 }
 
-sub _copy_node {
-    die "Must be implemented in a child class\n";
-}
-
-sub _repr {
-    die "Must be implemented in a child class\n";
-}
+#sub _copy_node {
+#    die "Must be implemented in a child class\n";
+#}
+#
+#sub _repr {
+#    die "Must be implemented in a child class\n";
+#}
 
 sub export {
     ##
@@ -244,11 +244,11 @@ sub import {
     #XXX This isn't the best solution. Better would be to use Data::Walker,
     #XXX but that's a lot more thinking than I want to do right now.
     eval {
-        #$self->begin_work;
+        $self->begin_work;
         $self->_import( _clone_data( $struct ) );
-        #$self->commit;
+        $self->commit;
     }; if ( $@ ) {
-        #$self->rollback;
+        $self->rollback;
         die $@;
     }