Commit 74d26168 authored by Charles Plessy's avatar Charles Plessy

Forwarded upstream as a Git formatted patch.

parent 9e873cff
--- a/Build.PL 2011-06-17 18:19:24.491792863 +0900
+++ b/Build.PL.install-scripts 2011-06-17 18:18:46.371792871 +0900
@@ -27,7 +27,8 @@
Forwarded: https://redmine.open-bio.org/issues/3254
From 4d1fe98b390c67170d0d23325de5ccd8fdc6ea1a Mon Sep 17 00:00:00 2001
From: Charles Plessy <plessy@debian.org>
Date: Sat, 18 Jun 2011 12:43:21 +0900
Subject: [PATCH] New --install_scripts option to request script installation non-interactively.
---
Build.PL | 5 +++--
1 files changed, 3 insertions(+), 2 deletions(-)
diff --git a/Build.PL b/Build.PL
index a577ecf..531f524 100755
--- a/Build.PL
+++ b/Build.PL
@@ -28,7 +28,8 @@ my $build = Module::Build->new(
},
get_options => {
accept => { },
......@@ -10,12 +22,15 @@
},
auto_features => {
Network => {
@@ -42,7 +43,7 @@
@@ -43,7 +44,7 @@ my $build = Module::Build->new(
my $accept = $build->args->{accept};
# Optionally have script files installed.
-if ($accept ? 0 : $build->y_n("Install scripts? y/n", 'n')) {
+if ($build->args('install_scripts') or $accept ? 0 : $build->y_n("Install scripts? y/n", 'n')) {
my $files = $build->_find_file_by_type('PLS', 'scripts');
my $script_build = File::Spec->catdir($build->blib, 'script');
--
1.7.2.5
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment