texinfo util/Makefile.am util/txixml2texi.pl tp...

[Patrice Dumas]

CVSROOT:        /sources/texinfo
Module name:    texinfo
Changes by:     Patrice Dumas <pertusus>        12/11/21 22:48:49

Modified files:
        util           : Makefile.am txixml2texi.pl 
        tp             : Makefile.am texi2any.pl 
        tp/maintain    : regenerate_documentlanguages.pl 
                         regenerate_file_lists.pl 
        tp/tests/nested_formats: generate_all_texi.pl 
        Pod-Simple-Texinfo: Makefile.am pod2texi.pl 

Log message:
                * */*.pl */Makefile.am: use #! /usr/bin/env perl for shebangs 
in case
                perl is not in /usr/bin.
                Subbstitute $(PERL) in the shebang for scripts that are modified
                using configure generated values.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/texinfo/util/Makefile.am?cvsroot=texinfo&r1=1.49&r2=1.50
http://cvs.savannah.gnu.org/viewcvs/texinfo/util/txixml2texi.pl?cvsroot=texinfo&r1=1.6&r2=1.7
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/Makefile.am?cvsroot=texinfo&r1=1.50&r2=1.51
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/texi2any.pl?cvsroot=texinfo&r1=1.149&r2=1.150
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/maintain/regenerate_documentlanguages.pl?cvsroot=texinfo&r1=1.3&r2=1.4
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/maintain/regenerate_file_lists.pl?cvsroot=texinfo&r1=1.11&r2=1.12
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/tests/nested_formats/generate_all_texi.pl?cvsroot=texinfo&r1=1.2&r2=1.3
http://cvs.savannah.gnu.org/viewcvs/texinfo/Pod-Simple-Texinfo/Makefile.am?cvsroot=texinfo&r1=1.7&r2=1.8
http://cvs.savannah.gnu.org/viewcvs/texinfo/Pod-Simple-Texinfo/pod2texi.pl?cvsroot=texinfo&r1=1.21&r2=1.22

Patches:
Index: util/Makefile.am
===================================================================
RCS file: /sources/texinfo/texinfo/util/Makefile.am,v
retrieving revision 1.49
retrieving revision 1.50
diff -u -b -r1.49 -r1.50
--- util/Makefile.am    20 Nov 2012 00:16:54 -0000      1.49
+++ util/Makefile.am    21 Nov 2012 22:48:47 -0000      1.50
@@ -1,4 +1,4 @@
-# $Id: Makefile.am,v 1.49 2012/11/20 00:16:54 pertusus Exp $
+# $Id: Makefile.am,v 1.50 2012/11/21 22:48:47 pertusus Exp $
 # Makefile.am for texinfo/util.
 # Run automake in .. to produce Makefile.in from this.
 #
@@ -27,6 +27,7 @@
        -e 's,address@hidden@],$(USE_EXTERNAL_LIBINTL),g' \
        -e 's,address@hidden@],$(USE_EXTERNAL_EASTASIANWIDTH),g' \
        -e 's,address@hidden@],$(USE_EXTERNAL_UNIDECODE),g' \
+       -e '1 s,/usr/bin/env perl,$(PERL),g' \
           $(srcdir)/txixml2texi.pl >$@
        chmod a+x $@
 

