- apply upstream patch https://rt.cpan.org/Public/Bug/Display.html?id=54457
which should fix problems with rebuilds of other modulesepel9
parent
68834ddeb7
commit
9ce386d29b
@ -0,0 +1,19 @@
|
||||
diff -up Parse-RecDescent-1.963/lib/Parse/RecDescent.pm.old Parse-RecDescent-1.963/lib/Parse/RecDescent.pm
|
||||
--- Parse-RecDescent-1.963/lib/Parse/RecDescent.pm.old 2010-01-20 23:13:19.000000000 +0100
|
||||
+++ Parse-RecDescent-1.963/lib/Parse/RecDescent.pm 2010-02-16 11:46:33.475648895 +0100
|
||||
@@ -2363,11 +2363,12 @@ sub _generate($$$;$$)
|
||||
}
|
||||
elsif ($grammar =~ m/$LITERAL/gco)
|
||||
{
|
||||
- ($code = $1) =~ s/\\\\/\\/g;
|
||||
- _parse("a literal terminal", $aftererror,$line,$1);
|
||||
+ my $literal = $1;
|
||||
+ ($code = $literal) =~ s/\\\\/\\/g;
|
||||
+ _parse("a literal terminal", $aftererror,$line,$literal);
|
||||
$item = new Parse::RecDescent::Literal($code,$lookahead,$line);
|
||||
$prod and $prod->additem($item)
|
||||
- or _no_rule("literal terminal",$line,"'$1'");
|
||||
+ or _no_rule("literal terminal",$line,"'$literal'");
|
||||
}
|
||||
elsif ($grammar =~ m/$INTERPLIT/gco)
|
||||
{
|
Loading…
Reference in new issue