summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xMaster/texmf/scripts/texlive/tlmgr.pl2
-rw-r--r--Master/tlpkg/TeXLive/TLMedia.pm2
-rw-r--r--Master/tlpkg/TeXLive/TLPDB.pm2
-rw-r--r--Master/tlpkg/TeXLive/TLPOBJ.pm2
-rw-r--r--Master/tlpkg/TeXLive/TLPSRC.pm2
-rw-r--r--Master/tlpkg/TeXLive/TLPaper.pm2
-rw-r--r--Master/tlpkg/TeXLive/TLPostActions.pm2
-rw-r--r--Master/tlpkg/TeXLive/TLTREE.pm2
8 files changed, 16 insertions, 0 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgr.pl b/Master/texmf/scripts/texlive/tlmgr.pl
index 2ad10cbe1b8..9d70e817c5b 100755
--- a/Master/texmf/scripts/texlive/tlmgr.pl
+++ b/Master/texmf/scripts/texlive/tlmgr.pl
@@ -56,6 +56,8 @@ BEGIN {
unshift (@INC, "$Master/texmf/scripts/texlive");
}
+use open ':utf8';
+
use Cwd qw/abs_path/;
use Pod::Usage;
use Getopt::Long qw(:config no_autoabbrev permute);
diff --git a/Master/tlpkg/TeXLive/TLMedia.pm b/Master/tlpkg/TeXLive/TLMedia.pm
index bb8638a765d..f57454df618 100644
--- a/Master/tlpkg/TeXLive/TLMedia.pm
+++ b/Master/tlpkg/TeXLive/TLMedia.pm
@@ -13,6 +13,8 @@ use TeXLive::TLUtils qw(copy win32 dirname mkdirhier basename download_file
use TeXLive::TLPDB;
use TeXLive::TLWinGoo;
+use open qw(:utf8 :std);
+
sub new
{
my ($class, @args) = @_;
diff --git a/Master/tlpkg/TeXLive/TLPDB.pm b/Master/tlpkg/TeXLive/TLPDB.pm
index 5c65d57f726..ea6dd80f4ce 100644
--- a/Master/tlpkg/TeXLive/TLPDB.pm
+++ b/Master/tlpkg/TeXLive/TLPDB.pm
@@ -71,6 +71,8 @@ use TeXLive::TLPOBJ;
use Cwd 'abs_path';
+use open qw(:utf8 :std);
+
my $_listdir;
=pod
diff --git a/Master/tlpkg/TeXLive/TLPOBJ.pm b/Master/tlpkg/TeXLive/TLPOBJ.pm
index 87a19e70377..2c46736c60d 100644
--- a/Master/tlpkg/TeXLive/TLPOBJ.pm
+++ b/Master/tlpkg/TeXLive/TLPOBJ.pm
@@ -12,6 +12,8 @@ use TeXLive::TLConfig qw($DefaultCategory $CategoriesRegexp
use TeXLive::TLUtils;
use TeXLive::TLTREE;
+use open qw(:utf8 :std);
+
our $_tmp;
my $_containerdir;
diff --git a/Master/tlpkg/TeXLive/TLPSRC.pm b/Master/tlpkg/TeXLive/TLPSRC.pm
index 4a099bc9c41..8807e16ea6f 100644
--- a/Master/tlpkg/TeXLive/TLPSRC.pm
+++ b/Master/tlpkg/TeXLive/TLPSRC.pm
@@ -13,6 +13,8 @@ use TeXLive::TLUtils;
use TeXLive::TLPOBJ;
use TeXLive::TLTREE;
+use open qw(:utf8 :std);
+
my $_tmp;
my %autopatterns; # computed once internally
diff --git a/Master/tlpkg/TeXLive/TLPaper.pm b/Master/tlpkg/TeXLive/TLPaper.pm
index 66e39adeb07..478184cbb7e 100644
--- a/Master/tlpkg/TeXLive/TLPaper.pm
+++ b/Master/tlpkg/TeXLive/TLPaper.pm
@@ -31,6 +31,8 @@ C<TeXLive::TLPaper> -- paper size setting
use TeXLive::TLUtils qw(:DEFAULT dirname merge_into mkdirhier);
+use open qw(:utf8 :std);
+
my %paper_sub = (
"xdvi" => \&paper_xdvi,
"pdftex" => \&paper_pdftex,
diff --git a/Master/tlpkg/TeXLive/TLPostActions.pm b/Master/tlpkg/TeXLive/TLPostActions.pm
index f1e1f2da76c..531daeefd21 100644
--- a/Master/tlpkg/TeXLive/TLPostActions.pm
+++ b/Master/tlpkg/TeXLive/TLPostActions.pm
@@ -21,6 +21,8 @@ use TeXLive::TLUtils qw(win32 mkdirhier copy conv_to_w32_path log debug info
touch tlwarn);
use TeXLive::TLWinGoo;
+use open qw(:utf8 :std);
+
my $mainmenu = "TeX Live 2008";
our %PostInstall;
diff --git a/Master/tlpkg/TeXLive/TLTREE.pm b/Master/tlpkg/TeXLive/TLTREE.pm
index d0897d20885..550a163ba3f 100644
--- a/Master/tlpkg/TeXLive/TLTREE.pm
+++ b/Master/tlpkg/TeXLive/TLTREE.pm
@@ -9,6 +9,8 @@ package TeXLive::TLTREE;
use TeXLive::TLUtils;
+use open qw(:utf8 :std);
+
sub new {
my $class = shift;
my %params = @_;