This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
switchd.t: correct bug number
[perl5.git] / t / run / switchd.t
index 0a4553a..f160fd5 100644 (file)
@@ -172,5 +172,5 @@ like(
   ),
   qr "use Devel::switchd_empty;(?:BEGIN|\r?\nprint)",
                          # miniperl tacks a BEGIN block on to the same line
- 'Copy on write does not mangle ${"_<-e"}[0] [perl #48332]',
+ 'Copy on write does not mangle ${"_<-e"}[0] [perl #118627]',
 );