Version bump

Package-Manager: portage-2.2_rc20/cvs/Linux 2.6.27-tuxonice i686

4 files changed, 114 insertions, 6 deletions

diff --git a/dev-perl/HTTP-Server-Simple/ChangeLog b/dev-perl/HTTP-Server-Simple/ChangeLog
index 935df59cae6b..ba178f0247ae 100644
--- a/dev-perl/HTTP-Server-Simple/ChangeLog
+++ b/dev-perl/HTTP-Server-Simple/ChangeLog
@@ -1,6 +1,12 @@
 # ChangeLog for dev-perl/HTTP-Server-Simple
-# Copyright 1999-2008 Gentoo Foundation; Distributed under the GPL v2
-# $Header: /var/cvsroot/gentoo-x86/dev-perl/HTTP-Server-Simple/ChangeLog,v 1.34 2008/12/30 16:08:05 tove Exp $
+# Copyright 1999-2009 Gentoo Foundation; Distributed under the GPL v2
+# $Header: /var/cvsroot/gentoo-x86/dev-perl/HTTP-Server-Simple/ChangeLog,v 1.35 2009/01/04 11:33:58 tove Exp $
+
+*HTTP-Server-Simple-0.37 (04 Jan 2009)
+
+  04 Jan 2009; Torsten Veller <tove@gentoo.org> +files/0.37-debian.patch,
+  +HTTP-Server-Simple-0.37.ebuild:
+  Version bump
 
   30 Dec 2008; Torsten Veller <tove@gentoo.org> -files/0.34-debian.patch,
   -files/0.35-debian.patch, -HTTP-Server-Simple-0.34.ebuild,
diff --git a/dev-perl/HTTP-Server-Simple/HTTP-Server-Simple-0.37.ebuild b/dev-perl/HTTP-Server-Simple/HTTP-Server-Simple-0.37.ebuild
new file mode 100644
index 000000000000..ee5ab95f6222
--- /dev/null
+++ b/dev-perl/HTTP-Server-Simple/HTTP-Server-Simple-0.37.ebuild
@@ -0,0 +1,23 @@
+# Copyright 1999-2009 Gentoo Foundation
+# Distributed under the terms of the GNU General Public License v2
+# $Header: /var/cvsroot/gentoo-x86/dev-perl/HTTP-Server-Simple/HTTP-Server-Simple-0.37.ebuild,v 1.1 2009/01/04 11:33:58 tove Exp $
+
+#MODULE_AUTHOR=ALEXMV
+MODULE_AUTHOR=JESSE
+inherit perl-module eutils
+
+DESCRIPTION="Lightweight HTTP Server"
+
+SLOT="0"
+LICENSE="|| ( Artistic GPL-2 )"
+KEYWORDS="~amd64 ~ia64 ~ppc ~sparc ~x86"
+IUSE="test"
+
+RDEPEND="dev-lang/perl
+	dev-perl/URI"
+DEPEND="${RDEPEND}
+	test? ( dev-perl/Test-Pod
+		dev-perl/Test-Pod-Coverage )"
+
+SRC_TEST="do"
+#PATCHES=( "${FILESDIR}/${PV}-debian.patch" )
diff --git a/dev-perl/HTTP-Server-Simple/Manifest b/dev-perl/HTTP-Server-Simple/Manifest
index 3c2c5ae794d5..3e73cb9b07bd 100644
--- a/dev-perl/HTTP-Server-Simple/Manifest
+++ b/dev-perl/HTTP-Server-Simple/Manifest
@@ -2,16 +2,19 @@
 Hash: SHA1
 
 AUX 0.36-debian.patch 2324 RMD160 3b9881e5eca74f74ca08ce0f52d79aa374ae6b8a SHA1 61f0528a5a8bc6ecfca7c092792e560cb436b956 SHA256 790600dee5bf9f07687083b57a54cb22ae47eb4ba953df5ba487948bfe25ca91
+AUX 0.37-debian.patch 1995 RMD160 faa8e23a2148ed8c70d3aa7b6d29326ed5b5693e SHA1 5013dd370f6723c57b02170f2c30af596991cde3 SHA256 0de944055cfa889b1bc460628363beca0a0d2344c69597335511be47f22d41bb
 DIST HTTP-Server-Simple-0.27.tar.gz 23330 RMD160 909115066240d9956bf02e46dd03ada4d7b21763 SHA1 aed637669d1a3ff7a350d78ad64dffb47f95fdb9 SHA256 5848cc49e600795e22db40c2aafc1e6d0da5bd6b04aa29f98393adf2fddf000f
 DIST HTTP-Server-Simple-0.36.tar.gz 25631 RMD160 36c472798903884f735f5b82e6325d90ae6561fe SHA1 f150e6856ebd8b74f5ba73c90dfceb4c898ffcac SHA256 cbee2dd4edb24a0a87e5160d10eb2fef87c9697027dc9e9e5239ff50867ff99f
