Hello community,

here is the log from the commit of package perl-Net-HTTP for openSUSE:Factory
checked in at Mon Aug 29 17:10:56 CEST 2011.



--------
--- perl-Net-HTTP/perl-Net-HTTP.changes 2011-03-17 00:51:35.000000000 +0100
+++ /mounts/work_src_done/STABLE/perl-Net-HTTP/perl-Net-HTTP.changes    
2011-08-29 16:32:18.000000000 +0200
@@ -1,0 +2,10 @@
+Mon Aug 29 14:29:41 UTC 2011 - ch...@computersalat.de
+
+- update to 6.01
+  * Don't run live test by default.
+    Run 'perl Makefile.PL --live-tests' to enable.
+  * More relaxed apache test; should pass even if proxies has added headers.
+- fix build for CentOS
+  * Unknown tag: Recommends:
+
+-------------------------------------------------------------------

calling whatdependson for head-i586


Old:
----
  Net-HTTP-6.00.tar.gz

New:
----
  Net-HTTP-6.01.tar.gz

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ perl-Net-HTTP.spec ++++++
--- /var/tmp/diff_new_pack.wWd8ad/_old  2011-08-29 17:10:33.000000000 +0200
+++ /var/tmp/diff_new_pack.wWd8ad/_new  2011-08-29 17:10:33.000000000 +0200
@@ -20,7 +20,7 @@
 Name:           perl-Net-HTTP
 %define cpan_name Net-HTTP
 Summary:        Low-level HTTP connection (client)
-Version:        6.00
+Version:        6.01
 Release:        1
 License:        GPL+ or Artistic
 Group:          Development/Libraries/Perl
@@ -39,7 +39,9 @@
 Requires:       perl(IO::Select)
 Requires:       perl(IO::Socket::INET)
 %{perl_requires}
+%if 0%{?suse_version} > 1010
 Recommends:     perl(IO::Socket::SSL) >= 1.38
+%endif
 
 %description
 The 'Net::HTTP' class is a low-level HTTP client. An instance of the

++++++ Net-HTTP-6.00.tar.gz -> Net-HTTP-6.01.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Net-HTTP-6.00/Changes new/Net-HTTP-6.01/Changes
--- old/Net-HTTP-6.00/Changes   2011-02-27 15:44:27.000000000 +0100
+++ new/Net-HTTP-6.01/Changes   2011-04-17 13:22:33.000000000 +0200
@@ -1,4 +1,12 @@
 _______________________________________________________________________________
+2011-03-17 Net-HTTP 6.01
+
+Don't run live test by default.  Run 'perl Makefile.PL --live-tests' to enable.
+More relaxed apache test; should pass even if proxies has added headers.
+
+
+
+_______________________________________________________________________________
 2011-02-27 Net-HTTP 6.00
 
 Initial release of Net-HTTP as a separate distribution. There are no code
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Net-HTTP-6.00/META.yml new/Net-HTTP-6.01/META.yml
--- old/Net-HTTP-6.00/META.yml  2011-02-27 15:45:06.000000000 +0100
+++ new/Net-HTTP-6.01/META.yml  2011-04-17 13:23:59.000000000 +0200
@@ -1,6 +1,6 @@
 --- #YAML:1.0
 name:               Net-HTTP
-version:            6.00
+version:            6.01
 abstract:           Low-level HTTP connection (client)
 author:
     - Gisle Aas <gi...@activestate.com>
@@ -18,7 +18,7 @@
     perl:                 5.008008
 resources:
     MailingList:  mailto:lib...@perl.org
-    repository:   http://github.com/gisle/libwww-perl
+    repository:   http://github.com/gisle/libwww-perl/tree/Net-HTTP/master
 no_index:
     directory:
         - t
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Net-HTTP-6.00/Makefile.PL 
new/Net-HTTP-6.01/Makefile.PL
--- old/Net-HTTP-6.00/Makefile.PL       2011-02-27 14:37:44.000000000 +0100
+++ new/Net-HTTP-6.01/Makefile.PL       2011-04-17 13:14:27.000000000 +0200
@@ -3,6 +3,16 @@
 require 5.008008;
 use strict;
 use ExtUtils::MakeMaker;
