[Templates] [PATCH] Template/Parser.pm

[Eric Cholet]

fixes "Use of uninitialized value" when using a subclassed parser.

--- Parser.pm.old       Wed Jun 13 18:31:26 2001
+++ Parser.pm   Wed Jun 13 18:31:42 2001
@@ -101,7 +101,7 @@

 sub new {
     my $class  = shift;
-    my $config = UNIVERSAL::isa($_[0], 'HASH') ? shift(@_) : { @_ };
+    my $config = $_[0] && UNIVERSAL::isa($_[0], 'HASH') ? shift(@_) : { @_ 
};
     my ($tagstyle, $start, $end, $defaults, $grammar, $hash, $key, $udef);

     my $self = bless {


--
Eric Cholet
B995 E519 1594 10D0 4271 1EA5 8DF3 8004