diff options
| author | Dagfinn Ilmari Mannsåker <ilmari@ilmari.org> | 2017-05-20 14:08:06 +0100 |
|---|---|---|
| committer | Dagfinn Ilmari Mannsåker <ilmari@ilmari.org> | 2017-06-02 10:57:49 +0100 |
| commit | cc0776d645a326dd0aaa2dbd8cd9b014c63723f5 (patch) | |
| tree | 932364ca2d8876283296be764383c282305dbd8d /t/op/kvhslice.t | |
| parent | f92b68087fa16c181807b1e16f020d76b45c4274 (diff) | |
| download | perl-cc0776d645a326dd0aaa2dbd8cd9b014c63723f5.tar.gz | |
Add support for deleting key/value slices (RT#131328)
Diffstat (limited to 't/op/kvhslice.t')
| -rw-r--r-- | t/op/kvhslice.t | 9 |
1 files changed, 1 insertions, 8 deletions
diff --git a/t/op/kvhslice.t b/t/op/kvhslice.t index d054f4230a..e3309ef3e9 100644 --- a/t/op/kvhslice.t +++ b/t/op/kvhslice.t @@ -8,7 +8,7 @@ BEGIN { # use strict; -plan tests => 40; +plan tests => 39; # simple use cases { @@ -117,13 +117,6 @@ plan tests => 40; like $@, qr{^Can't modify key/value hash slice in local at}, 'local dies'; } - # no delete - { - local $@; - eval 'delete %h{qw(a b)}'; - like $@, qr{^delete argument is key/value hash slice, use hash slice}, - 'delete dies'; - } # no assign { local $@; |