Index: util/txixml2texi.pl
===================================================================
RCS file: /sources/texinfo/texinfo/util/txixml2texi.pl,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -b -r1.6 -r1.7
--- util/txixml2texi.pl 20 Nov 2012 03:17:00 -0000      1.6
+++ util/txixml2texi.pl 21 Nov 2012 22:48:47 -0000      1.7
@@ -29,6 +29,8 @@
 
 BEGIN
 {
+  # emulate -w
+  $^W = 1;
   my ($real_command_name, $command_directory, $command_suffix) 
      = fileparse($0, '.pl');
 

Index: tp/Makefile.am
===================================================================
RCS file: /sources/texinfo/texinfo/tp/Makefile.am,v
retrieving revision 1.50
retrieving revision 1.51
diff -u -b -r1.50 -r1.51
--- tp/Makefile.am      20 Nov 2012 02:33:42 -0000      1.50
+++ tp/Makefile.am      21 Nov 2012 22:48:48 -0000      1.51
@@ -1,4 +1,4 @@
-# $Id: Makefile.am,v 1.50 2012/11/20 02:33:42 pertusus Exp $
+# $Id: Makefile.am,v 1.51 2012/11/21 22:48:48 pertusus Exp $
 # Makefile.am for texinfo/tp.
 #
 # Copyright 2011, 2012 Free Software Foundation, Inc.
@@ -41,7 +41,8 @@
   -e 's,address@hidden@],$(PACKAGE),g' \
   -e 's,address@hidden@],$(USE_EXTERNAL_LIBINTL),g' \
   -e 's,address@hidden@],$(USE_EXTERNAL_EASTASIANWIDTH),g' \
-  -e 's,address@hidden@],$(USE_EXTERNAL_UNIDECODE),g'
+  -e 's,address@hidden@],$(USE_EXTERNAL_UNIDECODE),g' \
+  -e '1 s,/usr/bin/env perl,$(PERL),g'
 
 texi2any: texi2any.pl $(top_builddir)/config.status
        $(do_subst) $(srcdir)/texi2any.pl >$@

Index: tp/texi2any.pl
===================================================================
RCS file: /sources/texinfo/texinfo/tp/texi2any.pl,v
retrieving revision 1.149
retrieving revision 1.150
diff -u -b -r1.149 -r1.150
--- tp/texi2any.pl      20 Nov 2012 17:27:44 -0000      1.149
+++ tp/texi2any.pl      21 Nov 2012 22:48:48 -0000      1.150
@@ -1,4 +1,4 @@
-#! /usr/bin/perl -w
+#! /usr/bin/env perl 
 
 # texi2any: Texinfo converter.
 #
@@ -43,6 +43,8 @@
 # * installed relative to the script
 BEGIN
 {
+  # emulate -w
+  $^W = 1;
   my ($real_command_name, $command_directory, $command_suffix) 
      = fileparse($0, '.pl');
 

Index: tp/maintain/regenerate_documentlanguages.pl
===================================================================
RCS file: /sources/texinfo/texinfo/tp/maintain/regenerate_documentlanguages.pl,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -b -r1.3 -r1.4
--- tp/maintain/regenerate_documentlanguages.pl 25 Sep 2012 17:46:37 -0000      
1.3
+++ tp/maintain/regenerate_documentlanguages.pl 21 Nov 2012 22:48:48 -0000      
1.4
@@ -1,4 +1,4 @@
-#! /usr/bin/perl -w
+#! /usr/bin/env perl
 
 # regenerate_documentlanguages.pl: download the iana files language
 # and regenerate Texinfo/Documentlanguages.pm list of languages and regions
@@ -16,6 +16,12 @@
 
 use strict;
 
+# emulates -w
+BEGIN
+{
+  $^W = 1;
+}
+
 my $dir = 'maintain';
 system ("cd $dir && wget -N 
http://www.iana.org/assignments/language-subtag-registry";);
 

Index: tp/maintain/regenerate_file_lists.pl
===================================================================
RCS file: /sources/texinfo/texinfo/tp/maintain/regenerate_file_lists.pl,v
retrieving revision 1.11
retrieving revision 1.12
diff -u -b -r1.11 -r1.12
--- tp/maintain/regenerate_file_lists.pl        14 Nov 2012 00:20:39 -0000      
1.11
+++ tp/maintain/regenerate_file_lists.pl        21 Nov 2012 22:48:48 -0000      
1.12
@@ -1,5 +1,5 @@
-#! /usr/bin/perl -w
-# $Id: regenerate_file_lists.pl,v 1.11 2012/11/14 00:20:39 karl Exp $
+#! /usr/bin/env perl
+# $Id: regenerate_file_lists.pl,v 1.12 2012/11/21 22:48:48 pertusus Exp $
 # Copyright 2011, 2012 Free Software Foundation, Inc.
 #
 # This file is free software; as a special exception the author gives
@@ -13,6 +13,12 @@
 # Originally written by Patrice Dumas.
 
 use strict;
+
+# emulates -w
+BEGIN
+{
+  $^W = 1;
+}
 use File::Find;
 use File::Basename;
 use File::Spec;

Index: tp/tests/nested_formats/generate_all_texi.pl
===================================================================
RCS file: 
/sources/texinfo/texinfo/tp/tests/nested_formats/generate_all_texi.pl,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -b -r1.2 -r1.3
--- tp/tests/nested_formats/generate_all_texi.pl        16 Nov 2012 01:26:29 
-0000      1.2
+++ tp/tests/nested_formats/generate_all_texi.pl        21 Nov 2012 22:48:48 
-0000      1.3
@@ -1,4 +1,4 @@
-#! /usr/bin/perl -w
+#! /usr/bin/env perl
 # expand the manuals with nested formats using texi2any and test
 # with makeinfo on these expanded manuals (it is likely that makeinfo 
 # cannot expand those manuals in some cases).
@@ -8,6 +8,12 @@
 
 use strict;
 
+# emulates -w
+BEGIN
+{
+  $^W = 1;
+}
+
 open (TXT, 'tests-parser.txt') or die "Cannot open tests-parser.txt: $!\n";
 
 mkdir ("all_texi");

Index: Pod-Simple-Texinfo/Makefile.am
===================================================================
RCS file: /sources/texinfo/texinfo/Pod-Simple-Texinfo/Makefile.am,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -b -r1.7 -r1.8
--- Pod-Simple-Texinfo/Makefile.am      19 Nov 2012 23:54:09 -0000      1.7
+++ Pod-Simple-Texinfo/Makefile.am      21 Nov 2012 22:48:48 -0000      1.8
@@ -1,4 +1,4 @@
-# $Id: Makefile.am,v 1.7 2012/11/19 23:54:09 pertusus Exp $
+# $Id: Makefile.am,v 1.8 2012/11/21 22:48:48 pertusus Exp $
 # Makefile.am for texinfo/Pod-Simple_Texinfo.
 # Copyright 2012 Free Software Foundation, Inc.
 #
@@ -32,6 +32,7 @@
        -e 's,address@hidden@],$(USE_EXTERNAL_LIBINTL),g' \
        -e 's,address@hidden@],$(USE_EXTERNAL_EASTASIANWIDTH),g' \
        -e 's,address@hidden@],$(USE_EXTERNAL_UNIDECODE),g' \
+       -e '1 s,/usr/bin/env perl,$(PERL),g' \
           $(srcdir)/pod2texi.pl >$@
        chmod a+x $@
 

Index: Pod-Simple-Texinfo/pod2texi.pl
===================================================================
RCS file: /sources/texinfo/texinfo/Pod-Simple-Texinfo/pod2texi.pl,v
retrieving revision 1.21
retrieving revision 1.22
diff -u -b -r1.21 -r1.22
--- Pod-Simple-Texinfo/pod2texi.pl      20 Nov 2012 03:17:00 -0000      1.21
+++ Pod-Simple-Texinfo/pod2texi.pl      21 Nov 2012 22:48:48 -0000      1.22
@@ -1,4 +1,4 @@
-#! /usr/bin/perl -w
+#! /usr/bin/env perl
 
 # pod2texi -- convert Pod to Texinfo.
 #
@@ -29,6 +29,8 @@
 
 BEGIN
 {
+  # emulate -w
+  $^W = 1;
   my ($real_command_name, $command_directory, $command_suffix)
      = fileparse($0, '.pl');