[Box Backup-dev] COMMIT r601 - box/chris/general/test/backupstorefix/testfiles

[boxbackup-dev@fluffy.co.uk]

Author: chris
Date: 2006-05-30 19:20:18 +0000 (Tue, 30 May 2006)
New Revision: 601

Modified:
   box/chris/general/test/backupstorefix/testfiles/testbackupstorefix.pl
Log:
* testbackupstorefix.pl
- Remove CR characters from bbackupquery output to fix display issues


Modified: box/chris/general/test/backupstorefix/testfiles/testbackupstorefix.pl
===================================================================
--- box/chris/general/test/backupstorefix/testfiles/testbackupstorefix.pl	2006-05-28 11:38:01 UTC (rev 600)
+++ box/chris/general/test/backupstorefix/testfiles/testbackupstorefix.pl	2006-05-30 19:20:18 UTC (rev 601)
@@ -54,7 +54,7 @@
 	open INITIAL,'testfiles/initial-listing.txt' or die "Can't open original listing";
 	while(<INITIAL>)
 	{
-		chomp;
+		chomp; s/\r//;
 		$expected{$_} = 1;
 		m/\A(.+?) .+? (.+)\Z/;
 		$filenames{$2} = $_;
@@ -99,7 +99,7 @@
 	while(<LISTING>)
 	{
 		print LISTING_COPY;
-		chomp;
+		chomp; s/\r//;
 		s/\[FILENAME NOT ENCRYPTED\]//;
 		if(exists $expected{$_})
 		{