From 7df379d61e96e84d99a4d815fc879a38e5fabd2c Mon Sep 17 00:00:00 2001
From: brain <brain@e03df62e-2008-0410-955e-edbf42e46eb7>
Date: Sun, 8 Feb 2009 18:22:41 +0000
Subject: Allow this to handle RC style names

git-svn-id: http://svn.inspircd.org/repository/trunk/inspircd@11063 e03df62e-2008-0410-955e-edbf42e46eb7
---
 win/rename_installer.pl | 14 ++++++++++----
 1 file changed, 10 insertions(+), 4 deletions(-)

(limited to 'win')

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