mirror/freebsd-ports
1
0
Fork 0
mirror of https://git.FreeBSD.org/ports.git synced 2024-11-23 00:43:28 +00:00
Code Issues Releases Activity

Fix spurious warnings that appear when working with POST forms.

Browse Source 
Bump portrevision.

Requested by:	sat
See also:	http://rt.cpan.org/Public/Bug/Display.html?id=34551
This commit is contained in:
Anton Berezin 2008-05-13 07:37:54 +00:00
parent 3b5eadd956
commit ed6bbbd74b
Notes: svn2git 2021-03-31 03:12:20 +00:00 
svn path=/head/; revision=212976
2 changed files with 12 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
www/p5-CGI.pm/Makefile
View File

@ -7,6 +7,7 @@
PORTNAME= CGI.pm
PORTVERSION= 3.37
PORTREVISION= 1
PORTEPOCH= 1
CATEGORIES= www perl5
MASTER_SITES= CPAN

11
www/p5-CGI.pm/files/patch-bug-34551 Normal file
View File

@ -0,0 +1,11 @@
--- CGI.pm.orig 2008-05-13 09:32:19.000000000 +0200
+++ CGI.pm 2008-05-13 09:32:59.000000000 +0200
@@ -3387,7 +3387,7 @@ sub read_multipart {
# content-disposition parsing fail.
my ($filename) = $header{'Content-Disposition'}
=~/ filename=(("[^"]*")|([a-z\d!\#'\*\+,\.^_\`\{\}\|\~]*))/i;
- $filename =~ s/^"([^"]*)"$/$1/;
+ $filename =~ s/^"([^"]*)"$/$1/ if defined $filename;
# Test for Opera's multiple upload feature
my($multipart) = ( defined( $header{'Content-Type'} ) &&
$header{'Content-Type'} =~ /multipart\/mixed/ ) ?