Indicate see[also] refs in label and outliner

[features.git] / lib / scripts / lyx_batch.pl.in

diff --git a/lib/scripts/lyx_batch.pl.in b/lib/scripts/lyx_batch.pl.in
index 482924897940241217603eeebe95520daa902525..25626ea3956158b265c6beebbef428902fc7c2fe 100644 (file)
--- a/lib/scripts/lyx_batch.pl.in
+++ b/lib/scripts/lyx_batch.pl.in
@@ -7,7 +7,7 @@ use strict;
 use warnings;
 use File::Copy;
 use File::Compare;
-use File::Slurp qw(read_dir);
+use File::Slurp qw(read_dir read_file);
 
 sub checkPrecondition();
 sub system1(@);
@@ -127,6 +127,12 @@ exit(0);
 sub run_tests {
   my $test_dir = shift;
 
+  if (-e "$test_dir/skip.test") {
+    my $skip_msg = read_file("$test_dir/skip.test");
+    print "TEST SKIPPED.\n$skip_msg\n";
+    return;
+  }
+
   my @expected = &addFiles($test_dir, $Tests{$test}->{check},1);
 
   my @created = &addFiles($workdir, $Tests{$test}->{check}, 0);