-Allow skip in upper letters.

-Add 'info' result to --SKIPIF-- -> see following dba commits
This commit is contained in:
Marcus Boerger 2002-11-15 15:57:00 +00:00
parent 483502fe10
commit 0f66b352e9

View File

@ -534,7 +534,7 @@ TEST $file
save_text($tmp_skipif, $section_text['SKIPIF']);
$output = `$php $info_params $tmp_skipif`;
@unlink($tmp_skipif);
if (ereg("^skip", trim($output))){
if (ereg("^skip", strtolower(trim($output)))) {
echo "SKIP $tested";
$reason = (ereg("^skip[[:space:]]*(.+)\$", trim($output))) ? ereg_replace("^skip[[:space:]]*(.+)\$", "\\1", trim($output)) : FALSE;
if ($reason) {
@ -544,6 +544,12 @@ TEST $file
}
return 'SKIPPED';
}
if (ereg("^info", strtolower(trim($output)))) {
$reason = (ereg("^info[[:space:]]*(.+)\$", trim($output))) ? ereg_replace("^info[[:space:]]*(.+)\$", "\\1", trim($output)) : FALSE;
if ($reason) {
$tested .= " (info: $reason)";
}
}
}
}