develooper Front page | perl.cvs.parrot | Postings from December 2008

[svn:parrot] r33829 - trunk/languages/perl6

From:
moritz
Date:
December 12, 2008 02:28
Subject:
[svn:parrot] r33829 - trunk/languages/perl6
Message ID:
20081212102846.931E6CB9AF@x12.develooper.com
Author: moritz
Date: Fri Dec 12 02:28:45 2008
New Revision: 33829

Modified:
   trunk/languages/perl6/Test.pm

Log:
[rakudo] Test.pm fix calls to proclaim() in is_deeply, bacek++
Patch courtesy by Vasily Chekalkin. Closes RT #61210.


Modified: trunk/languages/perl6/Test.pm
==============================================================================
--- trunk/languages/perl6/Test.pm	(original)
+++ trunk/languages/perl6/Test.pm	Fri Dec 12 02:28:45 2008
@@ -147,12 +147,12 @@
 
 multi sub is_deeply($this, $that, $reason) {
     my $val = _is_deeply( $this, $that );
-    proclaim( $val, $reason, $this.perl, $that.perl );
+    proclaim($val, $reason);
 }
 
 multi sub is_deeply($this, $that) {
     my $val = _is_deeply( $this, $that );
-    proclaim( $val, '', $this.perl, $that.perl );
+    proclaim($val, '');
 }
 
 sub _is_deeply( $this, $that) {



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About