This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
op/sub.t: fix ticket number in comment
authorDavid Mitchell <davem@iabyn.com>
Wed, 21 Oct 2015 11:28:35 +0000 (12:28 +0100)
committerDavid Mitchell <davem@iabyn.com>
Wed, 3 Feb 2016 09:18:31 +0000 (09:18 +0000)
Took me a while to track down that non-existent ticket!

t/op/sub.t

index df6df3e..7c3fc5c 100644 (file)
@@ -41,7 +41,7 @@ is(scalar(@test), 0, 'Didnt return anything');
     ok(eq_array(\@a, [34,35]), "yes without args");
 }
 
-# [perl #81944] return should always copy
+# [perl #91844] return should always copy
 {
     $foo{bar} = 7;
     for my $x ($foo{bar}) {