Fixed the --no-scripts option by always calling script_files

(Module::Build was finding my script automatically)
madsen · Feb 3, 2007 · cdcdef1 · cdcdef1
1 parent e3c208d
commit cdcdef1
Showing 1 changed file with 4 additions and 3 deletions.
diff --git a/Build.PL b/Build.PL
@@ -29,13 +29,14 @@ my $builder = My_Build->new(
   create_makefile_pl => 'passthrough',
 );
 
-my $noScripts = $builder->args('no-scripts');
+my @scripts;
+@scripts = qw(bin/up_menus) unless $builder->args('no-scripts');
 
-$builder->script_files([ 'bin/up_menus' ]) unless $noScripts;
+$builder->script_files(\@scripts);
 
 $builder->create_build_script;
 
-if ($noScripts) {
+unless (@scripts) {
   print "The up_menus script will not be installed (installing module only).\n";
 } else {
   print "The up_menus script will be installed along with the module.\n";