Commit af78ba81 authored by Jason Rhinelander's avatar Jason Rhinelander
Browse files

Perl 5.14 no longer installs UnicodeData.txt, so include a copy (from Unicode...

Perl 5.14 no longer installs UnicodeData.txt, so include a copy (from Unicode 6.0.0) alongside the script and, using FindBin, load it instead of Perl's internal version.
parent 1a2c090a
This diff is collapsed.
......@@ -10,8 +10,9 @@ use Term::ReadKey qw/GetTerminalSize/;
use Term::ANSIColor;
use Unicode::UCD qw/charinfo/;
use Encode;
use FindBin;
Unicode::UCD::openunicode(\my $unicode_fh, 'UnicodeData.txt');
open my $unicode_fh, '<', "$FindBin::RealBin/UnicodeData.txt";
my ($term_cols, $term_lines) = GetTerminalSize();
my $bold = color 'bold';
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment