Re: [PATCH] Tests for File::Compare

Message-Id: <200105311748.f4VHmCt18269@chaos.wustl.edu>

Unnecessary "quotation marks".

p4raw-id: //depot/perl@10366

diff --git a/t/lib/filecomp.t b/t/lib/filecomp.t
index 9e0751b..167a46a 100644 (file)
--- a/t/lib/filecomp.t
+++ b/t/lib/filecomp.t
@@ -88,8 +88,8 @@ eval {
     close($fh);
   }
   seek($tfh,0,0);
-  $donetests[0] = compare($tfh,'README');
-  $donetests[1] = compare("$filename",'README');
+  $donetests[0] = compare($tfh, 'README');
+  $donetests[1] = compare($filename, 'README');
   unlink0($tfh,$filename);
 };
 print "# problems when testing with a tempory file\n" if $@;