ports/www/p5-HTML-Template/files/patch-Template.pm
Jun Kuriyama 3048651c24 Upgrade to 2.5.
Pointed out by:	nork@cityfujisawa.ne.jp (Norikatsu Shigemura)
2002-02-19 13:36:15 +00:00

12 lines
461 B
Perl

--- Template.pm.orig Tue Feb 19 22:15:56 2002
+++ Template.pm Tue Feb 19 22:18:31 2002
@@ -863,7 +863,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);
# define accessor constants used to improve readability of array
# accesses into "objects". I used to use 'use constant' but that