forked from pool/perl-Parse-RecDescent
OBS-URL: https://build.opensuse.org/package/show/devel:languages:perl/perl-Parse-RecDescent?expand=0&rev=36
This commit is contained in:
parent
0ec2b95a4a
commit
6143db8233
@ -1,12 +0,0 @@
|
||||
Index: Parse-RecDescent-1.967006/lib/Parse/RecDescent.pm
|
||||
===================================================================
|
||||
--- Parse-RecDescent-1.967006.orig/lib/Parse/RecDescent.pm 2012-02-11 05:49:54.000000000 +0100
|
||||
+++ Parse-RecDescent-1.967006/lib/Parse/RecDescent.pm 2012-02-13 15:59:09.350410266 +0100
|
||||
@@ -3013,6 +3013,7 @@
|
||||
sub _code($)
|
||||
{
|
||||
my $self = shift;
|
||||
+ $skip = "" if(! defined $skip);
|
||||
my $initial_skip = defined($self->{skip}) ? $self->{skip} : $skip;
|
||||
|
||||
my $code = qq{
|
Loading…
Reference in New Issue
Block a user