diff options
author | Jun Kuriyama <kuriyama@FreeBSD.org> | 2004-06-25 13:47:03 +0000 |
---|---|---|
committer | Jun Kuriyama <kuriyama@FreeBSD.org> | 2004-06-25 13:47:03 +0000 |
commit | 3591c5e65069620afb36b322f0f4f8350cac05f9 (patch) | |
tree | 6e96401f86adcd7c6f4ff57bdfc4038bb1ba14e9 /www/p5-HTML-Template | |
parent | 44285aa4bae2214b2385f176b3ccf477e8510ee7 (diff) | |
download | ports-3591c5e65069620afb36b322f0f4f8350cac05f9.tar.gz ports-3591c5e65069620afb36b322f0f4f8350cac05f9.zip |
Notes
Diffstat (limited to 'www/p5-HTML-Template')
-rw-r--r-- | www/p5-HTML-Template/Makefile | 2 | ||||
-rw-r--r-- | www/p5-HTML-Template/distinfo | 4 | ||||
-rw-r--r-- | www/p5-HTML-Template/files/patch-Template.pm | 21 |
3 files changed, 7 insertions, 20 deletions
diff --git a/www/p5-HTML-Template/Makefile b/www/p5-HTML-Template/Makefile index 1e47309a10ae..760fa06ec94a 100644 --- a/www/p5-HTML-Template/Makefile +++ b/www/p5-HTML-Template/Makefile @@ -6,7 +6,7 @@ # PORTNAME= HTML-Template -PORTVERSION= 2.6 +PORTVERSION= 2.7 CATEGORIES= www perl5 MASTER_SITES= ${MASTER_SITE_PERL_CPAN} MASTER_SITE_SUBDIR= HTML diff --git a/www/p5-HTML-Template/distinfo b/www/p5-HTML-Template/distinfo index 198e22af7295..0f91dd91d44a 100644 --- a/www/p5-HTML-Template/distinfo +++ b/www/p5-HTML-Template/distinfo @@ -1,2 +1,2 @@ -MD5 (HTML-Template-2.6.tar.gz) = dbd1c0c23fe323123deb9212c82a6f2d -SIZE (HTML-Template-2.6.tar.gz) = 60820 +MD5 (HTML-Template-2.7.tar.gz) = 376f572659b4c0c40a9dd68823a0dd6b +SIZE (HTML-Template-2.7.tar.gz) = 62478 diff --git a/www/p5-HTML-Template/files/patch-Template.pm b/www/p5-HTML-Template/files/patch-Template.pm index ba404e4db2af..6c4d3879d1f3 100644 --- a/www/p5-HTML-Template/files/patch-Template.pm +++ b/www/p5-HTML-Template/files/patch-Template.pm @@ -1,25 +1,12 @@ ---- Template.pm.orig Sat Feb 2 08:01:37 2002 -+++ Template.pm Thu May 30 12:33:34 2002 -@@ -863,7 +863,9 @@ +--- Template.pm.orig Fri Jun 18 21:42:06 2004 ++++ Template.pm Fri Jun 25 13:33:50 2004 +@@ -890,7 +890,9 @@ use strict; # and no funny business, either. use Carp; # generate better errors with more context +BEGIN { unshift(@INC, "%%PERL_INC%%"); } use File::Spec; # generate paths that work on all platforms +shift(@INC); + use Digest::MD5 qw(md5_hex); # generate cache keys # define accessor constants used to improve readability of array - # accesses into "objects". I used to use 'use constant' but that -@@ -2011,10 +2013,10 @@ - push(@ifstack, $cond); - - } elsif ($which eq '/TMPL_IF' or $which eq '/TMPL_UNLESS') { -- $options->{debug} and print STDERR "### HTML::Template Debug ###$fname : line $fcounter : $which end\n"; -+ $options->{debug} and print STDERR "### HTML::Template Debug ### $fname : line $fcounter : $which end\n"; - - my $cond = pop(@ifstack); -- die "HTML::Template->new() : found </${which}> with no matching <TMPL_IF> at $fname : line $fcounter." unless defined $cond; -+ die "HTML::Template->new() : found <${which}> with no matching <TMPL_IF> at $fname : line $fcounter." unless defined $cond; - if ($which eq '/TMPL_IF') { - die "HTML::Template->new() : found </TMPL_IF> incorrectly terminating a <TMPL_UNLESS> (use </TMPL_UNLESS>) at $fname : line $fcounter.\n" - if ($cond->[HTML::Template::COND::WHICH] == HTML::Template::COND::WHICH_UNLESS); |