Ticket #4389: nuvexport-utf8.patch

File nuvexport-utf8.patch, 1.0 KB (added by otto at kolsi dot fi, 16 years ago)
  • mythtv/recordings.pm

     
    1515    use nuv_export::cli;
    1616    use mythtv::nuvinfo;
    1717    use Date::Manip;
     18    use Encode;
    1819
    1920    BEGIN {
    2021        use Exporter;
     
    8182            $file->{'title'}       = 'Untitled'       unless ($file->{'title'} =~ /\S/);
    8283            $file->{'subtitle'}    = 'Untitled'       unless ($file->{'subtitle'} =~ /\S/);
    8384            $file->{'description'} = 'No Description' unless ($file->{'description'} =~ /\S/);
     85
     86        # Convert from utf8
     87            $file->{'title'} = decode("utf8", $file->{'title'});
     88            $file->{'subtitle'} = decode("utf8", $file->{'subtitle'});
     89            $file->{'description'} = decode("utf8", $file->{'description'});
     90
    8491        # Get a user-configurable showtime string
    8592            if (arg('date')) {
    8693                $file->{'showtime'} = UnixDate("epoch $file->{'starttime'}", arg($date));