summaryrefslogtreecommitdiff
path: root/Data-MultiValued/t/ranges-setting.t
diff options
context:
space:
mode:
Diffstat (limited to 'Data-MultiValued/t/ranges-setting.t')
-rw-r--r--Data-MultiValued/t/ranges-setting.t17
1 files changed, 17 insertions, 0 deletions
diff --git a/Data-MultiValued/t/ranges-setting.t b/Data-MultiValued/t/ranges-setting.t
index ff6a6b3..b8d2a57 100644
--- a/Data-MultiValued/t/ranges-setting.t
+++ b/Data-MultiValued/t/ranges-setting.t
@@ -57,6 +57,23 @@ sub test_it {
dies_ok {
$obj->get({});
} 'default get dies';
+
+ $obj->clear({from=>10,to=>20});
+
+ dies_ok {
+ $obj->get({at => 15})
+ } 'getting 15 after clearing dies';
+
+ cmp_deeply($obj->get({at => 30}),
+ [4,5,6],
+ 'getting 30 after clearing');
+
+ $obj->clear();
+
+ dies_ok {
+ $obj->get({at => 30})
+ } 'getting 30 after clearing all dies';
+
}
subtest 'ranges' => sub {