From: ian <ian>
Date: Tue, 7 Sep 2004 22:57:07 +0000 (+0000)
Subject: fix y dimension
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ijackson/git?a=commitdiff_plain;h=011ebcdf1eb5f146eda715438881e791e618b1c0;p=trains.git

fix y dimension
---

diff --git a/pcb/pcb-panelise b/pcb/pcb-panelise
index 58b02ca..6a3bde3 100755
--- a/pcb/pcb-panelise
+++ b/pcb/pcb-panelise
@@ -149,7 +149,7 @@ sub op__PCB {
     @thiscoords= @a[1..2];
     transform(0,@thiscoords);
     $xmax= $xpos + $thiscoords[0] if $xpos + $thiscoords[0] > $xmax;
-    $ymax= $ypos + $thiscoords[0] if $ypos + $thiscoords[0] > $xmax;
+    $ymax=         $thiscoords[1] if         $thiscoords[1] > $ymax;
 }
 sub endfile__ {
     $ypos= $thiscoords[1] + $gap;