From: Michael Andreen <harv@ruin.nu>
Date: Mon, 10 Sep 2007 17:24:24 +0000 (+0200)
Subject: Relaxed the parsing for eff and stop
X-Git-Url: https://ruin.nu/git/?a=commitdiff_plain;ds=sidebyside;h=955331b641004e0a344b9c0d031d19288641a78c;p=NDIRC.git

Relaxed the parsing for eff and stop
---

diff --git a/PA.pm b/PA.pm
index e5eaa6b..2cb498b 100644
--- a/PA.pm
+++ b/PA.pm
@@ -83,7 +83,7 @@ sub checkGal {
 sub shipEff {
 	my ($msg,$command) = @_;
 	my ($amount,$ship,$value);
-	if($msg =~ /^(-?\d+(?:\.\d+)?[hkMG]?) (\w+)$/){
+	if($msg =~ /^(-?\d+(?:\.\d+)?[hkMG]?) (\w+)/){
 		if ($command eq 'veff'){
 			$value = parseValue($1);
 			$value *= -1.5 if $value < 0;
@@ -140,7 +140,7 @@ FROM ship_stats WHERE name ILIKE ?
 sub shipStop {
 	my ($msg,$command) = @_;
 	my ($amount,$ship,$value);
-	if($msg =~ /^(-?\d+(?:\.\d+)?[hkMG]?) (\w+)$/){
+	if($msg =~ /^(-?\d+(?:\.\d+)?[hkMG]?) (\w+)/){
 		if ($command eq 'vstop'){
 			$value = parseValue($1);
 			$value *= -1.5 if $value < 0;