From 57a3e704b38590181a7c921e6fe39110c60ee9ab Mon Sep 17 00:00:00 2001 From: Sergey Matveychuk Date: Sat, 21 Aug 2004 10:59:35 +0000 Subject: The Parse::Lex.pm module for perl5 is an object-oriented generator of lexical analyzers. PR: ports/62936 Submitted by: Jim Pirzyk --- devel/p5-ParseLex/files/patch-lib-Parse-Template.pm | 17 +++++++++++++++++ 1 file changed, 17 insertions(+) create mode 100644 devel/p5-ParseLex/files/patch-lib-Parse-Template.pm (limited to 'devel/p5-ParseLex/files/patch-lib-Parse-Template.pm') diff --git a/devel/p5-ParseLex/files/patch-lib-Parse-Template.pm b/devel/p5-ParseLex/files/patch-lib-Parse-Template.pm new file mode 100644 index 000000000000..4fa68fea4bc1 --- /dev/null +++ b/devel/p5-ParseLex/files/patch-lib-Parse-Template.pm @@ -0,0 +1,17 @@ +--- lib/Parse/Template.pm.orig Thu Sep 23 12:16:28 1999 ++++ lib/Parse/Template.pm Fri Aug 20 16:03:23 2004 +@@ -1,4 +1,4 @@ +-use strict ++use strict; + require 5.004; + package Parse::Template; + $Parse::Template::VERSION = '0.32'; +@@ -132,7 +132,7 @@ + } + # evaluated expressions are not always available in (caller(1))[6]; + if (defined($1) and $1 ne '') { +- $expr = $1; # what is the template expression? ++ my $expr = $1; # what is the template expression? + { package DB; # what is the part name? + @DB::caller = caller(2); # why is this needed? /ee? + @DB::caller = caller(1); -- cgit v1.2.3