dump code with utf8 encoding

diff --git a/lib/MojoFacets/Data.pm b/lib/MojoFacets/Data.pm
index 05d7fbe..dc3fd7b 100644 (file)
--- a/lib/MojoFacets/Data.pm
+++ b/lib/MojoFacets/Data.pm
@@ -642,7 +642,7 @@ sub items {
                        if ( -e $path && ! $self->param('overwrite') ) {
                                warn "# code $path not saved\n";
                        } else {
-                               write_file $path, $code;
+                               write_file(  $path, { binmode => ':utf8' }, $code );
                                warn "code $path ", -s $path, " bytes saved\n";
                        }
                }