r52662 - /trunk/libxml-stream-perl/debian/patches/series
franck at users.alioth.debian.org
franck at users.alioth.debian.org
Fri Feb 12 23:49:15 UTC 2010
Author: franck
Date: Fri Feb 12 23:49:09 2010
New Revision: 52662
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=52662
Log:
* Fixed series.
Modified:
trunk/libxml-stream-perl/debian/patches/series
Modified: trunk/libxml-stream-perl/debian/patches/series
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libxml-stream-perl/debian/patches/series?rev=52662&op=diff
==============================================================================
--- trunk/libxml-stream-perl/debian/patches/series (original)
+++ trunk/libxml-stream-perl/debian/patches/series Fri Feb 12 23:49:09 2010
@@ -1,74 +1,2 @@
gssapi.patch
-From: Franck Joncourt <franck.mail at dthconnex.com>
-Subject: [PATCH] t/upstream/tests
-
-<patch description>
-
-Signed-off-by: Franck Joncourt <franck.mail at dthconnex.com>
-
----
- t/tcpip.t | 34 ++++++++++++++++++++--------------
- t/tcpip2ssl.t | 1 +
- 2 files changed, 21 insertions(+), 14 deletions(-)
-
-diff --git a/t/tcpip.t b/t/tcpip.t
-index 9d52680..93081f0 100644
---- a/t/tcpip.t
-+++ b/t/tcpip.t
-@@ -1,22 +1,28 @@
- use lib "t/lib";
- use Test::More tests=>4;
-
--BEGIN{ use_ok("XML::Stream","Node"); }
-
--my $stream = new XML::Stream(style=>"node");
--ok( defined($stream), "new()" );
--isa_ok( $stream, "XML::Stream" );
-+SKIP: {
-
--SKIP:
--{
-- my $sock = IO::Socket::INET->new(PeerAddr=>'jabber.org:5222');
-- skip "Cannot open connection (maybe a firewall?)",1 unless defined($sock);
-+ skip "No network communication allowed", 3 if ($ENV{NO_NETWORK});
-+
-+ BEGIN{ use_ok("XML::Stream","Node"); }
-+
-+ my $stream = new XML::Stream(style=>"node");
-+ ok( defined($stream), "new()" );
-+ isa_ok( $stream, "XML::Stream" );
-+
-+ SKIP:
-+ {
-+ my $sock = IO::Socket::INET->new(PeerAddr=>'jabber.org:5222');
-+ skip "Cannot open connection (maybe a firewall?)",1 unless defined($sock);
-
-- my $status = $stream->Connect(hostname=>"jabber.org",
-- port=>5222,
-- namespace=>"jabber:client",
-- connectiontype=>"tcpip",
-- timeout=>10);
-- ok( defined($status), "Made connection");
-+ my $status = $stream->Connect(hostname=>"jabber.org",
-+ port=>5222,
-+ namespace=>"jabber:client",
-+ connectiontype=>"tcpip",
-+ timeout=>10);
-+ ok( defined($status), "Made connection");
-+ }
- }
-
-diff --git a/t/tcpip2ssl.t b/t/tcpip2ssl.t
-index 43d4b22..8c5ff06 100644
---- a/t/tcpip2ssl.t
-+++ b/t/tcpip2ssl.t
-@@ -6,6 +6,7 @@ SKIP:
- {
- eval("use IO::Socket::SSL 0.81;");
- skip "IO::Socket::SSL not installed", 2 if $@;
-+ skip "No network communication allowed", 2 if ($ENV{NO_NETWORK});
-
- BEGIN{ use_ok( "XML::Stream","Tree", "Node" ); }
-
---
-tg: (67812e7..) t/upstream/tests (depends on: master)
+t_upstream_tests.diff
More information about the Pkg-perl-cvs-commits
mailing list