mirror/freebsd-ports
1
0
Fork 0
mirror of https://git.FreeBSD.org/ports.git synced 2025-01-12 07:27:57 +00:00
Code Issues Releases Activity

Avoid segfault on perl 5.10

Browse Source 
PR:		ports/139259
Submitted by:	Vivek Khera <vivek@khera.org>
Obtained from:	http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=537996
This commit is contained in:
Lars Thegler 2009-10-12 19:55:37 +00:00
parent fcc8c2ad29
commit 66beb0127c
Notes: svn2git 2021-03-31 03:12:20 +00:00 
svn path=/head/; revision=242742
2 changed files with 16 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
www/p5-CGI-SpeedyCGI/Makefile
View File

@ -7,7 +7,7 @@
PORTNAME= CGI-SpeedyCGI
PORTVERSION= 2.22
PORTREVISION= 4
PORTREVISION= 5
CATEGORIES= www perl5
MASTER_SITES= CPAN
PKGNAMEPREFIX= p5-

15
www/p5-CGI-SpeedyCGI/files/patch-src_speedy_perl.c Normal file
View File

@ -0,0 +1,15 @@
Author: Niko Tyni <ntyni@debian.org>
Description: Closes: #537996
The SvIV call crashes in on Perl 5.10.0 when warnings are
enabled and the value is undef.
--- src/speedy_perl.c
+++ src/speedy_perl.c
@@ -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;