more unicode fix
This commit is contained in:
11
src/ya.pl
11
src/ya.pl
@@ -46,9 +46,10 @@ use constant
|
|||||||
FG_RED => 4,
|
FG_RED => 4,
|
||||||
BG_WHITE => 112,
|
BG_WHITE => 112,
|
||||||
SZ_CONSOLE_FONT_INFOEX => 84,
|
SZ_CONSOLE_FONT_INFOEX => 84,
|
||||||
FF_MODERN_OR_6 => 54,
|
FF_DONTCARE => 0 << 4,
|
||||||
FW_NORMAL => 400,
|
FW_NORMAL => 400,
|
||||||
COORD => 524300
|
COORD => 0x000c0000,
|
||||||
|
FONT_NAME => 'Lucida Console'
|
||||||
};
|
};
|
||||||
|
|
||||||
my %log_colors =
|
my %log_colors =
|
||||||
@@ -143,11 +144,11 @@ if(IS_WIN)
|
|||||||
my $font = Win32::API::Struct->new('CONSOLE_FONT_INFOEX');
|
my $font = Win32::API::Struct->new('CONSOLE_FONT_INFOEX');
|
||||||
|
|
||||||
$font->{cbSize} = SZ_CONSOLE_FONT_INFOEX;
|
$font->{cbSize} = SZ_CONSOLE_FONT_INFOEX;
|
||||||
$font->{nFont} = 1;
|
$font->{nFont} = 0;
|
||||||
$font->{dwFontSize} = COORD; # COORD struct wrap
|
$font->{dwFontSize} = COORD; # COORD struct wrap
|
||||||
$font->{FontFamily} = FF_MODERN_OR_6;
|
$font->{FontFamily} = FF_DONTCARE;
|
||||||
$font->{FontWeight} = FW_NORMAL;
|
$font->{FontWeight} = FW_NORMAL;
|
||||||
$font->{FaceName} = "Lucida Console";
|
$font->{FaceName} = Encode::encode('UTF-16LE', FONT_NAME);
|
||||||
|
|
||||||
SetCurrentConsoleFontEx(GetStdHandle(STD_OUTPUT_HANDLE), 0, $font);
|
SetCurrentConsoleFontEx(GetStdHandle(STD_OUTPUT_HANDLE), 0, $font);
|
||||||
}
|
}
|
||||||
|
|||||||
Reference in New Issue
Block a user