+use Getopt::Long qw(GetOptions);
+GetOptions(\my %opt, 'live-tests',) or die "Usage: $0 [--live-tests]\n";
+
+my $flag_file = "t/LIVE_TESTS";
+if ($opt{"live-tests"}) {
+    open(my $fh, ">", $flag_file) || die;
+}
+else {
+    unlink($flag_file);
+}
 
 WriteMakefile(
     NAME => 'Net::HTTP',
@@ -22,7 +32,7 @@
             'IO::Socket::SSL' => "1.38",
         },
        resources => {
-            repository => 'http://github.com/gisle/libwww-perl',
+            repository => 
'http://github.com/gisle/libwww-perl/tree/Net-HTTP/master',
            MailingList => 'mailto:lib...@perl.org',
         }
     },
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Net-HTTP-6.00/lib/Net/HTTP.pm 
new/Net-HTTP-6.01/lib/Net/HTTP.pm
--- old/Net-HTTP-6.00/lib/Net/HTTP.pm   2011-02-27 15:44:27.000000000 +0100
+++ new/Net-HTTP-6.01/lib/Net/HTTP.pm   2011-04-17 13:20:42.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use vars qw($VERSION @ISA $SOCKET_CLASS);
 
-$VERSION = "6.00";
+$VERSION = "6.01";
 unless ($SOCKET_CLASS) {
     eval { require IO::Socket::INET } || require IO::Socket;
     $SOCKET_CLASS = "IO::Socket::INET";
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Net-HTTP-6.00/t/apache.t new/Net-HTTP-6.01/t/apache.t
--- old/Net-HTTP-6.00/t/apache.t        2011-02-27 15:44:27.000000000 +0100
+++ new/Net-HTTP-6.01/t/apache.t        2011-04-17 13:16:28.000000000 +0200
@@ -1,6 +1,10 @@
 #!perl -w
 
 BEGIN {
+    unless (-f "t/LIVE_TESTS" || -f "LIVE_TESTS") {
+       print "1..0 # SKIP Live tests disabled; pass --live-tests to 
Makefile.PL to enable\n";
+       exit;
+    }
     eval {
         require IO::Socket::INET;
        my $s = IO::Socket::INET->new(
@@ -18,7 +22,7 @@
 
 use strict;
 use Test;
-plan tests => 6;
+plan tests => 8;
 
 use Net::HTTP;
 
@@ -36,14 +40,12 @@
                      Accept => '*/*');
 
     my($code, $mess, %h) = $s->read_response_headers;
+    print "# ----------------------------\n";
     print "# $code $mess\n";
     for (sort keys %h) {
        print "# $_: $h{$_}\n";
     }
-    print "\n";
-
-    ok($code, "200");
-    ok($h{'Content-Type'}, "message/http");
+    print "#\n";
 
     my $buf;
     while (1) {
@@ -53,14 +55,13 @@
        $buf .= $tmp;
     }
     $buf =~ s/\r//g;
+    (my $out = $buf) =~ s/^/# /gm;
+    print $out;
 
-    ok($buf, <<EOT);
-TRACE /libwww-perl HTTP/1.1
-Host: www.apache.org
-User-Agent: Mozilla/5.0
-Accept-Language: no,en
-Accept: */*
+    ok($code, "200");
+    ok($h{'Content-Type'}, "message/http");
 
-EOT
+    ok($buf, qr/^TRACE \/libwww-perl HTTP\/1/);
+    ok($buf, qr/^User-Agent: Mozilla\/5.0$/m);
 }
 


++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++



Remember to have fun...

-- 
To unsubscribe, e-mail: opensuse-commit+unsubscr...@opensuse.org
For additional commands, e-mail: opensuse-commit+h...@opensuse.org

Reply via email to