Show SSL fingerprint in /WHOIS line, allow fingerprints to be hidden from non-opers...

[user/henk/code/inspircd.git] / win / rename_installer.pl

diff --git a/win/rename_installer.pl b/win/rename_installer.pl
index 678b11b8bf475d134c22248161f5ac50a74961b3..d24abb995f292892527cfa1892895694a39a9fa9 100644 (file)
--- a/win/rename_installer.pl
+++ b/win/rename_installer.pl
@@ -7,17 +7,22 @@ while (chomp($v = <FH>))
 }\r
 close FH;\r
 \r
-$version =~ /InspIRCd-(\d+)\.(\d+)\.(\d+)([ab\+])/;\r
+print "Version: '$version'\n";\r
+\r
+$version =~ /InspIRCd-(\d+)\.(\d+)\.(\d+)([ab\+]|RC|rc)/;\r
 \r
 $v1 = $1;\r
 $v2 = $2;\r
 $v3 = $3;\r
 $type = $4;\r
 \r
-if ($type =~ /^[ab]$/)\r
+print "v1=$1 v2=$2 v3=$3 type=$4\n";\r
+\r
+if ($type =~ /^[ab]|rc|RC$/)\r
 {\r
-       $version =~ /InspIRCd-\d+\.\d+\.\d+[ab\+](\d+)/;\r
-       $alphabeta = $1;\r
+       $version =~ /InspIRCd-\d+\.\d+\.\d+([ab]|RC|rc)(\d+)/;\r
+       $alphabeta = $2;\r
+       print "Version sub is $type $alphabeta\n";\r
        $name = "InspIRCd-$v1.$v2.$v3$type$alphabeta.exe";\r
        $rel = "$v1.$v2.$v3$type$alphabeta";\r
 }\r
@@ -29,6 +34,7 @@ else
 \r
 print "del $name\n";\r
 print "ren Setup.exe $name\n";\r
+\r
 system("del $name");\r
 system("ren Setup.exe $name");\r
 \r