[libwww-shorten-perl] 06/11: Update debian/patches/network_tests.patch.

gregor herrmann gregoa at debian.org
Fri May 6 17:10:21 UTC 2016


This is an automated email from the git hooks/post-receive script.

gregoa pushed a commit to branch master
in repository libwww-shorten-perl.

commit 10c68d186ea6ce03fc8a51c1a7815c98b912d93f
Author: gregor herrmann <gregoa at debian.org>
Date:   Fri May 6 18:48:58 2016 +0200

    Update debian/patches/network_tests.patch.
---
 debian/patches/network_tests.patch | 23 ++++++++++++-----------
 1 file changed, 12 insertions(+), 11 deletions(-)

diff --git a/debian/patches/network_tests.patch b/debian/patches/network_tests.patch
index e75e9e9..89bb6fc 100644
--- a/debian/patches/network_tests.patch
+++ b/debian/patches/network_tests.patch
@@ -2,23 +2,24 @@ Subject: skipping tests that depend on the netork
 Forwarded: not-needed
 Author: Nicholas Bamber <nicholas at periapt.co.uk>
 Reviewed-by: gregor herrmann <gregoa at debian.org>
-Last-Update: 2015-12-15
+Last-Update: 2016-05-06
 
 --- a/t/tinyurl.t
 +++ b/t/tinyurl.t
-@@ -2,6 +2,9 @@
+@@ -6,6 +6,9 @@
  
- BEGIN { use_ok WWW::Shorten::TinyURL };
+ BEGIN { $ENV{'WWW-SHORTEN-TESTING'} = 1; };
  
 +SKIP: {
-+    skip 'network testing turned off by default', 6 if $ENV{NO_NETWORK};
++    skip 'network testing turned off by default', 14 if $ENV{NO_NETWORK};
 +
  my $url = 'https://metacpan.org/release/WWW-Shorten';
- my $return = makeashorterlink($url);
- ok($return, 'not a error') or diag "\$_error_message = $_error_message";
-@@ -20,3 +23,5 @@
- ok($@, 'makeashorterlink fails with no args');
- eval { makealongerlink() };
- ok($@, 'makealongerlink fails with no args');
-+
+ my $prefix = 'http://tinyurl.com/';
+ 
+@@ -50,4 +53,6 @@
+ is($WWW::Shorten::TinyURL::_error_message, '', 'makealongerlink: no errors');
+ is($longer, $url, 'makealongerlink: proper response');
+ 
 +}
++
+ done_testing();

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libwww-shorten-perl.git



More information about the Pkg-perl-cvs-commits mailing list