ouch/inspircd
2
0
Fork 0
mirror of https://github.com/inspircd/inspircd.git synced 2025-03-09 10:39:02 -04:00
Code Issues Packages Projects Releases Wiki Activity

Allow for silencing getmodules() output (is annoying when using modulemanager)

Browse Source 
git-svn-id: http://svn.inspircd.org/repository/trunk/inspircd@10466 e03df62e-2008-0410-955e-edbf42e46eb7
This commit is contained in:
w00t 2008-09-07 23:40:00 +00:00
parent 76d8c58f09
commit 28fbe77831
2 changed files with 18 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
make/configure.pm
View File

@ -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($$)

2
modulemanager
View File

@ -72,7 +72,7 @@ while (<SRC>) {
}
close SRC;
getmodules();
getmodules(1);
`./src/version.sh` =~ /InspIRCd-([0-9.]+)/ or die "Cannot determine inspircd version";
$installed{core} = $1;