Commit 5e385bc6 authored by Luc Didry's avatar Luc Didry
Browse files

Fix UTF8 bug

parent 35da16cd
...@@ -6,7 +6,7 @@ use Getopt::Long; ...@@ -6,7 +6,7 @@ use Getopt::Long;
use File::Spec; use File::Spec;
use Config::YAML; use Config::YAML;
use Mojo::Collection 'c'; use Mojo::Collection 'c';
use Mojo::Util qw(slurp spurt); use Mojo::Util qw(slurp spurt encode);
use Etherpad; use Etherpad;
use Data::Dumper; use Data::Dumper;
...@@ -81,7 +81,7 @@ sub delete_after_delay { ...@@ -81,7 +81,7 @@ sub delete_after_delay {
say 'Putting HTML version of '.$e.' in '.$file if $verbose; say 'Putting HTML version of '.$e.' in '.$file if $verbose;
spurt $html, $file; spurt encode('UTF-8', $html), $file;
say 'Deleting '.$e if $verbose; say 'Deleting '.$e if $verbose;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment