SVN: toys/rsget.pl/RSGet/Curl.pm

[sparky]

Author: sparky
Date: Sat Dec 18 17:17:25 2010
New Revision: 11989

Modified:
   toys/rsget.pl/RSGet/Curl.pm
Log:
- one more hack to Content-Disposition decoding


Modified: toys/rsget.pl/RSGet/Curl.pm
==============================================================================
--- toys/rsget.pl/RSGet/Curl.pm	(original)
+++ toys/rsget.pl/RSGet/Curl.pm	Sat Dec 18 17:17:25 2010
@@ -261,6 +261,10 @@
 
 	s/\s*;?\s+$//; # remove at least last \r
 	my $src = $_;
+	if ( s/^\s*=\?(.+?)\?(.*)\?=\s*/$2/ ) {
+		warn "C-D: Unknown filename encoding: $1, at $src\n"
+			if uc $1 ne "UTF-8" and verbose( 1 );
+	}
 	unless ( s/^\s*attachment\s*//i ) {
 		warn "Not an attachment in C-D: '$src'\n" if verbose( 1 );
 		return;