This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
[RT #36079] Convert ` to '.
authorjkeenan <jkeenan@cpan.org>
Sun, 20 Nov 2011 00:18:10 +0000 (19:18 -0500)
committerFather Chrysostomos <sprout@cpan.org>
Wed, 23 Nov 2011 00:27:14 +0000 (16:27 -0800)
dist/ExtUtils-ParseXS/lib/ExtUtils/ParseXS/Utilities.pm

index e4a83c4..2a520d2 100644 (file)
@@ -667,7 +667,7 @@ sub analyze_preprocessor_statements {
     push(@{ $self->{XSStack} }, {type => 'if'});
   }
   else {
     push(@{ $self->{XSStack} }, {type => 'if'});
   }
   else {
-    $self->death("Error: `$statement' with no matching `if'")
+    $self->death("Error: '$statement' with no matching 'if'")
       if $self->{XSStack}->[-1]{type} ne 'if';
     if ($self->{XSStack}->[-1]{varname}) {
       push(@{ $self->{InitFileCode} }, "#endif\n");
       if $self->{XSStack}->[-1]{type} ne 'if';
     if ($self->{XSStack}->[-1]{varname}) {
       push(@{ $self->{InitFileCode} }, "#endif\n");