fixed: international characters are corrupted on export
This commit is contained in:
parent
4a88e39c21
commit
f3e08f3268
3 changed files with 32 additions and 15 deletions
|
|
@ -753,7 +753,7 @@ sub exportWriteFile {
|
|||
}
|
||||
|
||||
# next, get the contents, open the file, and write the contents to the file.
|
||||
my $fh = eval { $dest->openw };
|
||||
my $fh = eval { $dest->open('>:utf8') };
|
||||
if($@) {
|
||||
WebGUI::Error->throw(error => "can't open " . $dest->absolute->stringify . " for writing: $!");
|
||||
}
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue