From e34793c35e7356fc73719b69e01ffba876af8615 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Wed, 21 Jun 2006 14:56:54 +0000 Subject: handle $o->pop --- Makefile | 2 +- perl_checker.spec | 5 ++++- perl_checker.src/parser.mly | 1 + 3 files changed, 6 insertions(+), 2 deletions(-) diff --git a/Makefile b/Makefile index 922bd4f..8af99de 100644 --- a/Makefile +++ b/Makefile @@ -5,7 +5,7 @@ BINDIR = $(PREFIX)/bin VENDORLIB = $(shell eval "`perl -V:installvendorlib`"; echo $$installvendorlib) INSTALLVENDORLIB = $(DESTDIR)$(VENDORLIB) PERL_CHECKER_TARGET = native-code -PERL_CHECKER_VERSION = 1.1.25 +PERL_CHECKER_VERSION = 1.1.26 FILES-perl_checker = AUTHORS COPYING README.emacs Makefile misc perl_checker.spec perl_checker.src perl_checker_fake_packages diff --git a/perl_checker.spec b/perl_checker.spec index 9087cb9..8aa322c 100644 --- a/perl_checker.spec +++ b/perl_checker.spec @@ -1,6 +1,6 @@ # MODIFY IN THE CVS: cvs.mandrakesoft.com:/cooker soft/perl-MDK-Common/ -%define version 1.1.25 +%define version 1.1.26 %define release %mkrel 1 %ifarch x86_64 @@ -55,6 +55,9 @@ rm -rf $RPM_BUILD_ROOT # MODIFY IN THE CVS: cvs.mandrakesoft.com:/cooker soft/perl-MDK-Common %changelog +* Wed Jun 21 2006 Pixel 1.1.26-1mdv2007.0 +- handle $o->pop + * Thu Jun 15 2006 Pixel 1.1.25-1mdv2007.0 - handle "use base ..." - add a fake packdrake.pm diff --git a/perl_checker.src/parser.mly b/perl_checker.src/parser.mly index e44bcf1..a9bf396 100644 --- a/perl_checker.src/parser.mly +++ b/perl_checker.src/parser.mly @@ -473,6 +473,7 @@ word_or_scalar: | word_paren {$1} | MULT_L_STR { new_1esp (Ident(None, "x", get_pos $1)) $1 } | FOR { new_1esp (Ident(None, $1.any, get_pos $1)) $1 } +| ONE_SCALAR_PARA { new_1esp (Ident(None, $1.any, get_pos $1)) $1 } bareword: | NEW { new_1esp (Ident(None, "new", get_pos $1)) $1 } -- cgit v1.2.1