+DIST HTTP-Server-Simple-0.37.tar.gz 25966 RMD160 d55b5fb93d9d6826e15337c23f0409e3b4059a39 SHA1 a7f07867bf0700aab6421575126036956ad4d487 SHA256 54996d3f61f7bd0906c7e1f24360deceed4409fc739cbd6b73947a22eabb5a06
 EBUILD HTTP-Server-Simple-0.27.ebuild 526 RMD160 8788b1344ea4836ce81d6c78dbf0ce632a7350d7 SHA1 b42d398ce10ae93186da97b5d66198e8a2c5e50e SHA256 4ff858058256fa2ae853087f03521a364af7a3b2027681d2f04ab6d07dc502a8
 EBUILD HTTP-Server-Simple-0.36.ebuild 594 RMD160 af349459acfd0b8ea8216827851a5b4a09514719 SHA1 1634adbd6c9d4e775564f8501d8738195afeb48d SHA256 f8d79f9268475b7e593ab02c4af551ff0ecccfc42c4c4cbbec6d1a1d063412c0
-MISC ChangeLog 4759 RMD160 7a176a00fcde5d4faf4f621410a5ee32f511edc4 SHA1 a7b4750b6c238ec75fcaa2e58bbc2412b227e736 SHA256 908a44fd79e7d7f69ee00c0f5907adafa9681efbc2242670ec1fc87f11bb9d28
+EBUILD HTTP-Server-Simple-0.37.ebuild 620 RMD160 5c277e5b00a7d1df059dfdb2f98e8b8a9a0ec83c SHA1 b10ca89febc57a3184699d79b1e1e9c2d1687ee5 SHA256 ef709a46aa85baa8ce0fbe108141202a94d6e4154ea6b96c52283dd33cdf8566
+MISC ChangeLog 4924 RMD160 afcdc758567dcc00d7a92389e7aa23bf849393bd SHA1 0cab6f53992569a907fb25656d4c0a8f3709c125 SHA256 d68a4b1dbb13a3c7320b1b5cb19d5bb8f4c13e1c8a0efec46c915d162f2cff4a
 MISC metadata.xml 305 RMD160 647980838c590f54441a053916ea629e53e551c0 SHA1 99ef1deeae9a934fb6e46cf5fc4a5fcb8379a74a SHA256 f05dbef15061919972882cab07057e102760a542beba17d131194091401cd7ca
 -----BEGIN PGP SIGNATURE-----
 Version: GnuPG v2.0.9 (GNU/Linux)
 
-iEYEARECAAYFAklaR1EACgkQV3J2n04EauwKWQCgxFBqhCkb2w6QAgb32TSHfzDp
-yHMAnjxN/sLLZjM6AWB9+l7sLZYCtxkW
-=XwMl
+iEYEARECAAYFAklgnpIACgkQV3J2n04Eaux3qwCfWKV0p79YYjNRRqs26sfyr8D/
+2EYAnjGeHK1r7kHZMO997e1vsDeypMBK
+=8ElM
 -----END PGP SIGNATURE-----
diff --git a/dev-perl/HTTP-Server-Simple/files/0.37-debian.patch b/dev-perl/HTTP-Server-Simple/files/0.37-debian.patch
new file mode 100644
index 000000000000..65e6dfa3d135
--- /dev/null
+++ b/dev-perl/HTTP-Server-Simple/files/0.37-debian.patch
@@ -0,0 +1,76 @@
+From: Niko Tyni <ntyni@iki.fi>
+Subject: [PATCH] Pipe version: parent waits for the child to say "OK" via a pipe.
+
+--- a/lib/HTTP/Server/Simple.pm
++++ b/lib/HTTP/Server/Simple.pm
+@@ -6,6 +6,7 @@
+ use Socket;
+ use Carp;
+ use URI::Escape;
++use IO::Select;
+ 
+ use vars qw($VERSION $bad_request_doc);
+ $VERSION = '0.36';
+@@ -206,15 +207,36 @@
+ 
+ sub background {
+     my $self  = shift;
++
++    # set up a pipe so the child can tell the parent when it's ready
++    # to accept requests
++    my ($readfh, $writefh) = FileHandle::pipe;
++
+     my $child = fork;
+     croak "Can't fork: $!" unless defined($child);
+-    return $child if $child;
++    if ($child) { # parent
++        my $s = IO::Select->new;
++        $s->add($readfh);
++        my $now = time; my $left = 0;
++        my @ready;
++        while(not @ready and $left < 5) {
++            @ready = $s->can_read($left);
++            $left = time - $now;
++        }
++        die("child unresponsive for 5 seconds") if(not @ready);
++        my $response = <$readfh>;
++        chomp $response;
++        die("child is confused: answer '$response' != 'OK'")
++            if $response ne "OK";
++        return $child;
++    }
+ 
+     if ( $^O !~ /MSWin32/ ) {
+         require POSIX;
+         POSIX::setsid()
+             or croak "Can't start a new session: $!";
+     }
++    $self->{_parent_handle} = $writefh;
+     $self->run(@_);
+ }
+ 
+@@ -263,6 +285,7 @@
+ 	$self->after_setup_listener();
+         *{"$pkg\::run"} = $self->_default_run;
+     }
++    $self->_maybe_tell_parent();
+ 
+     local $SIG{HUP} = sub { $SERVER_SHOULD_RUN = 0; };
+ 
+@@ -400,6 +423,16 @@
+     }
+ }
+ 
++sub _maybe_tell_parent {
++    # inform the parent process that we're ready, if applicable
++    my $self = shift;
++    my $handle = $self->{_parent_handle};
++    return if !$handle;
++    print $handle "OK\n";
++    close $handle;
++    delete $self->{_parent_handle};
++}
++
+ =head2 stdio_handle [FILEHANDLE]
+ 
+ When called with an argument, sets the socket to the server to that arg.