From 791f736950dd63ff239e7fd743f4675ccb9c865f Mon Sep 17 00:00:00 2001 From: Angelo Naselli Date: Thu, 4 Sep 2014 23:05:48 +0200 Subject: Cleaned constructor code --- lib/AdminPanel/ConfigReader.pm | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) (limited to 'lib/AdminPanel/ConfigReader.pm') diff --git a/lib/AdminPanel/ConfigReader.pm b/lib/AdminPanel/ConfigReader.pm index 718a381..1c905c9 100644 --- a/lib/AdminPanel/ConfigReader.pm +++ b/lib/AdminPanel/ConfigReader.pm @@ -30,12 +30,12 @@ sub new { my ($class, $fileName) = @_; my $self = { - my $data = 0, - my $catLen = 0, - my $currCat = 0, - my $modLen = 0, - my $currMod = 0, - my $placeHolder = 0 + data => 0, + catLen => 0, + currCat => 0, + modLen => 0, + currMod => 0, + placeHolder => 0, }; bless $self, 'AdminPanel::ConfigReader'; -- cgit v1.2.1