Author: sparky
Date: Wed Oct 14 20:57:09 2009
New Revision: 10785
Modified:
toys/rsget.pl/RSGet/Curl.pm
Log:
- replace \s with [ \t], else it catches next line if filename= is empty
Modified: toys/rsget.pl/RSGet/Curl.pm
==============================================================================
--- toys/rsget.pl/RSGet/Curl.pm (original)
+++ toys/rsget.pl/RSGet/Curl.pm Wed Oct 14 20:57:09 2009
@@ -212,10 +212,10 @@
if ( $supercurl->{force_name} ) {
$fname = $supercurl->{force_name};
} elsif ( $supercurl->{head} =~
-
/^Content-Disposition:\s*attachment;\s*filename\*=UTF-8''(.+?);?\s*$/mi ) {
+ /^Content-Disposition:[ \t]*attachment;[
\t]*filename\*=UTF-8''(.+?);?[ \t]*$/mi ) {
$fname = de_ml( uri_unescape( $1 ) );
} elsif ( $supercurl->{head} =~
-
/^Content-Disposition:\s*attachment;\s*filename\s*=\s*"?(.+?)"?;?\s*$/mi ) {
+ /^Content-Disposition:[ \t]*attachment;[ \t]*filename[
\t]*=[ \t]*"?(.+?)"?;?[ \t]*$/mi ) {
$fname = de_ml( uri_unescape( $1 ) );
} else {
my $eurl = $curl->getinfo( CURLINFO_EFFECTIVE_URL );
_______________________________________________
pld-cvs-commit mailing list
[email protected]
http://lists.pld-linux.org/mailman/listinfo/pld-cvs-commit
