From: ian <ian>
Date: Tue, 7 Sep 2004 23:25:20 +0000 (+0000)
Subject: allow negative decimals (and -0)
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ijackson/git?a=commitdiff_plain;h=7014cf994fa5c27772f6141275c8240f17425bcf;p=trains.git

allow negative decimals (and -0)
---

diff --git a/pcb/pcb-panelise b/pcb/pcb-panelise
index 69f251d..91b3498 100755
--- a/pcb/pcb-panelise
+++ b/pcb/pcb-panelise
@@ -81,7 +81,7 @@ sub process () {
 #print STDERR "$argstring>".join("|",@a)."<\n";
 		map {
 		    die "$_ ?" unless
-			m/^(?: (?: 0 | \-? [1-9]\d* ) (?: \. \d* )?
+			m/^(?: \-? (?: 0 | [1-9]\d* ) (?: \. \d* )?
 			    | 0x[0-9a-f]{8} | 0x[0-9a-f]{16} |
 			    \" (?: \w | [-():,.] | \001 | \$ )* \" |
 			    \'.\' )$/x;