1 files changed, 17 insertions, 0 deletions
diff --git a/Data-MultiValued/lib/Data/MultiValued/TagContainerForRanges.pm b/Data-MultiValued/lib/Data/MultiValued/TagContainerForRanges.pm
index 71fd7f9..d3cd4b9 100644
--- a/Data-MultiValued/lib/Data/MultiValued/TagContainerForRanges.pm
+++ b/Data-MultiValued/lib/Data/MultiValued/TagContainerForRanges.pm
@@ -18,4 +18,21 @@ sub _create_new_inferior {
     Data::MultiValued::RangeContainer->new();
 }
 
+sub _rebless_storage {
+    my ($self) = @_;
+    bless $self->{_storage},'Data::MultiValued::RangeContainer';
+    bless $self->{_default_tag},'Data::MultiValued::RangeContainer';
+    return;
+}
+
+sub _as_hash {
+    my ($self) = @_;
+    my %st = %{$self->_storage};
+    my %dt = %{$self->_default_tag};
+    return {
+        _storage => \%st,
+        _default_tag => \%dt,
+    };
+}
+
 1;