[5297] to have reproducible tests, do not use system or user directories

[Patrice Dumas]

Revision: 5297
          http://svn.sv.gnu.org/viewvc/?view=rev&root=texinfo&revision=5297
Author:   pertusus
Date:     2013-08-10 17:30:24 +0000 (Sat, 10 Aug 2013)
Log Message:
-----------
to have reproducible tests, do not use system or user directories 
if TEST is set in that case.

Modified Paths:
--------------
    trunk/tp/texi2any.pl

Modified: trunk/tp/texi2any.pl
===================================================================
--- trunk/tp/texi2any.pl        2013-08-10 16:24:15 UTC (rev 5296)
+++ trunk/tp/texi2any.pl        2013-08-10 17:30:24 UTC (rev 5297)
@@ -1138,7 +1138,14 @@
   my $input_file_base = $input_file_name;
   $input_file_base =~ s/\.te?x(i|info)?$//;
 
-  my @htmlxref_dirs = @language_config_dirs;
+  my @htmlxref_dirs;
+  if (get_conf('TEST')) {
+    # to have reproducible tests, do not use system or user
+    # directories if TEST is set.
+    @htmlxref_dirs = File::Spec->catdir($curdir, '.texinfo');
+  } else {
+    @htmlxref_dirs = @language_config_dirs;
+  }
   if ($input_directory ne '.' and $input_directory ne '') {
     unshift @htmlxref_dirs, $input_directory;
   }