pgupgrade_tool --create: Encoding besser respektieren.

diff --git a/scripts/dbupgrade2_tool.pl b/scripts/dbupgrade2_tool.pl
index f4a7bb7e76ba4aef6a6644e39358f99bbf4e8764..ba13e3f70ffefe88857effdd3af9ddef76e8a29b 100755 (executable)
--- 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;
 
 
   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";
   print $fh "$comment \@tag: $filename\n";
   print $fh "$comment \@description: $description\n";
   print $fh "$comment \@depends: @depends\n";