[libpadwalker-perl] 01/02: Patch the test suite work without cwd in @INC
Niko Tyni
ntyni at moszumanska.debian.org
Sat Sep 17 12:42:34 UTC 2016
This is an automated email from the git hooks/post-receive script.
ntyni pushed a commit to branch master
in repository libpadwalker-perl.
commit 4f5ced64fd3ece4d2e5260532732dfc4160f2451
Author: Niko Tyni <ntyni at debian.org>
Date: Sat Sep 17 15:38:28 2016 +0300
Patch the test suite work without cwd in @INC
Closes: #836884
---
...ke-the-test-suite-work-without-cwd-in-INC.patch | 49 ++++++++++++++++++++++
debian/patches/series | 1 +
2 files changed, 50 insertions(+)
diff --git a/debian/patches/0001-Make-the-test-suite-work-without-cwd-in-INC.patch b/debian/patches/0001-Make-the-test-suite-work-without-cwd-in-INC.patch
new file mode 100644
index 0000000..b8e0df9
--- /dev/null
+++ b/debian/patches/0001-Make-the-test-suite-work-without-cwd-in-INC.patch
@@ -0,0 +1,49 @@
+From 20277e3c93702eb96c68214436c68c8b07fb54c4 Mon Sep 17 00:00:00 2001
+From: Niko Tyni <ntyni at debian.org>
+Date: Sat, 17 Sep 2016 15:38:28 +0300
+Subject: [PATCH] Make the test suite work without cwd in @INC
+
+Bug-Debian: https://bugs.debian.org/836884
+---
+ t/foo.t | 4 ++--
+ t/var_name.t | 2 +-
+ t/vn-inc-1.pl | 2 +-
+ 3 files changed, 4 insertions(+), 4 deletions(-)
+
+diff --git a/t/foo.t b/t/foo.t
+index aa35895..104e9ec 100644
+--- a/t/foo.t
++++ b/t/foo.t
+@@ -5,8 +5,8 @@ use Data::Dumper;
+ print "1..6\n";
+
+ chdir "t";
+-require "bar.pl";
+-do "baz.pl";
++require "./bar.pl";
++do "./baz.pl";
+
+ my $nono;
+
+diff --git a/t/var_name.t b/t/var_name.t
+index 2b7cf31..3c14c9e 100644
+--- a/t/var_name.t
++++ b/t/var_name.t
+@@ -32,4 +32,4 @@ my $closure;
+
+ print (var_name($closure, $closure->()) eq '$aaa' ? "ok 4\n" : "not ok 4\n");
+
+-require "vn-inc-1.pl";
+\ No newline at end of file
++require "./vn-inc-1.pl";
+diff --git a/t/vn-inc-1.pl b/t/vn-inc-1.pl
+index 00f997e..9c08fe3 100644
+--- a/t/vn-inc-1.pl
++++ b/t/vn-inc-1.pl
+@@ -1 +1 @@
+-my %waaah;
print (var_name(0, \%waaah) eq '%waaah' ? "ok 5\n" : "not ok 5\n");
do "vn-inc-2.pl";
+\ No newline at end of file
++my %waaah;
print (var_name(0, \%waaah) eq '%waaah' ? "ok 5\n" : "not ok 5\n");
do "./vn-inc-2.pl";
+--
+2.9.3
+
diff --git a/debian/patches/series b/debian/patches/series
index 906258c..83761cd 100644
--- a/debian/patches/series
+++ b/debian/patches/series
@@ -1 +1,2 @@
dead-lexicals-rt55242.patch
+0001-Make-the-test-suite-work-without-cwd-in-INC.patch
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libpadwalker-perl.git
More information about the Pkg-perl-cvs-commits
mailing list