3127a08042
checked in (request 33266) OBS-URL: https://build.opensuse.org/request/show/33266 OBS-URL: https://build.opensuse.org/package/show/devel:languages:perl/perl-Parse-RecDescent?expand=0&rev=11
13 lines
344 B
Diff
13 lines
344 B
Diff
Index: lib/Parse/RecDescent.pm
|
|
===================================================================
|
|
--- lib/Parse/RecDescent.pm.orig
|
|
+++ lib/Parse/RecDescent.pm
|
|
@@ -2803,6 +2803,7 @@ sub _check_grammar ($)
|
|
sub _code($)
|
|
{
|
|
my $self = shift;
|
|
+ $skip = "" if(! defined $skip);
|
|
my $code = qq{
|
|
package $self->{namespace};
|
|
use strict;
|