This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Data::Dumper/t/dumper.t: Fix comments
authorKarl Williamson <khw@cpan.org>
Thu, 5 Mar 2015 17:34:08 +0000 (10:34 -0700)
committerKarl Williamson <khw@cpan.org>
Thu, 5 Mar 2015 17:43:21 +0000 (10:43 -0700)
dist/Data-Dumper/t/dumper.t

index f452ad2..b897f8e 100644 (file)
@@ -1384,7 +1384,7 @@ EOT
     if ($Is_ebcdic) {
        $b = "Bad. XS didn't escape dollar sign";
 ############# 322
-       $WANT = <<"EOT"; # Careful. This is '' string written inside '' here doc
+       $WANT = <<"EOT"; # Careful. This is '' string written inside "" here doc
 #\$VAR1 = '\$b\"\@\\\\\xB1';
 EOT
         $a = "\$b\"\@\\\xB1\x{100}";
@@ -1399,7 +1399,7 @@ EOT
     } else {
        $b = "Bad. XS didn't escape dollar sign";
 ############# 322
-       $WANT = <<"EOT"; # Careful. This is '' string written inside '' here doc
+       $WANT = <<"EOT"; # Careful. This is '' string written inside "" here doc
 #\$VAR1 = '\$b\"\@\\\\\xA3';
 EOT