X-Git-Url: https://git.netwichtig.de/gitweb/?a=blobdiff_plain;f=make%2Fconfigure.pm;h=5444ca40cd86ca9fd4a6993e625ec01b911eae27;hb=b5c1cf4e2cbb3b47134e26e63bbebc3f5d77e150;hp=39ee214879e269ab9ce330d52ec3b217f2bd7a43;hpb=3de8d7eee411e1164faa2a95015746304715bb18;p=user%2Fhenk%2Fcode%2Finspircd.git

diff --git a/make/configure.pm b/make/configure.pm
index 39ee21487..5444ca40c 100644
--- a/make/configure.pm
+++ b/make/configure.pm
@@ -59,13 +59,14 @@ sub getrevision {
 	my $data = `svn info 2>/dev/null`;
 	if ($data eq "")
 	{
-		$data = `git-svn info 2>/dev/null`;
+		$data = `git describe --tags 2>/dev/null`;
 		if ($data eq "")
 		{
 			$no_svn = 1;
-			my $rev = "0";
-			return $rev;
+			return '0';
 		}
+		chomp $data; # remove \n
+		return $data;
 	}
 	$data =~ /Revision: (\d+)/;
 	my $rev = $1;
@@ -153,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))
 	{
@@ -162,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($$)