texinfo-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

texinfo/tp Makefile.am t/01use.t t/02coverage.t...


From: Patrice Dumas
Subject: texinfo/tp Makefile.am t/01use.t t/02coverage.t...
Date: Sun, 10 Feb 2013 16:45:10 +0000

CVSROOT:        /sources/texinfo
Module name:    texinfo
Changes by:     Patrice Dumas <pertusus>        13/02/10 16:45:10

Modified files:
        tp             : Makefile.am 
        tp/t           : 01use.t 02coverage.t 03coverage_braces.t 
                         04verb.t 05paragraph.t 06columnfractions.t 
                         08misc_commands.t 09indices.t 10menu.t 16raw.t 
                         181quotation.t 18itemize.t 19def.t 
                         20preformatted.t 21multitable.t 22xtable.t 
                         25regions.t 27float.t 28heading.t 
                         30sectioning.t 50value.t 55conditionals.t 
                         57invalid_nestings.t 58alias.t 60macro.t 
                         70value_and_macro.t 80include.t accents.t 
                         automatic_menus.t automatic_nodes.t 
                         collect_spaces.t converters_tests.t 
                         do_master_menu.t docbook_tests.t fix_texinfo.t 
                         html_tests.t indent_menu_descriptions.t 
                         index_before_item.t info_tests.t languages.t 
                         nodenormalization.t paragraph.t 
                         plaintext_tests.t 
                         protect_character_in_texinfo.t 
                         reference_to_text_in_tree.t test_brace_count.t 
                         test_count.t test_fill_gaps_in_sectioning.t 
                         test_protect_hashchar_at_line_beginning.t 
                         test_sort.t test_tree_copy.t xml_tests.t 

