Changeset 30436 for gs2-extensions

Show
Ignore:
Timestamp:
26.03.2016 23:06:43 (4 years ago)
Author:
davidb
Message:

Tweak to allow %xx%xx encodings expressing UTF8 to be correctly handled

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • gs2-extensions/music-ir-src/trunk/perllib/plugins/jSongMinerExtractor.pm

    r30433 r30436  
    8888    # ARG 1: $to_decode is the string to URL decode 
    8989    my ($to_decode) = @_; 
    90     my $decoded= uri_unescape($to_decode); 
     90    # really want to use 'uri_unescape_utf8' in the following, but 
     91    # it doesn't exist in the Perl module.  Follow will suffice 
     92    # my $decoded= uri_unescape_utf8($to_decode); 
     93    my $decoded = Encode::decode_utf8(uri_unescape($to_decode)); 
    9194 
    9295    return $decoded;