Attachment #104889 for bug #145148

View | Details | Raw Unified | Return to bug 145148
Collapse All | Expand All

Lines 6-12 Link Here

(-)devel/p5-ParseLex/Makefile (-4 / +1 lines)
6	#	6	#
7		7
8	PORTNAME= ParseLex	8	PORTNAME= ParseLex
9	PORTVERSION= 2.15	9	PORTVERSION= 2.18
10	CATEGORIES= devel perl5	10	CATEGORIES= devel perl5
11	MASTER_SITES= CPAN/Parse	11	MASTER_SITES= CPAN/Parse
12	PKGNAMEPREFIX= p5-	12	PKGNAMEPREFIX= p5-
Lines 19-25 Link Here
19	MAN3= Parse::Lex.3 Parse::Token.3 Parse::YYLex.3 Parse::LexEvent.3 \	19	MAN3= Parse::Lex.3 Parse::Token.3 Parse::YYLex.3 Parse::LexEvent.3 \
20	Parse::CLex.3 Parse::Template.3	20	Parse::CLex.3 Parse::Template.3
21		21
22	post-patch:
23	@${RM} ${WRKSRC}/lib/Parse/*.orig
24
25	.include <bsd.port.mk>	22	.include <bsd.port.mk>

Lines 1-3 Link Here

(-)devel/p5-ParseLex/distinfo (-3 / +3 lines)
1	MD5 (ParseLex-2.15.tar.gz) = aeb0bb36454485d28214aad0907d5c92	1	MD5 (ParseLex-2.18.tar.gz) = beb91a385c80a03ab1138e3cc7507a65
2	SHA256 (ParseLex-2.15.tar.gz) = a6201f0522b36733ec237e37ff8328f306b23081ea8473de7456d18831d3e997	2	SHA256 (ParseLex-2.18.tar.gz) = 91af4c5b07c66d1656093b355a0c8f4f4594032d90cb024390e58e9e9e033be2
3	SIZE (ParseLex-2.15.tar.gz) = 51560	3	SIZE (ParseLex-2.18.tar.gz) = 54384




--- 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);

Return to bug 145148

Lines 1-17 Link Here

(-)devel/p5-ParseLex/files/patch-lib-Parse-Template.pm (-17 lines)
1	--- lib/Parse/Template.pm.orig Thu Sep 23 12:16:28 1999
2	+++ lib/Parse/Template.pm Fri Aug 20 16:03:23 2004
3	@@ -1,4 +1,4 @@
4	-use strict
5	+use strict;
6	require 5.004;
7	package Parse::Template;
8	$Parse::Template::VERSION = '0.32';
9	@@ -132,7 +132,7 @@
10	}
11	# evaluated expressions are not always available in (caller(1))[6];
12	if (defined($1) and $1 ne '') {
13	- $expr = $1; # what is the template expression?
14	+ my $expr = $1; # what is the template expression?
15	{ package DB; # what is the part name?
16	@DB::caller = caller(2); # why is this needed? /ee?
17	@DB::caller = caller(1);