[Box Backup-dev] COMMIT r645 - box/chris/general/test/bbackupd/testfiles

[boxbackup-dev@fluffy.co.uk]

Author: chris
Date: 2006-07-19 00:46:38 +0000 (Wed, 19 Jul 2006)
New Revision: 645

Modified:
   box/chris/general/test/bbackupd/testfiles/extcheck2.pl
Log:
* extcheck2.pl
- More detailed debugging messages, useful when tests fail


Modified: box/chris/general/test/bbackupd/testfiles/extcheck2.pl
===================================================================
--- box/chris/general/test/bbackupd/testfiles/extcheck2.pl	2006-07-19 00:46:13 UTC (rev 644)
+++ box/chris/general/test/bbackupd/testfiles/extcheck2.pl	2006-07-19 00:46:38 UTC (rev 645)
@@ -14,13 +14,23 @@
 	next unless m/\S/;
 	if(m/continousupdate/)
 	{
-		$ret = 2 unless m/contents/ || m/attributes/;
+		unless (m/contents/ or m/attributes/)
+		{
+			print "FAIL: continuousupdate line does not match\n";
+			$ret = 2;
+		}
 	}
 	else
 	{
-		$ret = 2 unless m/\AWARNING/ || m/\ADifferences/ || /might be reason/ || /probably due to file mod/;
+		unless (/\AWARNING/ or /\ADifferences/ or /might be reason/ 
+			or /probably due to file mod/)
+		{
+			print "FAIL: summary line does not match\n";
+			$ret = 2;
+		}
 	}
-	print;
+
+	print "READ: $_";
 }
 
 close IN;