diff options
author | Karl Berry <karl@freefriends.org> | 2007-06-17 23:37:06 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2007-06-17 23:37:06 +0000 |
commit | 8a782071ad66c9f0bc97d8566e35c49e39fd3814 (patch) | |
tree | 78c0d245d72530b846660ebc8350005d06576a32 /Master/tlpkg | |
parent | af0203ab8d35127f3a5b1aaeed7433deb114878c (diff) |
$W=1 instead of -w, for /usr/bin/env
git-svn-id: svn://tug.org/texlive/trunk@4465 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg')
-rwxr-xr-x | Master/tlpkg/bin/create-package-list.pl | 3 | ||||
-rwxr-xr-x | Master/tlpkg/bin/create_tlp_simple.pl | 4 | ||||
-rwxr-xr-x | Master/tlpkg/bin/tlp2tldb.pl | 3 | ||||
-rwxr-xr-x | Master/tlpkg/bin/tlsrc2tlp.pl | 3 | ||||
-rwxr-xr-x | Master/tlpkg/bin/updater.pl | 3 |
5 files changed, 10 insertions, 6 deletions
diff --git a/Master/tlpkg/bin/create-package-list.pl b/Master/tlpkg/bin/create-package-list.pl index acac8393252..3a9ed2822cb 100755 --- a/Master/tlpkg/bin/create-package-list.pl +++ b/Master/tlpkg/bin/create-package-list.pl @@ -1,4 +1,4 @@ -#!/usr/bin/env perl -w +#!/usr/bin/env perl # # create-package-list.pl # Create the package list of the current installation @@ -8,6 +8,7 @@ # or any later version BEGIN { + $^W = 1; ($mydir = $0) =~ s,/[^/]*$,,; unshift (@INC, "$mydir/.."); } diff --git a/Master/tlpkg/bin/create_tlp_simple.pl b/Master/tlpkg/bin/create_tlp_simple.pl index e8911e190ae..79b2f10e690 100755 --- a/Master/tlpkg/bin/create_tlp_simple.pl +++ b/Master/tlpkg/bin/create_tlp_simple.pl @@ -1,7 +1,7 @@ -#!/usr/bin/env perl -w +#!/usr/bin/env perl +$^W = 1 use strict; -use lib '../new-infra'; use TLSRC; use TLP; diff --git a/Master/tlpkg/bin/tlp2tldb.pl b/Master/tlpkg/bin/tlp2tldb.pl index 0d70aff7423..c7ce7a97bc2 100755 --- a/Master/tlpkg/bin/tlp2tldb.pl +++ b/Master/tlpkg/bin/tlp2tldb.pl @@ -1,4 +1,4 @@ -#!/usr/bin/env perl -w +#!/usr/bin/env perl # # tlp2tldb.pl # convert a set of tlp files (given as arguments) into a tldb @@ -9,6 +9,7 @@ # BEGIN { + $^W = 1; ($mydir = $0) =~ s,/[^/]*$,,; unshift (@INC, $mydir); } diff --git a/Master/tlpkg/bin/tlsrc2tlp.pl b/Master/tlpkg/bin/tlsrc2tlp.pl index 2c888af4e68..58f7dff61d7 100755 --- a/Master/tlpkg/bin/tlsrc2tlp.pl +++ b/Master/tlpkg/bin/tlsrc2tlp.pl @@ -1,4 +1,4 @@ -#!/usr/bin/env perl -w +#!/usr/bin/env perl # # tlsrc2tlp.pl # convert a set of tlsrc files (given as arguments) into tlp @@ -9,6 +9,7 @@ # BEGIN { + $^W = 1; ($mydir = $0) =~ s,/[^/]*$,,; unshift (@INC, $mydir); } diff --git a/Master/tlpkg/bin/updater.pl b/Master/tlpkg/bin/updater.pl index 1f161ec619b..305e035a725 100755 --- a/Master/tlpkg/bin/updater.pl +++ b/Master/tlpkg/bin/updater.pl @@ -1,4 +1,4 @@ -#!/usr/bin/env perl -w +#!/usr/bin/env perl # # updater.pl # test implementation of an update program @@ -7,6 +7,7 @@ # This file is licensed under the GNU General Public Licence version 2 # or any later version +$^W = 1; use strict; use TLP; |