9b0c2e6c4a
- New upstream release 0.240
- Use Test::More::isnt() instead of Test::More::isn't in tests, which is
deprecated, as ' isn't allowed as package separator in an upcoming version
of Perl (GH#13)
38 lines
1.6 KiB
Diff
38 lines
1.6 KiB
Diff
From f45d9fd5dd56139698e34bcd82fdd329f77a67ab Mon Sep 17 00:00:00 2001
|
|
From: Tony Cook <tony@develop-help.com>
|
|
Date: Mon, 13 Feb 2023 14:16:49 +1100
|
|
Subject: [PATCH] t/: use the the "isnt" form rather than "isn't" due to
|
|
deprecated '
|
|
|
|
Perl 5.38 (and current blead perl) deprecate use of ' to replace
|
|
:: in symbol names.
|
|
|
|
This will produce an error from perl 5.40.
|
|
---
|
|
t/parent-classfromclassfile.t | 2 +-
|
|
t/parent-classfromfile.t | 2 +-
|
|
2 files changed, 2 insertions(+), 2 deletions(-)
|
|
|
|
diff --git a/t/parent-classfromclassfile.t b/t/parent-classfromclassfile.t
|
|
index 6d92e2d..0aa7e54 100755
|
|
--- a/t/parent-classfromclassfile.t
|
|
+++ b/t/parent-classfromclassfile.t
|
|
@@ -18,4 +18,4 @@ use_ok('parent');
|
|
# and does not get treated as a file:
|
|
eval q{package Test1; require Dummy; use parent -norequire, 'Dummy::InlineChild'; };
|
|
is $@, '', "Loading an unadorned class works";
|
|
-isn't $INC{"Dummy.pm"}, undef, 'We loaded Dummy.pm';
|
|
+isnt $INC{"Dummy.pm"}, undef, 'We loaded Dummy.pm';
|
|
diff --git a/t/parent-classfromfile.t b/t/parent-classfromfile.t
|
|
index 13dbcc1..7afabe9 100755
|
|
--- a/t/parent-classfromfile.t
|
|
+++ b/t/parent-classfromfile.t
|
|
@@ -20,6 +20,6 @@ my $base = './t';
|
|
# and does not get treated as a file:
|
|
eval sprintf q{package Test2; require '%s/lib/Dummy2.plugin'; use parent -norequire, 'Dummy2::InlineChild' }, $base;
|
|
is $@, '', "Loading a class from a file works";
|
|
-isn't $INC{"$base/lib/Dummy2.plugin"}, undef, "We loaded the plugin file";
|
|
+isnt $INC{"$base/lib/Dummy2.plugin"}, undef, "We loaded the plugin file";
|
|
my $o = bless {}, 'Test2';
|
|
isa_ok $o, 'Dummy2::InlineChild';
|