Now making use of new utf8 support when using Curses::UI

[mirrors/Programs.git] / perl / curses / file.pl

diff --git a/perl/curses/file.pl b/perl/curses/file.pl
index e0e4935592f441e809cbd11f90ca05a09a2285c7..6894fbe3e8397ea5d8e2107f6249fb3ffe6e8f7e 100755 (executable)
--- a/perl/curses/file.pl
+++ b/perl/curses/file.pl
@@ -1,7 +1,7 @@
 #!/usr/bin/env perl
 
            use Curses::UI;
-           my $cui = new Curses::UI( -color_support => 1, -compat => 0 );
+           my $cui = new Curses::UI( -color_support => 1, -compat => 0, -utf8 => 1);
            #my $win = $cui->add('window_id', 'Window');
 
            my $file = $cui->filebrowser(