libreavous/lav-outils
libreavous/lav-outils
4
3
Fork 0
Code Issues Pull Requests Releases Activity

Correction du bug des accents mal encodés/affichés pour les titres des podcasts

Browse Source
This commit is contained in:
Frédéric Couchet 2019-05-14 11:27:54 +02:00 committed by Frédéric Couchet
parent 97a88b4e87
commit 90ce5cdfd5
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
podcasts/scripts/make-all-podcasts.pl
View File

@ -4,6 +4,7 @@ use strict;
use Getopt::Long; use Getopt::Long;
use JSON; use JSON;
use Data::Dumper; use Data::Dumper;
use utf8;
my ($help,$config,$verbose,$dryrun); my ($help,$config,$verbose,$dryrun);
my $meta_data_script = "lav-outils/podcasts/scripts/make-metadata-image-podcast.sh"; my $meta_data_script = "lav-outils/podcasts/scripts/make-metadata-image-podcast.sh";
@ -38,7 +39,7 @@ sub read_config {
my ($filename) = @_; my ($filename) = @_;
my $json_text = do { #read all the file in one shot my $json_text = do { #read all the file in one shot
open(my $json_fh, "<", $filename) open(my $json_fh, '<:encoding(UTF-8)', $filename)
or die("Can't open \$filename\": $!\n"); or die("Can't open \$filename\": $!\n");
local $/; local $/;
<$json_fh> <$json_fh>