OpenPKG CVS Repository
  http://cvs.openpkg.org/
  ____________________________________________________________________________

  Server: cvs.openpkg.org                  Name:   Ralf S. Engelschall
  Root:   /v/openpkg/cvs                   Email:  [EMAIL PROTECTED]
  Module: openpkg-src                      Date:   12-Jun-2005 16:25:12
  Branch: HEAD                             Handle: 2005061215251200

  Added files:
    openpkg-src/perl-www    perl-www.patch
  Modified files:
    openpkg-src/perl-www    perl-www.spec

  Log:
    ok, now the hard-core way to get this package building under Fedora
    Core 3

  Summary:
    Revision    Changes     Path
    1.6         +84 -0      openpkg-src/perl-www/perl-www.patch
    1.198       +3  -1      openpkg-src/perl-www/perl-www.spec
  ____________________________________________________________________________

  patch -p0 <<'@@ .'
  Index: openpkg-src/perl-www/perl-www.patch
  ============================================================================
  $ cvs diff -u -r0 -r1.6 perl-www.patch
  --- /dev/null 2005-06-12 16:25:10 +0200
  +++ perl-www.patch    2005-06-12 16:25:12 +0200
  @@ -0,0 +1,84 @@
  +Index: WWW-Mechanize-1.12/Makefile.PL
  +--- WWW-Mechanize-1.12/Makefile.PL.orig      2005-06-12 16:16:53 +0200
  ++++ WWW-Mechanize-1.12/Makefile.PL   2005-06-12 16:20:23 +0200
  +@@ -6,46 +6,7 @@
  + 
  + use constant FLAG_SKIPMECHDUMP => File::Spec->catfile( "t", 
"SKIP-MECH-DUMP" );
  + 
  +-# Much logic stolen fromm libwww-perl's Makefile.PL
  +-my $skiplive = grep /--nolive/i, @ARGV;
  +-my $skiplocal = grep /--nolocal/i, @ARGV;
  +-
  +-if ( !$skiplive ) {
  +-    require IO::Socket;
  +-    my $s = IO::Socket::INET->new(
  +-        PeerAddr => "www.google.com:80",
  +-        Timeout  => 10,
  +-    );
  +-    if ($s) {
  +-        close($s);
  +-        $skiplive = 0;
  +-
  +-        print <<EOT;
  +-
  +-Part of WWW::Mechanize's test suite is run live tests against Google.
  +-Since it looks like you're connected to the Internet, these test will
  +-be enabled.  If you want to disable these tests, re-run Makefile.PL with
  +-the --skiplive switch.
  +-
  +-EOT
  +-    } else {
  +-        print <<EOT;
  +-
  +-    It seems that you are not directly connected to the Internet.  Some
  +-    of the WWW::Mechanize tests interact with websites such as Google,
  +-    in addition to its own internal tests.
  +-
  +-EOT
  +-
  +-        if ( prompt("Do you want to skip these tests?", "y") =~ /^y/i ) {
  +-            $skiplive = 1;
  +-        }
  +-    } # failed connect
  +-}
  +-
  + my @tests = glob File::Spec->catfile( 't', '*.t' );
  +-push( @tests, glob File::Spec->catfile( 't', 'local', '*.t' ) ) unless 
$skiplocal;
  +-push( @tests, glob File::Spec->catfile( 't', 'live', '*.t' ) ) unless 
$skiplive;
  + 
  + my $parms = {
  +     'NAME'          => 'WWW::Mechanize',
  +@@ -85,33 +46,4 @@
  +     touch();
  + }
  + 
  +-eval { require LWP; };
  +-if ($@ or ! LWP::Protocol::implementor('https') ) {
  +-    print <<EOT;
  +-
  +-It looks like you don't have SSL capability (like IO::Socket::SSL) 
installed. 
  +-You will not be able to process https:// URLs correctly.
  +-
  +-EOT
  +-}
  +-
  +-my @missing;
  +-my @nice = qw( Test::Pod Test::Memory::Cycle Test::Warn );
  +-for my $nice ( @nice ) {
  +-    eval "require $nice";
  +-    push( @missing, $nice ) if $@;
  +-}
  +-
  +-if ( @missing ) {
  +-    @missing = map { "\t$_\n" } @missing;
  +-    print <<EOT;
  +-
  +-WWW::Mechanize likes to have a lot of test modules for some of its tests.
  +-The following are modules that would be nice to have, but not required.
  +-
  [EMAIL PROTECTED]
  +-
  +-EOT
  +-}
  +-
  + WriteMakefile( %$parms );
  @@ .
  patch -p0 <<'@@ .'
  Index: openpkg-src/perl-www/perl-www.spec
  ============================================================================
  $ cvs diff -u -r1.197 -r1.198 perl-www.spec
  --- openpkg-src/perl-www/perl-www.spec        12 Jun 2005 10:06:03 -0000      
1.197
  +++ openpkg-src/perl-www/perl-www.spec        12 Jun 2005 14:25:12 -0000      
1.198
  @@ -131,6 +131,7 @@
   Source43:     
http://www.cpan.org/modules/by-module/WDDX/WDDX-%{V_wddx}.tar.gz
   Source44:     
http://www.cpan.org/modules/by-module/WWW/WWW-OpenSearch-%{V_www_opensearch}.tar.gz
   Source45:     
http://www.cpan.org/modules/by-module/WWW/WWW-Wikipedia-%{V_www_wikipedia}.tar.gz
  +Patch0:       perl-www.patch
   
   #   build information
   Prefix:       %{l_prefix}
  @@ -465,6 +466,7 @@
       %setup -q -T -D -a 43
       %setup -q -T -D -a 44
       %setup -q -T -D -a 45
  +    %patch -p0
   
   %build
   
  @@ -500,7 +502,7 @@
       %{l_prefix}/bin/perl-openpkg -d %{SOURCE26} configure build install
       %{l_prefix}/bin/perl-openpkg -d %{SOURCE27} configure build install
       %{l_prefix}/bin/perl-openpkg -d %{SOURCE28} configure build install
  -    %{l_prefix}/bin/perl-openpkg -d %{SOURCE29} -A --nolive configure build 
install
  +    %{l_prefix}/bin/perl-openpkg -d %{SOURCE29} configure build install
       %{l_prefix}/bin/perl-openpkg -d %{SOURCE30} configure build install
       %{l_prefix}/bin/perl-openpkg -d %{SOURCE31} configure build install
       %{l_prefix}/bin/perl-openpkg -d %{SOURCE32} configure build install
  @@ .
______________________________________________________________________
The OpenPKG Project                                    www.openpkg.org
CVS Repository Commit List                     [email protected]

Reply via email to