From d3374e77c3df1f928fe90c4c3803938f08a250b2 Mon Sep 17 00:00:00 2001
From: Tim Retout <tim.retout@smoothwall.net>
Date: Wed, 14 Mar 2012 22:17:27 +0000
Subject: Turn on strictures and warnings in installer::helppack.

---
 solenv/bin/modules/installer/helppack.pm | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/solenv/bin/modules/installer/helppack.pm b/solenv/bin/modules/installer/helppack.pm
index 977b0bad867c..a6a9627c64f6 100644
--- a/solenv/bin/modules/installer/helppack.pm
+++ b/solenv/bin/modules/installer/helppack.pm
@@ -27,6 +27,9 @@
 
 package installer::helppack;
 
+use strict;
+use warnings;
+
 use installer::converter;
 use installer::files;
 use installer::globals;
@@ -136,7 +139,7 @@ sub create_tar_gz_file
 
     $packagename =~ s/\.rpm\s*$//;
     my $targzname = $packagename . ".tar.gz";
-    $systemcall = "cd $installdir; tar -cf - $packagestring | gzip > $targzname";
+    my $systemcall = "cd $installdir; tar -cf - $packagestring | gzip > $targzname";
     installer::logger::print_message( "... $systemcall ...\n" );
 
     my $returnvalue = system($systemcall);
-- 
cgit