summaryrefslogtreecommitdiff
path: root/make/configure.pm
diff options
context:
space:
mode:
authorw00t <w00t@e03df62e-2008-0410-955e-edbf42e46eb7>2008-09-07 23:40:00 +0000
committerw00t <w00t@e03df62e-2008-0410-955e-edbf42e46eb7>2008-09-07 23:40:00 +0000
commit28fbe778316add7688284a0612693be4a129581d (patch)
treea48b27b9485700758a59a683fffb2ba403bb6398 /make/configure.pm
parent76d8c58f091b5a2c2250e6b1e507f604632a2da6 (diff)
Allow for silencing getmodules() output (is annoying when using modulemanager)
git-svn-id: http://svn.inspircd.org/repository/trunk/inspircd@10466 e03df62e-2008-0410-955e-edbf42e46eb7
Diffstat (limited to 'make/configure.pm')
-rw-r--r--make/configure.pm20
1 files changed, 17 insertions, 3 deletions
diff --git a/make/configure.pm b/make/configure.pm
index 089842fb3..5444ca40c 100644
--- a/make/configure.pm
+++ b/make/configure.pm
@@ -154,8 +154,15 @@ sub nopedantic {
sub getmodules
{
+ my ($silent) = @_;
+
my $i = 0;
- print "Detecting modules ";
+
+ if (!$silent)
+ {
+ print "Detecting modules ";
+ }
+
opendir(DIRHANDLE, "src/modules") or die("WTF, missing src/modules!");
foreach my $name (sort readdir(DIRHANDLE))
{
@@ -163,11 +170,18 @@ sub getmodules
{
my $mod = $1;
$main::modlist[$i++] = $mod;
- print ".";
+ if (!$silent)
+ {
+ print ".";
+ }
}
}
closedir(DIRHANDLE);
- print "\nOk, $i modules.\n";
+
+ if (!$silent)
+ {
+ print "\nOk, $i modules.\n";
+ }
}
sub promptnumeric($$)