From bc7aa50d96c4f70e3f44bf41e4976424d8928564 Mon Sep 17 00:00:00 2001
From: einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>
Date: Sun, 16 Sep 2007 02:47:11 +0000
Subject: Adding constructor to LedgerSMB::Template::Elements

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1614 4979c152-3d1c-0410-bac9-87ea11338e46
---
 LedgerSMB/Template/Elements.pm | 23 +++++++++++++++++++++--
 1 file changed, 21 insertions(+), 2 deletions(-)

(limited to 'LedgerSMB/Template/Elements.pm')

diff --git a/LedgerSMB/Template/Elements.pm b/LedgerSMB/Template/Elements.pm
index e504c40c..53dfe373 100644
--- a/LedgerSMB/Template/Elements.pm
+++ b/LedgerSMB/Template/Elements.pm
@@ -11,6 +11,27 @@ templates
 
 =over
 
+=item LedgerSMB::Template::Elements->new()
+
+Returns a blessed hashref from this namespace.
+
+=back
+
+=cut
+
+package LedgerSMB::Template::Elements;
+use strict;
+
+
+sub new {
+    my ($class) = @_;
+    my $self = {};
+    bless $self, $class;
+    return $self;
+}
+
+=over
+
 =item $object->generate_hidden_elements([...]);
  
 Builds data structure for hidden form fields.  Values from the
@@ -26,8 +47,6 @@ A reference to this structure is returned as well.
 
 =cut
 
-package LedgerSMB::Template::Elements;
-use strict;
  
 sub generate_hidden_elements {
     my $self = shift;
-- 
cgit v1.2.3