From: Father Chrysostomos <sprout@cpan.org>
Date: Mon, 30 Apr 2012 04:16:51 +0000 (-0700)
Subject: coreamp.t: rename badly-named tests
X-Git-Tag: upstream/5.20.0~6810
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=1eaae977b54b7609cf8d8f06cd87cb78a96cd6ca;p=platform%2Fupstream%2Fperl.git

coreamp.t: rename badly-named tests
---

diff --git a/t/op/coreamp.t b/t/op/coreamp.t
index 78ced66..062ee5c 100644
--- a/t/op/coreamp.t
+++ b/t/op/coreamp.t
@@ -637,12 +637,12 @@ $tests += 2;
 my $oncer = sub { "a" =~ m?a? };
 &$oncer;
 &myreset;
-ok &$oncer, '&reset with one arg';
+ok &$oncer, '&reset with no args';
 package resettest {
   $b = "c";
   $banana = "cream";
   &::myreset('b');
-  ::lis [$b,$banana],[(undef)x2], '2-arg &reset';
+  ::lis [$b,$banana],[(undef)x2], '1-arg &reset';
 }
 
 test_proto 'reverse';