diff options
| -rwxr-xr-x | clean_files | 4 | ||||
| -rwxr-xr-x | compress_files | 2 | ||||
| -rwxr-xr-x | strip_files | 2 | ||||
| -rwxr-xr-x | translate_menu | 5 |
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); |