aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGuillaume Rousse <guillomovitch@mandriva.org>2008-01-29 21:20:50 +0000
committerGuillaume Rousse <guillomovitch@mandriva.org>2008-01-29 21:20:50 +0000
commit7d1cb2c537e76a8408355a62f38016ed3a8c2085 (patch)
treeab1f59c3bfdb4640e0db755b3616f4c71acd79d8
parent2bd8b635ff0f1fc402e2c5105e828e6687c5f171 (diff)
downloadspec-helper-7d1cb2c537e76a8408355a62f38016ed3a8c2085.tar
spec-helper-7d1cb2c537e76a8408355a62f38016ed3a8c2085.tar.gz
spec-helper-7d1cb2c537e76a8408355a62f38016ed3a8c2085.tar.bz2
spec-helper-7d1cb2c537e76a8408355a62f38016ed3a8c2085.tar.xz
spec-helper-7d1cb2c537e76a8408355a62f38016ed3a8c2085.zip
use strictures and warnings in all perl scripts
-rwxr-xr-xclean_files4
-rwxr-xr-xcompress_files2
-rwxr-xr-xstrip_files2
-rwxr-xr-xtranslate_menu5
4 files changed, 11 insertions, 2 deletions
diff --git a/clean_files b/clean_files
index 9955454..7e5d02d 100755
--- a/clean_files
+++ b/clean_files
@@ -1,4 +1,4 @@
-#!/usr/bin/perl -w
+#!/usr/bin/perl
#---------------------------------------------------------------
# Project : Linux-Mandrake
# Module : spec-helper
@@ -10,6 +10,8 @@
#---------------------------------------------------------------
################################################################################
+use strict;
+use warnings;
$ENV{DONT_CLEANUP} and exit(0);
my $RPM_BUILD_ROOT = $ENV{RPM_BUILD_ROOT};
diff --git a/compress_files b/compress_files
index 80c5550..dffbc63 100755
--- a/compress_files
+++ b/compress_files
@@ -9,6 +9,8 @@
# Purpose : compress man and info pages.
#---------------------------------------------------------------
+use strict;
+use warnings;
use Cwd;
use File::Find;
diff --git a/strip_files b/strip_files
index 53d87ee..b994362 100755
--- a/strip_files
+++ b/strip_files
@@ -9,6 +9,8 @@
# Purpose : Strip files.
#---------------------------------------------------------------
+use strict;
+use warnings;
use File::Find;
################################################################################
diff --git a/translate_menu b/translate_menu
index 2d661c6..2fc3f88 100755
--- a/translate_menu
+++ b/translate_menu
@@ -1,4 +1,4 @@
-#!/usr/bin/perl -w
+#!/usr/bin/perl
#---------------------------------------------------------------
# Project : Mandrake Linux
# Module : spec-helper
@@ -9,6 +9,9 @@
# Purpose : change the menu sections
#---------------------------------------------------------------
+use strict;
+use warnings;
+
my $menudir = `rpm --eval %_menudir`;
chomp($menudir);