summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xsheetprint5
1 files changed, 3 insertions, 2 deletions
diff --git a/sheetprint b/sheetprint
index 5ee0a38..f0052f5 100755
--- a/sheetprint
+++ b/sheetprint
@@ -56,13 +56,14 @@ for ( my $i = 1; $i < 210; $i++) {
}
}
+my $skip = 2;
my $x = mm2dots(25);
-my $y = mm2dots(30);
+my $y = mm2dots(32) + $skip * mm2dots(25);
for my $filename ( `ls label-??????????.png` ) {
my $label = GD::Image->newFromPng($filename);
$a4->copy($label, $x, $y, 0, 0, $label->width(), $label->height());
- $y += mm2dots(30);
+ $y += mm2dots(25);
}
open(PNGFILE, ">a4.png");