Subject: | Bug: Output not working on Windows (included fix) |
Date: | Mon, 14 Aug 2017 10:56:07 -0400 |
To: | bug-data-dx [...] rt.cpan.org |
From: | William Barker <wrb4181 [...] gmail.com> |
Data::Dx-0.000006
Strawberry 5.26.0
Windows 10 64-bit
Output does not display correctly on Windows.
Example:
use 5.26.0
use warnings;
use Data::Dx;
my $x = 5;
Dx $x;
# ←[34m#line 11 test.pl
#←[0m←[1;38;5;136m$x←[0m←[1;38;5;245m = ←[0m←[36m1←[0m
Problem is Term::ANSIColor does not work under Windows terminals.
However, Win32::Console::ANSI does, and pretty much uses the same settings.
Fix line #67
Either:
state $colorer = eval { require Win32::Console::ANSI; require
Term::ANSIColor;
or
state $colorer = eval {
if ( $^O = 'MSWin32' ) { require Win32::Console::ANSI; };
else { require Term::ANSIColor; };