Added check for environment variable 'nonproductioneserver' before running

these tests.
This commit is contained in:
tonnesen 2002-10-29 20:05:44 +00:00
parent 9051471aef
commit 389747e90e
2 changed files with 16 additions and 2 deletions

View File

@ -1,4 +1,10 @@
BEGIN { $| = 1; print "1..28\n";
BEGIN {
unless ($ENV{'nonproductionserver'}) {
print "1..0 # Skipped: environment variable 'nonproductionserver' not set\n";
exit;
}
$| = 1; print "1..28\n";
$::intranetdir=`grep intranetdir /etc/koha.conf`;
chomp $::intranetdir;
$::intranetdir=~s/\s*intranetdir\s*=\s*//i;
@ -6,6 +12,8 @@ BEGIN { $| = 1; print "1..28\n";
END {print "not ok 1 test script load\n" unless $loaded;}
use lib $::intranetdir."/modules";
$ENV{PERLLIB}=$::intranetdir."/modules";

View File

@ -1,4 +1,10 @@
BEGIN { $| = 1; print "1..10\n";
BEGIN {
unless ($ENV{'nonproductionserver'}) {
print "1..0 # Skipped: environment variable 'nonproductionserver' not set\n";
exit;
}
$| = 1; print "1..10\n";
$::intranetdir=`grep intranetdir /etc/koha.conf`;
chomp $::intranetdir;
$::intranetdir=~s/\s*intranetdir\s*=\s*//i;