chiark / gitweb /
fix y dimension
authorian <ian>
Tue, 7 Sep 2004 22:57:07 +0000 (22:57 +0000)
committerian <ian>
Tue, 7 Sep 2004 22:57:07 +0000 (22:57 +0000)
pcb/pcb-panelise

index 58b02ca70b9bf5b4759044605b34d4e99981edcb..6a3bde375238d7b6fc96d71366409a521e06c9e0 100755 (executable)
@@ -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;