From cb0a35fe114603e9482e9dad4dd3e6447911fb2a Mon Sep 17 00:00:00 2001
From: Bdale Garbee <bdale@gag.com>
Date: Tue, 23 Dec 2008 18:30:48 -0700
Subject: [PATCH] fix for regexp problem when pcb is named

---
 pcb2panel | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)
 mode change 100644 => 100755 pcb2panel

diff --git a/pcb2panel b/pcb2panel
old mode 100644
new mode 100755
index e517c01..63206dc
--- a/pcb2panel
+++ b/pcb2panel
@@ -5,7 +5,7 @@
 # Released under the terms of the GNU General Public License, version 2
 
 if (! @ARGV) {
-    print "Usage: pcb2panel board1.pcb board2.pcb board3.pcb > boards.pcb";
+    print "Usage: pcb2panel board1.pcb board2.pcb board3.pcb > boards.pcb\n";
     print "Then edit boards.pcb, putting each outline where you want it\n";
     print "and sizing the board.  Then:\n";
     print "panel2pcb boards.pcb\n";
@@ -21,7 +21,7 @@ for $pcb (@ARGV) {
     push (@pcbs, $pcb);
     open(PCB, $pcb);
     while (<PCB>) {
-	if (/^PCB\["" (\d+) (\d+)\]/) {
+	if (/^PCB\[".*" (\d+) (\d+)\]/) {
 	    $width{$pcb} = $1;
 	    $height{$pcb} = $2;
 	    break;
-- 
2.30.2