[67171] trunk/dports/perl/p5-cgi-speedycgi

[markd at macports.org]

Revision: 67171
          http://trac.macports.org/changeset/67171
Author:   markd at macports.org
Date:     2010-04-30 08:38:57 -0700 (Fri, 30 Apr 2010)
Log Message:
-----------
Add patch to fix segfaults on perl 5.10.  Patch comes from FreeBSD port.

Modified Paths:
--------------
    trunk/dports/perl/p5-cgi-speedycgi/Portfile

Added Paths:
-----------
    trunk/dports/perl/p5-cgi-speedycgi/files/patch-src-speedy_perl.c

Modified: trunk/dports/perl/p5-cgi-speedycgi/Portfile
===================================================================
--- trunk/dports/perl/p5-cgi-speedycgi/Portfile	2010-04-30 14:47:48 UTC (rev 67170)
+++ trunk/dports/perl/p5-cgi-speedycgi/Portfile	2010-04-30 15:38:57 UTC (rev 67171)
@@ -3,7 +3,7 @@
 PortSystem                      1.0
 PortGroup                       perl5 1.0
 perl5.setup                     CGI-SpeedyCGI 2.22
-revision			5
+revision			6
 maintainers                     markd openmaintainer
 description                     Speed up perl CGI scripts by running them persistently
 long_description                SpeedyCGI is a way to run perl scripts persistently, \
@@ -22,7 +22,8 @@
 				patch-src_speedy_main.c \
 				patch-mod_speedycgi-Makefile.tmpl \
 				patch-src-speedy_perl.h \
-				patch-src-speedy_backend_main.h
+				patch-src-speedy_backend_main.h \
+				patch-src-speedy_perl.c
 
 depends_lib			port:apache2
 

Added: trunk/dports/perl/p5-cgi-speedycgi/files/patch-src-speedy_perl.c
===================================================================
--- trunk/dports/perl/p5-cgi-speedycgi/files/patch-src-speedy_perl.c	                        (rev 0)
+++ trunk/dports/perl/p5-cgi-speedycgi/files/patch-src-speedy_perl.c	2010-04-30 15:38:57 UTC (rev 67171)
@@ -0,0 +1,11 @@
+--- src/speedy_perl.c.orig	2009-07-23 21:26:43.000000000 +0200
++++ src/speedy_perl.c	2009-07-23 21:26:47.000000000 +0200
+@@ -818,7 +818,7 @@
+     my_call_sv(get_perlvar(&PERLVAR_RESET_GLOBALS));
+ 
+     /* Copy option values in from the perl vars */
+-    if (SvIV(PERLVAL_OPTS_CHANGED)) {
++    if (SvTRUE(PERLVAL_OPTS_CHANGED)) {
+ 	int i;
+ 	for (i = 0; i < SPEEDY_NUMOPTS; ++i) {
+ 	    OptRec *o = speedy_optdefs + i;
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20100430/662f37a9/attachment.html>