From e5e75ef5cdc189508a454e393dace9af0edd659e Mon Sep 17 00:00:00 2001 From: Manuel Pégourié-Gonnard Date: Tue, 14 Jul 2009 12:25:53 +0000 Subject: Some more files could use open qw(:utf8 :std). git-svn-id: svn://tug.org/texlive/trunk@14257 c570f23f-e606-0410-a88d-b1316a301751 --- Master/install-tl | 2 ++ Master/tlpkg/TeXLive/TLWinGoo.pm | 2 ++ Master/tlpkg/bin/tl-update-nsis | 2 ++ Master/tlpkg/bin/tlpfiles | 2 ++ 4 files changed, 8 insertions(+) (limited to 'Master') diff --git a/Master/install-tl b/Master/install-tl index 84919d14957..dff7d7b833a 100755 --- a/Master/install-tl +++ b/Master/install-tl @@ -44,6 +44,8 @@ BEGIN { unshift (@INC, "$::installerdir/tlpkg"); } +use open qw(:utf8 :std); + use Cwd 'abs_path'; use Getopt::Long qw(:config no_autoabbrev); use Pod::Usage; diff --git a/Master/tlpkg/TeXLive/TLWinGoo.pm b/Master/tlpkg/TeXLive/TLWinGoo.pm index d1f773f87d6..d895a4580cc 100644 --- a/Master/tlpkg/TeXLive/TLWinGoo.pm +++ b/Master/tlpkg/TeXLive/TLWinGoo.pm @@ -132,6 +132,8 @@ BEGIN { use TeXLive::TLUtils; TeXLive::TLUtils->import( qw( mkdirhier ) ); +use open qw(:utf8 :std); + my $is_win = $^O=~/^MSWin(32|64)$/i; =pod diff --git a/Master/tlpkg/bin/tl-update-nsis b/Master/tlpkg/bin/tl-update-nsis index 78ef875db99..6a928bf2a7a 100755 --- a/Master/tlpkg/bin/tl-update-nsis +++ b/Master/tlpkg/bin/tl-update-nsis @@ -16,6 +16,8 @@ our $mydir; use strict; +use open qw(:utf8 :std); + use TeXLive::TLConfig; use TeXLive::TLUtils; use TeXLive::TLPOBJ; diff --git a/Master/tlpkg/bin/tlpfiles b/Master/tlpkg/bin/tlpfiles index d5407b45aab..d2f54841d68 100755 --- a/Master/tlpkg/bin/tlpfiles +++ b/Master/tlpkg/bin/tlpfiles @@ -17,6 +17,8 @@ BEGIN { use strict; +use open qw(:utf8 :std); + use TeXLive::TLConfig qw/$RelocPrefix $RelocTree/; use TeXLive::TLPDB; use Pod::Usage; -- cgit v1.2.3