diff options
| author | Ricardo Signes <rjbs@cpan.org> | 2010-05-20 08:29:40 -0400 |
|---|---|---|
| committer | Ricardo Signes <rjbs@cpan.org> | 2010-05-20 08:29:40 -0400 |
| commit | 464b2b3dcc8158f7dee4ec9c9d06bd2f09c40687 (patch) | |
| tree | d55c310f4f59e1008d4d0027152102e4cc21186a | |
| parent | d069c0939011465ebb38fe3c8ba2bf2164f7ae17 (diff) | |
| download | perl-5.13.1.tar.gz | |
do not check for deprecation of removed libv5.13.1
| -rw-r--r-- | dist/Module-CoreList/t/deprecated.t | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/dist/Module-CoreList/t/deprecated.t b/dist/Module-CoreList/t/deprecated.t index 1be2ed9368..00df561a75 100644 --- a/dist/Module-CoreList/t/deprecated.t +++ b/dist/Module-CoreList/t/deprecated.t @@ -18,8 +18,8 @@ ok(exists $Module::CoreList::deprecated{5.011000}{'Switch'}, "Switch deprecated in 5.011000 (hash)" ); -is(!! Module::CoreList::is_deprecated('Switch'), !! ($] >= 5.011), - "Switch deprecated current perl (function)" +is(!! Module::CoreList::is_deprecated('Switch'), !! ($] >= 5.011 and $] < 5.013001 ), + "Switch deprecated current perl (if pre-5.13.1.) (function)" ); ok(! Module::CoreList::is_deprecated('Switch', 5.010000), |