X-Git-Url: http://wagner.pp.ru/gitweb/?a=blobdiff_plain;ds=sidebyside;f=test%2Frun_tests;h=92d28922f0f1801cd2352f33bdf2430483b5a47f;hb=f2bbf8ca2300e37cd1d1f10b7153e61419b2ccab;hp=b9912cf3c5d68535c6b6a8ab574ae8b4239bb20e;hpb=87c8e5c1e0c9540f0b6c06ef6f74263a2b90f0dc;p=openssl-gost%2Fengine.git

diff --git a/test/run_tests b/test/run_tests
index b9912cf..92d2892 100644
--- a/test/run_tests
+++ b/test/run_tests
@@ -1,6 +1,8 @@
 #!/usr/bin/perl
 use TAP::Harness;
 
+exit 0 if (defined $ENV{'SKIP_PERL_TEST'});
+
 if(defined $ENV{'OPENSSL_ROOT_DIR'}) {
     my $openssl_libdir;
     my $openssl_bindir;
@@ -44,5 +46,7 @@ if(defined $ENV{'OPENSSL_ROOT_DIR'}) {
     $ENV{'PATH'} =
         join(':', $openssl_bindir, split(/:/, $ENV{'PATH'}));
 }
-my $harness = TAP::Harness->new();
+my $harness = TAP::Harness->new({
+    verbosity => (($ENV{CTEST_INTERACTIVE_DEBUG_MODE} // 0) != 0)
+});
 exit ($harness->runtests(glob("*.t"))->all_passed() ? 0 : 1);