svn commit: samba r22338 - in branches/SAMBA_4_0: . source/script/tests

[jelmer at samba.org]

Author: jelmer
Date: 2007-04-18 14:18:33 +0000 (Wed, 18 Apr 2007)
New Revision: 22338

WebSVN: http://websvn.samba.org/cgi-bin/viewcvs.cgi?view=rev&root=samba&rev=22338

Log:
Allow regexes in known-failures file
Modified:
   branches/SAMBA_4_0/
   branches/SAMBA_4_0/source/script/tests/selftest.pl


Changeset:

Property changes on: branches/SAMBA_4_0
___________________________________________________________________
Name: bzr:merge
...skipped...

Modified: branches/SAMBA_4_0/source/script/tests/selftest.pl
===================================================================
--- branches/SAMBA_4_0/source/script/tests/selftest.pl	2007-04-18 14:02:26 UTC (rev 22337)
+++ branches/SAMBA_4_0/source/script/tests/selftest.pl	2007-04-18 14:18:33 UTC (rev 22338)
@@ -161,7 +161,9 @@
 {
 	my $fullname = shift;
 
-	return 1 if (grep(/^$fullname$/, @expected_failures));
+	foreach (@expected_failures) {
+		return 1 if ($fullname =~ /$_/);
+	}
 
 	return 0;
 }
@@ -317,6 +319,7 @@
 					$statistics->{TESTS_EXPECTED_FAIL}++;
 					$expected_ret = 0;
 				} else {
+					print "n:$name/$2l\n";
 					$statistics->{TESTS_UNEXPECTED_FAIL}++;
 				}
 			} elsif ($1 eq "skip") {