Log message:
        Set up paths in standalone tap tests.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/Makefile.am?cvsroot=texinfo&r1=1.60&r2=1.61
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/01use.t?cvsroot=texinfo&r1=1.4&r2=1.5
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/02coverage.t?cvsroot=texinfo&r1=1.70&r2=1.71
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/03coverage_braces.t?cvsroot=texinfo&r1=1.49&r2=1.50
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/04verb.t?cvsroot=texinfo&r1=1.3&r2=1.4
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/05paragraph.t?cvsroot=texinfo&r1=1.15&r2=1.16
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/06columnfractions.t?cvsroot=texinfo&r1=1.15&r2=1.16
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/08misc_commands.t?cvsroot=texinfo&r1=1.31&r2=1.32
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/09indices.t?cvsroot=texinfo&r1=1.25&r2=1.26
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/10menu.t?cvsroot=texinfo&r1=1.31&r2=1.32
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/16raw.t?cvsroot=texinfo&r1=1.23&r2=1.24
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/181quotation.t?cvsroot=texinfo&r1=1.7&r2=1.8
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/18itemize.t?cvsroot=texinfo&r1=1.18&r2=1.19
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/19def.t?cvsroot=texinfo&r1=1.21&r2=1.22
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/20preformatted.t?cvsroot=texinfo&r1=1.14&r2=1.15
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/21multitable.t?cvsroot=texinfo&r1=1.11&r2=1.12
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/22xtable.t?cvsroot=texinfo&r1=1.17&r2=1.18
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/25regions.t?cvsroot=texinfo&r1=1.8&r2=1.9
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/27float.t?cvsroot=texinfo&r1=1.16&r2=1.17
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/28heading.t?cvsroot=texinfo&r1=1.2&r2=1.3
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/30sectioning.t?cvsroot=texinfo&r1=1.84&r2=1.85
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/50value.t?cvsroot=texinfo&r1=1.16&r2=1.17
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/55conditionals.t?cvsroot=texinfo&r1=1.16&r2=1.17
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/57invalid_nestings.t?cvsroot=texinfo&r1=1.25&r2=1.26
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/58alias.t?cvsroot=texinfo&r1=1.5&r2=1.6
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/60macro.t?cvsroot=texinfo&r1=1.42&r2=1.43
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/70value_and_macro.t?cvsroot=texinfo&r1=1.2&r2=1.3
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/80include.t?cvsroot=texinfo&r1=1.13&r2=1.14
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/accents.t?cvsroot=texinfo&r1=1.18&r2=1.19
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/automatic_menus.t?cvsroot=texinfo&r1=1.3&r2=1.4
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/automatic_nodes.t?cvsroot=texinfo&r1=1.13&r2=1.14
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/collect_spaces.t?cvsroot=texinfo&r1=1.1&r2=1.2
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/converters_tests.t?cvsroot=texinfo&r1=1.44&r2=1.45
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/do_master_menu.t?cvsroot=texinfo&r1=1.4&r2=1.5
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/docbook_tests.t?cvsroot=texinfo&r1=1.1&r2=1.2
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/fix_texinfo.t?cvsroot=texinfo&r1=1.3&r2=1.4
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/html_tests.t?cvsroot=texinfo&r1=1.23&r2=1.24
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/indent_menu_descriptions.t?cvsroot=texinfo&r1=1.1&r2=1.2
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/index_before_item.t?cvsroot=texinfo&r1=1.2&r2=1.3
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/info_tests.t?cvsroot=texinfo&r1=1.46&r2=1.47
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/languages.t?cvsroot=texinfo&r1=1.7&r2=1.8
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/nodenormalization.t?cvsroot=texinfo&r1=1.3&r2=1.4
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/paragraph.t?cvsroot=texinfo&r1=1.23&r2=1.24
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/plaintext_tests.t?cvsroot=texinfo&r1=1.36&r2=1.37
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/protect_character_in_texinfo.t?cvsroot=texinfo&r1=1.2&r2=1.3
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/reference_to_text_in_tree.t?cvsroot=texinfo&r1=1.2&r2=1.3
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/test_brace_count.t?cvsroot=texinfo&r1=1.1&r2=1.2
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/test_count.t?cvsroot=texinfo&r1=1.8&r2=1.9
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/test_fill_gaps_in_sectioning.t?cvsroot=texinfo&r1=1.2&r2=1.3
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/test_protect_hashchar_at_line_beginning.t?cvsroot=texinfo&r1=1.5&r2=1.6
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/test_sort.t?cvsroot=texinfo&r1=1.13&r2=1.14
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/test_tree_copy.t?cvsroot=texinfo&r1=1.2&r2=1.3
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/xml_tests.t?cvsroot=texinfo&r1=1.16&r2=1.17

Patches:
Index: Makefile.am
===================================================================
RCS file: /sources/texinfo/texinfo/tp/Makefile.am,v
retrieving revision 1.60
retrieving revision 1.61
diff -u -b -r1.60 -r1.61
--- Makefile.am 10 Feb 2013 15:23:26 -0000      1.60
+++ Makefile.am 10 Feb 2013 16:45:05 -0000      1.61
@@ -1,4 +1,4 @@
-# $Id: Makefile.am,v 1.60 2013/02/10 15:23:26 pertusus Exp $
+# $Id: Makefile.am,v 1.61 2013/02/10 16:45:05 pertusus Exp $
 # Makefile.am for texinfo/tp.
 #
 # Copyright 2011, 2012, 2013 Free Software Foundation, Inc.
@@ -172,6 +172,7 @@
                        $(top_srcdir)/build-aux/tap-driver.sh
 T_LOG_COMPILER = $(PERL)
 AM_T_LOG_FLAGS = -w
+AM_TESTS_ENVIRONMENT = srcdir="$(srcdir)"; export srcdir; 
top_srcdir="$(top_srcdir)"; export top_srcdir;
 
 maintenance_files = \
   maintain/all_tests.sh \

Index: t/01use.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/01use.t,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -b -r1.4 -r1.5
--- t/01use.t   16 Nov 2012 01:26:28 -0000      1.4
+++ t/01use.t   10 Feb 2013 16:45:05 -0000      1.5
@@ -6,7 +6,9 @@
 use strict;
 
 use Test::More;
