From de87ab0c13ae5028728cbb3234d842956d3abc26 Mon Sep 17 00:00:00 2001 From: ian Date: Sun, 1 Jun 2008 21:28:56 +0000 Subject: [PATCH] fractional overlay-info locations --- layout/genoverlayinfo | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/layout/genoverlayinfo b/layout/genoverlayinfo index d3779fd..f5b922d 100755 --- a/layout/genoverlayinfo +++ b/layout/genoverlayinfo @@ -24,7 +24,7 @@ for ($i=0; $i<4; $i++) { $matrix[1] *= -1; $matrix[2] *= -1; -print STDERR join("\n",@matrix),"\n"; +print STDERR "matrix: ",join(" ",map { $_+0 } @matrix),"\n"; open C, $plandatac or die $!; for (;;) { @@ -57,7 +57,7 @@ while () { $x -= $crop_x; $y -= $crop_y; - printf "%s %d %d\n", $lhs, $x, $y or die $!; + printf "%s %f %f\n", $lhs, $x, $y or die $!; } U->error and die $!; close U or die $!; -- 2.30.2