You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
134 lines
3.5 KiB
134 lines
3.5 KiB
7 years ago
|
From bad1310f14223c12c1d8933ef5de17fd323374f5 Mon Sep 17 00:00:00 2001
|
||
|
From: Kent Fredric <kentnl@gentoo.org>
|
||
|
Date: Wed, 29 Nov 2017 19:07:38 +1300
|
||
|
Subject: Fix tests failing under Perl 5.26 w/ PERL_USE_UNSAFE_INC=0
|
||
|
|
||
|
require t/foo.pl
|
||
|
|
||
|
Used to work as a result of the assumed '.' at the end of `@INC`.
|
||
|
This is no longer true under Perl 5.26 without PERL_USE_UNSAFE_INC=1
|
||
|
in your environment (which gets defaulted on under CPAN installers and
|
||
|
under Test::Harness if not explicitly disabled, and will be hard-off
|
||
|
in Perl 5.30)
|
||
|
|
||
|
Bug: https://bugs.gentoo.org/623002
|
||
|
Bug: https://github.com/dap/Net-XMPP/pull/16
|
||
|
---
|
||
|
t/iq.t | 2 +-
|
||
|
t/jid.t | 2 +-
|
||
|
t/message.t | 2 +-
|
||
|
t/packet_iqauth.t | 2 +-
|
||
|
t/packet_iqroster.t | 2 +-
|
||
|
t/presence.t | 2 +-
|
||
|
t/rawxml.t | 2 +-
|
||
|
t/roster.t | 2 +-
|
||
|
8 files changed, 8 insertions(+), 8 deletions(-)
|
||
|
|
||
|
diff --git a/t/iq.t b/t/iq.t
|
||
|
index 9174e6d..1742d6c 100644
|
||
|
--- a/t/iq.t
|
||
|
+++ b/t/iq.t
|
||
|
@@ -3,7 +3,7 @@ use Test::More tests=>115;
|
||
|
|
||
|
BEGIN{ use_ok( "Net::XMPP" ); }
|
||
|
|
||
|
-require "t/mytestlib.pl";
|
||
|
+require "./t/mytestlib.pl";
|
||
|
|
||
|
my $debug = Net::XMPP::Debug->new(setdefault=>1,
|
||
|
level=>-1,
|
||
|
diff --git a/t/jid.t b/t/jid.t
|
||
|
index dc07440..fa426a4 100644
|
||
|
--- a/t/jid.t
|
||
|
+++ b/t/jid.t
|
||
|
@@ -3,7 +3,7 @@ use Test::More tests=>15;
|
||
|
|
||
|
BEGIN{ use_ok( "Net::XMPP" ); }
|
||
|
|
||
|
-require "t/mytestlib.pl";
|
||
|
+require "./t/mytestlib.pl";
|
||
|
|
||
|
my $jid = Net::XMPP::JID->new('host.com/xxx@yyy.com/zzz');
|
||
|
ok( defined($jid), "new()" );
|
||
|
diff --git a/t/message.t b/t/message.t
|
||
|
index 70bcef8..7c2f554 100644
|
||
|
--- a/t/message.t
|
||
|
+++ b/t/message.t
|
||
|
@@ -3,7 +3,7 @@ use Test::More tests=>136;
|
||
|
|
||
|
BEGIN{ use_ok( "Net::XMPP" ); }
|
||
|
|
||
|
-require "t/mytestlib.pl";
|
||
|
+require "./t/mytestlib.pl";
|
||
|
|
||
|
my $debug = Net::XMPP::Debug->new(setdefault=>1,
|
||
|
level=>-1,
|
||
|
diff --git a/t/packet_iqauth.t b/t/packet_iqauth.t
|
||
|
index 748917b..f80b5ae 100644
|
||
|
--- a/t/packet_iqauth.t
|
||
|
+++ b/t/packet_iqauth.t
|
||
|
@@ -3,7 +3,7 @@ use Test::More tests=>55;
|
||
|
|
||
|
BEGIN{ use_ok( "Net::XMPP" ); }
|
||
|
|
||
|
-require "t/mytestlib.pl";
|
||
|
+require "./t/mytestlib.pl";
|
||
|
|
||
|
my $debug = Net::XMPP::Debug->new(setdefault=>1,
|
||
|
level=>-1,
|
||
|
diff --git a/t/packet_iqroster.t b/t/packet_iqroster.t
|
||
|
index 706e5f0..4bd48e8 100644
|
||
|
--- a/t/packet_iqroster.t
|
||
|
+++ b/t/packet_iqroster.t
|
||
|
@@ -3,7 +3,7 @@ use Test::More tests=>57;
|
||
|
|
||
|
BEGIN{ use_ok( "Net::XMPP" ); }
|
||
|
|
||
|
-require "t/mytestlib.pl";
|
||
|
+require "./t/mytestlib.pl";
|
||
|
|
||
|
my $debug = Net::XMPP::Debug->new(setdefault=>1,
|
||
|
level=>-1,
|
||
|
diff --git a/t/presence.t b/t/presence.t
|
||
|
index ce6980d..14f9516 100644
|
||
|
--- a/t/presence.t
|
||
|
+++ b/t/presence.t
|
||
|
@@ -3,7 +3,7 @@ use Test::More tests=>132;
|
||
|
|
||
|
BEGIN{ use_ok( "Net::XMPP" ); }
|
||
|
|
||
|
-require "t/mytestlib.pl";
|
||
|
+require "./t/mytestlib.pl";
|
||
|
|
||
|
my $debug = Net::XMPP::Debug->new(setdefault=>1,
|
||
|
level=>-1,
|
||
|
diff --git a/t/rawxml.t b/t/rawxml.t
|
||
|
index b4f091b..43b6380 100644
|
||
|
--- a/t/rawxml.t
|
||
|
+++ b/t/rawxml.t
|
||
|
@@ -3,7 +3,7 @@ use Test::More tests=>54;
|
||
|
|
||
|
BEGIN{ use_ok( "Net::XMPP" ); }
|
||
|
|
||
|
-require "t/mytestlib.pl";
|
||
|
+require "./t/mytestlib.pl";
|
||
|
|
||
|
my $message = Net::XMPP::Message->new();
|
||
|
ok( defined($message), "new()");
|
||
|
diff --git a/t/roster.t b/t/roster.t
|
||
|
index 19ed87b..a365d2e 100644
|
||
|
--- a/t/roster.t
|
||
|
+++ b/t/roster.t
|
||
|
@@ -11,7 +11,7 @@ BEGIN {
|
||
|
}
|
||
|
BEGIN{ use_ok( "Net::XMPP" ); }
|
||
|
|
||
|
-require "t/mytestlib.pl";
|
||
|
+require "./t/mytestlib.pl";
|
||
|
|
||
|
my $debug = Net::XMPP::Debug->new(setdefault=>1,
|
||
|
level=>-1,
|
||
|
--
|
||
|
2.14.3
|
||
|
|