[Templates-svn] r1079 - trunk/lib/Template

[svn@template-toolkit.org]

Author: abw
Date: 2007-05-23 07:48:25 +0100 (Wed, 23 May 2007)
New Revision: 1079

Modified:
   trunk/lib/Template/Base.pm
Log:
Fixed minor (map) bug in Template::Base constructor

Modified: trunk/lib/Template/Base.pm
===================================================================
--- trunk/lib/Template/Base.pm	2007-05-14 19:20:05 UTC (rev 1078)
+++ trunk/lib/Template/Base.pm	2007-05-23 06:48:25 UTC (rev 1079)
@@ -56,7 +56,7 @@
     $cfg  = defined $_[0] && UNIVERSAL::isa($_[0], 'HASH') ? shift : { @_ };
 
     my $self = bless {
-        map { ($_ => shift @args) } @$argnames,
+        (map { ($_ => shift @args) } @$argnames),
         _ERROR  => '',
         DEBUG   => 0,
     }, $class;