-BEGIN { plan tests => 2 };
+use File::Spec;
+BEGIN { plan tests => 2;
+        if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
 use Texinfo::Convert::Texinfo;
 ok(1, "modules loading"); # If we made it this far, we're ok.
 

Index: t/02coverage.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/02coverage.t,v
retrieving revision 1.70
retrieving revision 1.71
diff -u -b -r1.70 -r1.71
--- t/02coverage.t      20 Nov 2012 01:49:28 -0000      1.70
+++ t/02coverage.t      10 Feb 2013 16:45:05 -0000      1.71
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my @test_cases = (

Index: t/03coverage_braces.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/03coverage_braces.t,v
retrieving revision 1.49
retrieving revision 1.50
diff -u -b -r1.49 -r1.50
--- t/03coverage_braces.t       10 Dec 2012 23:51:24 -0000      1.49
+++ t/03coverage_braces.t       10 Feb 2013 16:45:05 -0000      1.50
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my $two_footnotes_in_nodes_text = 

Index: t/04verb.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/04verb.t,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -b -r1.3 -r1.4
--- t/04verb.t  12 Jan 2012 08:15:05 -0000      1.3
+++ t/04verb.t  10 Feb 2013 16:45:05 -0000      1.4
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my @test_cases = (

Index: t/05paragraph.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/05paragraph.t,v
retrieving revision 1.15
retrieving revision 1.16
diff -u -b -r1.15 -r1.16
--- t/05paragraph.t     14 Aug 2011 20:23:04 -0000      1.15
+++ t/05paragraph.t     10 Feb 2013 16:45:05 -0000      1.16
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my @test_cases = (

Index: t/06columnfractions.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/06columnfractions.t,v
retrieving revision 1.15
retrieving revision 1.16
diff -u -b -r1.15 -r1.16
--- t/06columnfractions.t       20 May 2012 18:50:40 -0000      1.15
+++ t/06columnfractions.t       10 Feb 2013 16:45:05 -0000      1.16
@@ -1,6 +1,9 @@
 use Test::More;
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my @test_cases = (

Index: t/08misc_commands.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/08misc_commands.t,v
retrieving revision 1.31
retrieving revision 1.32
diff -u -b -r1.31 -r1.32
--- t/08misc_commands.t 24 Aug 2012 16:43:17 -0000      1.31
+++ t/08misc_commands.t 10 Feb 2013 16:45:05 -0000      1.32
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my @test_cases = (

Index: t/09indices.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/09indices.t,v
retrieving revision 1.25
retrieving revision 1.26
diff -u -b -r1.25 -r1.26
--- t/09indices.t       13 Dec 2012 01:14:18 -0000      1.25
+++ t/09indices.t       10 Feb 2013 16:45:06 -0000      1.26
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my @test_cases = (

Index: t/10menu.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/10menu.t,v
retrieving revision 1.31
retrieving revision 1.32
diff -u -b -r1.31 -r1.32
--- t/10menu.t  9 Aug 2012 22:35:35 -0000       1.31
+++ t/10menu.t  10 Feb 2013 16:45:06 -0000      1.32
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my $simple_menu_text = '

Index: t/16raw.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/16raw.t,v
retrieving revision 1.23
retrieving revision 1.24
diff -u -b -r1.23 -r1.24
--- t/16raw.t   12 Apr 2012 23:05:26 -0000      1.23
+++ t/16raw.t   10 Feb 2013 16:45:06 -0000      1.24
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my @test_cases = (

Index: t/181quotation.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/181quotation.t,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -b -r1.7 -r1.8
--- t/181quotation.t    1 Aug 2012 23:56:28 -0000       1.7
+++ t/181quotation.t    10 Feb 2013 16:45:06 -0000      1.8
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my @test_cases = (

Index: t/18itemize.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/18itemize.t,v
retrieving revision 1.18
retrieving revision 1.19
diff -u -b -r1.18 -r1.19
--- t/18itemize.t       11 Jan 2012 19:22:54 -0000      1.18
+++ t/18itemize.t       10 Feb 2013 16:45:06 -0000      1.19
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my @test_cases = (

Index: t/19def.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/19def.t,v
retrieving revision 1.21
retrieving revision 1.22
diff -u -b -r1.21 -r1.22
--- t/19def.t   16 Sep 2012 20:43:11 -0000      1.21
+++ t/19def.t   10 Feb 2013 16:45:06 -0000      1.22
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my @test_cases = (

Index: t/20preformatted.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/20preformatted.t,v
retrieving revision 1.14
retrieving revision 1.15
diff -u -b -r1.14 -r1.15
--- t/20preformatted.t  15 Jun 2012 00:37:21 -0000      1.14
+++ t/20preformatted.t  10 Feb 2013 16:45:06 -0000      1.15
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my @test_cases = (

Index: t/21multitable.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/21multitable.t,v
retrieving revision 1.11
retrieving revision 1.12
diff -u -b -r1.11 -r1.12
--- t/21multitable.t    27 Aug 2012 00:38:46 -0000      1.11
+++ t/21multitable.t    10 Feb 2013 16:45:07 -0000      1.12
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my @test_cases = (

Index: t/22xtable.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/22xtable.t,v
retrieving revision 1.17
retrieving revision 1.18
diff -u -b -r1.17 -r1.18
--- t/22xtable.t        9 Apr 2012 20:20:29 -0000       1.17
+++ t/22xtable.t        10 Feb 2013 16:45:07 -0000      1.18
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my @test_cases = (

Index: t/25regions.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/25regions.t,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -b -r1.8 -r1.9
--- t/25regions.t       10 Jan 2012 23:47:51 -0000      1.8
+++ t/25regions.t       10 Feb 2013 16:45:07 -0000      1.9
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my @test_cases = (

Index: t/27float.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/27float.t,v
retrieving revision 1.16
retrieving revision 1.17
diff -u -b -r1.16 -r1.17
--- t/27float.t 12 Jan 2012 23:25:35 -0000      1.16
+++ t/27float.t 10 Feb 2013 16:45:07 -0000      1.17
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my @test_cases = (

Index: t/28heading.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/28heading.t,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -b -r1.2 -r1.3
--- t/28heading.t       10 Jan 2012 23:53:41 -0000      1.2
+++ t/28heading.t       10 Feb 2013 16:45:07 -0000      1.3
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my @test_cases = (

Index: t/30sectioning.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/30sectioning.t,v
retrieving revision 1.84
retrieving revision 1.85
diff -u -b -r1.84 -r1.85
--- t/30sectioning.t    9 Sep 2012 21:59:50 -0000       1.84
+++ t/30sectioning.t    10 Feb 2013 16:45:07 -0000      1.85
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my $sections_no_top_text =

Index: t/50value.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/50value.t,v
retrieving revision 1.16
retrieving revision 1.17
diff -u -b -r1.16 -r1.17
--- t/50value.t 20 Jan 2013 16:45:29 -0000      1.16
+++ t/50value.t 10 Feb 2013 16:45:07 -0000      1.17
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my @test_cases = (

Index: t/55conditionals.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/55conditionals.t,v
retrieving revision 1.16
retrieving revision 1.17
diff -u -b -r1.16 -r1.17
--- t/55conditionals.t  15 Sep 2012 18:26:16 -0000      1.16
+++ t/55conditionals.t  10 Feb 2013 16:45:08 -0000      1.17
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my @test_cases = (

Index: t/57invalid_nestings.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/57invalid_nestings.t,v
retrieving revision 1.25
retrieving revision 1.26
diff -u -b -r1.25 -r1.26
--- t/57invalid_nestings.t      3 Mar 2012 17:40:05 -0000       1.25
+++ t/57invalid_nestings.t      10 Feb 2013 16:45:08 -0000      1.26
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my @test_cases = (

Index: t/58alias.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/58alias.t,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -b -r1.5 -r1.6
--- t/58alias.t 6 Jan 2012 23:40:48 -0000       1.5
+++ t/58alias.t 10 Feb 2013 16:45:08 -0000      1.6
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my @test_cases = (

Index: t/60macro.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/60macro.t,v
retrieving revision 1.42
retrieving revision 1.43
diff -u -b -r1.42 -r1.43
--- t/60macro.t 18 Aug 2012 23:37:01 -0000      1.42
+++ t/60macro.t 10 Feb 2013 16:45:08 -0000      1.43
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my @test_cases = (

Index: t/70value_and_macro.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/70value_and_macro.t,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -b -r1.2 -r1.3
--- t/70value_and_macro.t       23 Oct 2010 15:36:53 -0000      1.2
+++ t/70value_and_macro.t       10 Feb 2013 16:45:08 -0000      1.3
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my @test_cases = (

Index: t/80include.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/80include.t,v
retrieving revision 1.13
retrieving revision 1.14
diff -u -b -r1.13 -r1.14
--- t/80include.t       12 Apr 2012 17:30:14 -0000      1.13
+++ t/80include.t       10 Feb 2013 16:45:08 -0000      1.14
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my @test_cases = (

Index: t/accents.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/accents.t,v
retrieving revision 1.18
retrieving revision 1.19
diff -u -b -r1.18 -r1.19
--- t/accents.t 15 Jan 2013 01:25:51 -0000      1.18
+++ t/accents.t 10 Feb 2013 16:45:08 -0000      1.19
@@ -1,7 +1,9 @@
 use strict;
 
 use Test::More;
-BEGIN { plan tests => 63 };
+use File::Spec;
+BEGIN { plan tests => 63;
+        if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} };
 
 use lib 'maintain/lib/Unicode-EastAsianWidth/lib/';
 use lib 'maintain/lib/libintl-perl/lib/';

Index: t/automatic_menus.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/automatic_menus.t,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -b -r1.3 -r1.4
--- t/automatic_menus.t 4 Feb 2013 13:03:10 -0000       1.3
+++ t/automatic_menus.t 10 Feb 2013 16:45:08 -0000      1.4
@@ -1,7 +1,9 @@
 use strict;
 
 use Test::More;
-BEGIN { plan tests => 5 };
+use File::Spec;
+BEGIN { plan tests => 5;
+        if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} };
 
 use lib 'maintain/lib/Unicode-EastAsianWidth/lib/';
 use lib 'maintain/lib/libintl-perl/lib/';

Index: t/automatic_nodes.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/automatic_nodes.t,v
retrieving revision 1.13
retrieving revision 1.14
diff -u -b -r1.13 -r1.14
--- t/automatic_nodes.t 15 Dec 2012 17:12:57 -0000      1.13
+++ t/automatic_nodes.t 10 Feb 2013 16:45:08 -0000      1.14
@@ -1,7 +1,9 @@
 use strict;
 
 use Test::More;
-BEGIN { plan tests => 25 };
+use File::Spec;
+BEGIN { plan tests => 25;
+        if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} };
 
 use lib 'maintain/lib/Unicode-EastAsianWidth/lib/';
 use lib 'maintain/lib/libintl-perl/lib/';

Index: t/collect_spaces.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/collect_spaces.t,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -b -r1.1 -r1.2
--- t/collect_spaces.t  26 Aug 2012 14:15:04 -0000      1.1
+++ t/collect_spaces.t  10 Feb 2013 16:45:08 -0000      1.2
@@ -1,7 +1,10 @@
 use strict;
 
 use Test::More;
-BEGIN { plan tests => 15 };
+use File::Spec;
+BEGIN { plan tests => 15;
+        if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} };
+
 use lib 'maintain/lib/Unicode-EastAsianWidth/lib/';
 use lib 'maintain/lib/libintl-perl/lib/';
 use lib 'maintain/lib/Text-Unidecode/lib/';

Index: t/converters_tests.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/converters_tests.t,v
retrieving revision 1.44
retrieving revision 1.45
diff -u -b -r1.44 -r1.45
--- t/converters_tests.t        23 Jan 2013 18:54:50 -0000      1.44
+++ t/converters_tests.t        10 Feb 2013 16:45:08 -0000      1.45
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my $accents_text = '@node Top

Index: t/do_master_menu.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/do_master_menu.t,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -b -r1.4 -r1.5
--- t/do_master_menu.t  21 Jan 2013 21:00:18 -0000      1.4
+++ t/do_master_menu.t  10 Feb 2013 16:45:08 -0000      1.5
@@ -1,7 +1,9 @@
 use strict;
 
 use Test::More;
-BEGIN { plan tests => 5 };
+use File::Spec;
+BEGIN { plan tests => 5;
+        if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} };
 
 use lib 'maintain/lib/Unicode-EastAsianWidth/lib/';
 use lib 'maintain/lib/libintl-perl/lib/';

Index: t/docbook_tests.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/docbook_tests.t,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -b -r1.1 -r1.2
--- t/docbook_tests.t   18 Sep 2011 20:34:38 -0000      1.1
+++ t/docbook_tests.t   10 Feb 2013 16:45:08 -0000      1.2
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my @test_cases = (

Index: t/fix_texinfo.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/fix_texinfo.t,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -b -r1.3 -r1.4
--- t/fix_texinfo.t     24 Aug 2012 23:03:49 -0000      1.3
+++ t/fix_texinfo.t     10 Feb 2013 16:45:09 -0000      1.4
@@ -1,7 +1,10 @@
 use strict;
 
 use Test::More;
-BEGIN { plan tests => 4 };
+use File::Spec;
+BEGIN { plan tests => 4;
+        if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} };
+
 use lib 'maintain/lib/Unicode-EastAsianWidth/lib/';
 use lib 'maintain/lib/libintl-perl/lib/';
 use lib 'maintain/lib/Text-Unidecode/lib/';

Index: t/html_tests.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/html_tests.t,v
retrieving revision 1.23
retrieving revision 1.24
diff -u -b -r1.23 -r1.24
--- t/html_tests.t      23 Sep 2012 19:30:34 -0000      1.23
+++ t/html_tests.t      10 Feb 2013 16:45:09 -0000      1.24
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my @test_cases = (

Index: t/indent_menu_descriptions.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/indent_menu_descriptions.t,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -b -r1.1 -r1.2
--- t/indent_menu_descriptions.t        28 Jan 2013 21:53:23 -0000      1.1
+++ t/indent_menu_descriptions.t        10 Feb 2013 16:45:09 -0000      1.2
@@ -1,7 +1,9 @@
 use strict;
 
 use Test::More;
-BEGIN { plan tests => 2 };
+use File::Spec;
+BEGIN { plan tests => 2;
+        if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} };
 
 use lib 'maintain/lib/Unicode-EastAsianWidth/lib/';
 use lib 'maintain/lib/libintl-perl/lib/';

Index: t/index_before_item.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/index_before_item.t,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -b -r1.2 -r1.3
--- t/index_before_item.t       16 Feb 2012 00:33:49 -0000      1.2
+++ t/index_before_item.t       10 Feb 2013 16:45:09 -0000      1.3
@@ -1,7 +1,9 @@
 use strict;
 
 use Test::More;
-BEGIN { plan tests => 6 };
+use File::Spec;
+BEGIN { plan tests => 6;
+        if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} };
 
 use lib 'maintain/lib/Unicode-EastAsianWidth/lib/';
 use lib 'maintain/lib/libintl-perl/lib/';

Index: t/info_tests.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/info_tests.t,v
retrieving revision 1.46
retrieving revision 1.47
diff -u -b -r1.46 -r1.47
--- t/info_tests.t      7 Feb 2013 00:02:55 -0000       1.46
+++ t/info_tests.t      10 Feb 2013 16:45:09 -0000      1.47
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my @test_cases = (

Index: t/languages.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/languages.t,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -b -r1.7 -r1.8
--- t/languages.t       27 Jan 2012 00:16:35 -0000      1.7
+++ t/languages.t       10 Feb 2013 16:45:09 -0000      1.8
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my @test_cases = (

Index: t/nodenormalization.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/nodenormalization.t,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -b -r1.3 -r1.4
--- t/nodenormalization.t       19 Jan 2012 00:58:09 -0000      1.3
+++ t/nodenormalization.t       10 Feb 2013 16:45:09 -0000      1.4
@@ -1,5 +1,10 @@
+use strict;
+
 use Test::More;
-BEGIN { plan tests => 8 };
+use File::Spec;
+BEGIN { plan tests => 8;
+        if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} };
+
 use lib 'maintain/lib/Unicode-EastAsianWidth/lib/';
 use lib 'maintain/lib/libintl-perl/lib/';
 use lib 'maintain/lib/Text-Unidecode/lib/';
@@ -7,8 +12,6 @@
 use Texinfo::Parser;
 use Data::Dumper;
 
-use strict;
-
 # Currently, tests check that NodeNameNormalization do not break with complete 
 # Texinfo trees, not that the output is correct.
 

Index: t/paragraph.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/paragraph.t,v
retrieving revision 1.23
retrieving revision 1.24
diff -u -b -r1.23 -r1.24
--- t/paragraph.t       6 Nov 2011 21:09:29 -0000       1.23
+++ t/paragraph.t       10 Feb 2013 16:45:09 -0000      1.24
@@ -1,7 +1,10 @@
 use strict;
 
 use Test::More;
-BEGIN { plan tests => 129 };
+use File::Spec;
+BEGIN { plan tests => 129;
+        if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} };
+
 use lib 'maintain/lib/Unicode-EastAsianWidth/lib/';
 use Texinfo::Convert::Paragraph;
 use Texinfo::Convert::Line;

Index: t/plaintext_tests.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/plaintext_tests.t,v
retrieving revision 1.36
retrieving revision 1.37
diff -u -b -r1.36 -r1.37
--- t/plaintext_tests.t 7 Feb 2013 00:02:55 -0000       1.36
+++ t/plaintext_tests.t 10 Feb 2013 16:45:09 -0000      1.37
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my @test_cases = (

Index: t/protect_character_in_texinfo.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/protect_character_in_texinfo.t,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -b -r1.2 -r1.3
--- t/protect_character_in_texinfo.t    22 Feb 2012 00:03:44 -0000      1.2
+++ t/protect_character_in_texinfo.t    10 Feb 2013 16:45:09 -0000      1.3
@@ -1,7 +1,9 @@
 use strict;
 
 use Test::More;
-BEGIN { plan tests => 4 };
+use File::Spec;
+BEGIN { plan tests => 4;
+        if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} };
 
 use lib 'maintain/lib/Unicode-EastAsianWidth/lib/';
 use lib 'maintain/lib/libintl-perl/lib/';

Index: t/reference_to_text_in_tree.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/reference_to_text_in_tree.t,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -b -r1.2 -r1.3
--- t/reference_to_text_in_tree.t       10 Jul 2012 21:36:20 -0000      1.2
+++ t/reference_to_text_in_tree.t       10 Feb 2013 16:45:09 -0000      1.3
@@ -1,7 +1,9 @@
 use strict;
 
 use Test::More;
-BEGIN { plan tests => 2 };
+use File::Spec;
+BEGIN { plan tests => 2;
+        if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} };
 
 use lib 'maintain/lib/Unicode-EastAsianWidth/lib/';
 use lib 'maintain/lib/libintl-perl/lib/';

Index: t/test_brace_count.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/test_brace_count.t,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -b -r1.1 -r1.2
--- t/test_brace_count.t        18 Feb 2012 23:27:37 -0000      1.1
+++ t/test_brace_count.t        10 Feb 2013 16:45:09 -0000      1.2
@@ -1,7 +1,9 @@
 use strict;
 
 use Test::More;
-BEGIN { plan tests => 11 };
+use File::Spec;
+BEGIN { plan tests => 11;
+        if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} };
 
 use lib 'maintain/lib/Unicode-EastAsianWidth/lib/';
 use lib 'maintain/lib/libintl-perl/lib/';

Index: t/test_count.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/test_count.t,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -b -r1.8 -r1.9
--- t/test_count.t      6 Nov 2011 21:09:30 -0000       1.8
+++ t/test_count.t      10 Feb 2013 16:45:10 -0000      1.9
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my @test_cases = (

Index: t/test_fill_gaps_in_sectioning.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/test_fill_gaps_in_sectioning.t,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -b -r1.2 -r1.3
--- t/test_fill_gaps_in_sectioning.t    18 Apr 2012 21:10:23 -0000      1.2
+++ t/test_fill_gaps_in_sectioning.t    10 Feb 2013 16:45:10 -0000      1.3
@@ -1,7 +1,9 @@
 use strict;
 
 use Test::More;
-BEGIN { plan tests => 8 };
+use File::Spec;
+BEGIN { plan tests => 8;
+        if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} };
 
 use lib 'maintain/lib/Unicode-EastAsianWidth/lib/';
 use lib 'maintain/lib/libintl-perl/lib/';

Index: t/test_protect_hashchar_at_line_beginning.t
===================================================================
RCS file: 
/sources/texinfo/texinfo/tp/t/test_protect_hashchar_at_line_beginning.t,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -b -r1.5 -r1.6
--- t/test_protect_hashchar_at_line_beginning.t 2 Feb 2013 15:41:11 -0000       
1.5
+++ t/test_protect_hashchar_at_line_beginning.t 10 Feb 2013 16:45:10 -0000      
1.6
@@ -1,7 +1,9 @@
 use strict;
 
 use Test::More;
-BEGIN { plan tests => 6 };
+use File::Spec;
+BEGIN { plan tests => 6;
+        if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} };
 
 use lib 'maintain/lib/Unicode-EastAsianWidth/lib/';
 use lib 'maintain/lib/libintl-perl/lib/';

Index: t/test_sort.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/test_sort.t,v
retrieving revision 1.13
retrieving revision 1.14
diff -u -b -r1.13 -r1.14
--- t/test_sort.t       15 Dec 2012 17:12:57 -0000      1.13
+++ t/test_sort.t       10 Feb 2013 16:45:10 -0000      1.14
@@ -1,7 +1,9 @@
 use strict;
 
 use Test::More;
-BEGIN { plan tests => 6 };
+use File::Spec;
+BEGIN { plan tests => 6;
+        if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} };
 
 use lib 'maintain/lib/Unicode-EastAsianWidth/lib/';
 use lib 'maintain/lib/libintl-perl/lib/';

Index: t/test_tree_copy.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/test_tree_copy.t,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -b -r1.2 -r1.3
--- t/test_tree_copy.t  29 Feb 2012 21:48:10 -0000      1.2
+++ t/test_tree_copy.t  10 Feb 2013 16:45:10 -0000      1.3
@@ -1,7 +1,9 @@
 use strict;
 
 use Test::More;
-BEGIN { plan tests => 3 };
+use File::Spec;
+BEGIN { plan tests => 3;
+        if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} };
 
 use lib 'maintain/lib/Unicode-EastAsianWidth/lib/';
 use lib 'maintain/lib/libintl-perl/lib/';

Index: t/xml_tests.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/xml_tests.t,v
retrieving revision 1.16
retrieving revision 1.17
diff -u -b -r1.16 -r1.17
--- t/xml_tests.t       9 Sep 2012 11:10:21 -0000       1.16
+++ t/xml_tests.t       10 Feb 2013 16:45:10 -0000      1.17
@@ -1,5 +1,8 @@
 use strict;
 
+use File::Spec;
+BEGIN { if (defined($ENV{'top_srcdir'})) {unshift @INC, 
File::Spec->catdir($ENV{'top_srcdir'}, 'tp');} }
+
 require 't/test_utils.pl';
 
 my @test_cases = (



reply via email to

[Prev in Thread] Current Thread [Next in Thread]