From 140ae8ff6d65c173a3d68f84f7e14596da3123f2 Mon Sep 17 00:00:00 2001
From: "gerv%gerv.net" <>
Date: Tue, 3 Feb 2004 06:01:52 +0000
Subject: Bug 232804 - add a "--check-modules" switch to checksetup.pl to get
 it to only do the Perl module checks. This makes installation easier to
 explain. Patch by gerv; r,a=justdave.

---
 checksetup.pl | 11 +++++++++--
 1 file changed, 9 insertions(+), 2 deletions(-)

(limited to 'checksetup.pl')

diff --git a/checksetup.pl b/checksetup.pl
index a8a73ce43..4385accfc 100755
--- a/checksetup.pl
+++ b/checksetup.pl
@@ -128,14 +128,19 @@ BEGIN {
     if (!$^C) {
 
 ###########################################################################
-# Non-interactive override
+# Non-interactive override. Pass a filename on the command line which is
+# a Perl script. This script defines a %answer hash whose names are tags
+# and whose values are answers to all the questions checksetup.pl asks. 
+# Grep this file for references to that hash to see the tags to use for the 
+# possible answers. One example is ADMIN_EMAIL.
 ###########################################################################
-if ($ARGV[0]) {
+if ($ARGV[0] && ($ARGV[0] !~ /^--/)) {
     do $ARGV[0] 
         or ($@ && die("Error $@ processing $ARGV[0]"))
         or die("Error $! processing $ARGV[0]");
     $silent = 1;
 }
+
 ###########################################################################
 # Check required module
 ###########################################################################
@@ -336,6 +341,8 @@ if (%missing) {
 }
 }
 
+# Break out if checking the modules is all we have been asked to do.
+exit if grep(/^--check-modules$/, @ARGV);
 
 # If we're running on Windows, reset the input line terminator so that 
 # console input works properly - loading CGI tends to mess it up
-- 
cgit v1.2.3-24-g4f1b