This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Non-invasive mojibake fixes
[perl5.git] / t / op / closure.t
index 42453f4..9d3de7f 100644 (file)
@@ -733,7 +733,7 @@ is $closure_test::s2->()(), '10 cubes',
        };
     };
     $s1->();
-    undef &$s1; # frees $s2s prototype, causing the $s3 proto to have its
+    undef &$s1; # frees $s2's prototype, causing the $s3 proto to have its
                 # CvOUTSIDE point to $s1
     ::is $s2->()(), 3, 'cloning closure proto whose CvOUTSIDE has changed';
 }