X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=scripts%2Fconsole;h=bf4ffaa6c8fb05b16c2e47b77e6cbdb07c51377a;hb=958b82d600cebec78ff208257b1fd348ee0439bf;hp=8bbe93d6969902eae1fef4dbe3de9a1a3336912f;hpb=419facb25a4db9980b1ce634c36d1f1457def49c;p=kivitendo-erp.git

diff --git a/scripts/console b/scripts/console
index 8bbe93d69..bf4ffaa6c 100755
--- a/scripts/console
+++ b/scripts/console
@@ -2,6 +2,8 @@
 
 use warnings;
 use strict;
+use utf8;
+use open qw(:std :utf8);
 use 5.008;                          # too much magic in here to include perl 5.6
 
 BEGIN {
@@ -64,6 +66,10 @@ sub execute_code {
 my $repl = Devel::REPL->new;
 $repl->load_plugin($_) for @plugins;
 $repl->load_history($history_file);
+
+binmode($repl->out_fh, 'utf8');
+
+$repl->eval('use utf8;');
 $repl->eval('help');
 $repl->print("trying to auto login into client '$client' with login '$login'...\n");
 execute_code($repl, "lxinit '$client', '$login'");