X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/00cfe3f286b5a620a163911ccb6d2be62816b80e..10687edafbc052375683d65e36ce42b4586f7240:/scripts/dbupgrade2_tool.pl

diff --git a/scripts/dbupgrade2_tool.pl b/scripts/dbupgrade2_tool.pl
index f4a7bb7e7..ba13e3f70 100755
--- a/scripts/dbupgrade2_tool.pl
+++ b/scripts/dbupgrade2_tool.pl
@@ -263,7 +263,7 @@ sub create_upgrade {
   die "file '$full_filename' already exists, aborting" if -f $full_filename;
 
 
-  open my $fh, ">:utf8", $full_filename or die "can't open $full_filename";
+  open my $fh, ">:encoding($encoding)", $full_filename or die "can't open $full_filename";
   print $fh "$comment \@tag: $filename\n";
   print $fh "$comment \@description: $description\n";
   print $fh "$comment \@depends: @depends\n";