[libnet-tclink-perl] 02/02: Add patch to disable the subtest which requires a network connection
Axel Beckert
abe at deuxchevaux.org
Sun May 31 15:30:46 UTC 2015
This is an automated email from the git hooks/post-receive script.
abe pushed a commit to branch master
in repository libnet-tclink-perl.
commit 2d8d2cbfda8df53babd2aa7bd654c2f050fde566
Author: Axel Beckert <abe at deuxchevaux.org>
Date: Sun May 31 17:28:58 2015 +0200
Add patch to disable the subtest which requires a network connection
Unfortunately this disables all of the functionality tests. But there
seems no test which is capable of using a local server.
---
debian/changelog | 3 +--
debian/patches/disable-network-test.patch | 39 +++++++++++++++++++++++++++++++
debian/patches/series | 1 +
3 files changed, 41 insertions(+), 2 deletions(-)
diff --git a/debian/changelog b/debian/changelog
index d8ce939..265e612 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -1,7 +1,5 @@
libnet-tclink-perl (3.4.0-7) UNRELEASED; urgency=low
- TODO: Test suite fails. (Build previously continued nevertheless.)
-
[ Salvatore Bonaccorso ]
* Change search.cpan.org based URIs to metacpan.org based URIs
@@ -14,6 +12,7 @@ libnet-tclink-perl (3.4.0-7) UNRELEASED; urgency=low
* Declare compliance with Debian Policy 3.9.6.
* Mark package as autopkgtestable.
* Fix calling of the test suite to make failures actually FTBFS.
+ * Add patch to disable the subtest which requires a network connection.
[ Salvatore Bonaccorso ]
* Update Vcs-Browser URL to cgit web frontend
diff --git a/debian/patches/disable-network-test.patch b/debian/patches/disable-network-test.patch
new file mode 100644
index 0000000..1f6532d
--- /dev/null
+++ b/debian/patches/disable-network-test.patch
@@ -0,0 +1,39 @@
+Description: Disable the subtest which requires network
+ Unfortunately this disables all of the functionality tests. But there
+ seems no test which is capable of using a local server.
+Author: Axel Beckert <abe at debian.org>
+
+Index: libnet-tclink-perl/test.pl
+===================================================================
+--- libnet-tclink-perl.orig/test.pl 2015-05-31 17:22:30.908265757 +0200
++++ libnet-tclink-perl/test.pl 2015-05-31 17:23:15.211555801 +0200
+@@ -7,28 +7,11 @@
+ # Change 1..1 below to 1..last_test_to_print .
+ # (It may become useful if the test is moved to ./t subdirectory.)
+
+-BEGIN { $| = 1; print "1..2\n"; }
++BEGIN { $| = 1; print "1..1\n"; }
+ END {print "not ok 1\n" unless $loaded;}
+ use Net::TCLink;
+ $loaded = 1;
+ print "ok 1\n";
+-my %params = (
+- custid => 'TestMerchant',
+- password => 'password',
+- amount => '100',
+- cc => '4111111111111111',
+- exp => '1209',
+- action => 'sale'
+- );
+-my %results = Net::TCLink::send(\%params);
+-if ($results{status} eq 'approved')
+-{
+- print "ok 2\n";
+-}
+-else
+-{
+- print "not ok 2\n";
+-}
+
+ ######################### End of black magic.
+
diff --git a/debian/patches/series b/debian/patches/series
index 158f36e..7203169 100644
--- a/debian/patches/series
+++ b/debian/patches/series
@@ -1 +1,2 @@
add-shebang.patch
+disable-network-test.patch
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libnet-tclink-perl.git
More information about the Pkg-perl-cvs-commits
mailing list