Author: sparky
Date: Thu Apr 29 20:03:57 2010
New Revision: 11351
Modified:
toys/rsget.pl/RSGet/Curl.pm
Log:
- make sure file names encoded in utf8 don't cause problems
Modified: toys/rsget.pl/RSGet/Curl.pm
==============================================================================
--- toys/rsget.pl/RSGet/Curl.pm (original)
+++ toys/rsget.pl/RSGet/Curl.pm Thu Apr 29 20:03:57 2010
@@ -16,6 +16,7 @@
use File::Copy;
use File::Path;
use Fcntl qw(SEEK_SET);
+use Encode;
set_rev qq$Id$;
def_settings(
@@ -297,6 +298,7 @@
$eurl =~ s/\?.*$//;
$fname = de_ml( uri_unescape( $eurl ) );
}
+ $fname = encode_utf8( decode_utf8( $fname ) );
if ( my $fn = $supercurl->{fname} ) {
if ( $fname ne $fn ) {
_______________________________________________
pld-cvs-commit mailing list
[email protected]
http://lists.pld-linux.org/mailman/listinfo/pld-cvs-commit
