[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[7599] automatic_nodes.t use ModulePath
From: |
gavinsmith0123 |
Subject: |
[7599] automatic_nodes.t use ModulePath |
Date: |
Sun, 1 Jan 2017 15:18:42 +0000 (UTC) |
Revision: 7599
http://svn.sv.gnu.org/viewvc/?view=rev&root=texinfo&revision=7599
Author: gavin
Date: 2017-01-01 15:18:42 +0000 (Sun, 01 Jan 2017)
Log Message:
-----------
automatic_nodes.t use ModulePath
Modified Paths:
--------------
trunk/ChangeLog
trunk/tp/t/automatic_nodes.t
Modified: trunk/ChangeLog
===================================================================
--- trunk/ChangeLog 2017-01-01 12:33:24 UTC (rev 7598)
+++ trunk/ChangeLog 2017-01-01 15:18:42 UTC (rev 7599)
@@ -1,5 +1,9 @@
2017-01-01 Gavin Smith <address@hidden>
+ * tp/t/automatic_nodes.t: Use the "Texinfo::ModulePath" module.
+
+2017-01-01 Gavin Smith <address@hidden>
+
* tp/Texinfo/MiscXS/MiscXS.xs,
* tp/Texinfo/MiscXS/miscxs.c (xs_process_text): New function.
* tp/Texinfo/Convert/Plaintext.pm: Add a 'UNITCHECK' section to
Modified: trunk/tp/t/automatic_nodes.t
===================================================================
--- trunk/tp/t/automatic_nodes.t 2017-01-01 12:33:24 UTC (rev 7598)
+++ trunk/tp/t/automatic_nodes.t 2017-01-01 15:18:42 UTC (rev 7599)
@@ -1,19 +1,14 @@
use strict;
use Test::More;
-use File::Spec;
-BEGIN { plan tests => 24;
- if (defined($ENV{'top_srcdir'})) {
- unshift @INC, File::Spec->catdir($ENV{'top_srcdir'}, 'tp');
- my $lib_dir = File::Spec->catdir($ENV{'top_srcdir'}, 'tp',
'maintain');
- unshift @INC, (File::Spec->catdir($lib_dir, 'lib', 'libintl-perl',
'lib'),
- File::Spec->catdir($lib_dir, 'lib',
'Unicode-EastAsianWidth', 'lib'),
- File::Spec->catdir($lib_dir, 'lib', 'Text-Unidecode',
'lib'));
- }};
-use lib 'maintain/lib/Unicode-EastAsianWidth/lib/';
-use lib 'maintain/lib/libintl-perl/lib/';
-use lib 'maintain/lib/Text-Unidecode/lib/';
+BEGIN {
+ require Texinfo::ModulePath;
+ Texinfo::ModulePath::init(undef, undef, 'updirs' => 2);
+}
+
+BEGIN { plan tests => 24; }
+
use Texinfo::Parser qw(parse_texi_text);
use Texinfo::Transformations;
use Texinfo::Convert::Texinfo;
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [7599] automatic_nodes.t use ModulePath,
gavinsmith0123 <=