foomatic/foomatic-margins.patch

16 lines
707 B
Diff

--- foomatic-db-engine-3.0-20070614/lib/Foomatic/DB.pm.margins 2007-06-14 11:42:16.000000000 +0100
+++ foomatic-db-engine-3.0-20070614/lib/Foomatic/DB.pm 2007-06-14 11:43:13.000000000 +0100
@@ -4289,9 +4289,10 @@
sub getmargins {
my ($dat, $width, $height, $pagesize) = @_;
# Determine the unprintable margins
- # Zero margins when no margin info exists
+ # Safe margins when no margin info exists
+ my $border = 36;
my ($left, $right, $top, $bottom) =
- (0, $width, $height, 0);
+ ($border, $width - $border, $height - $border, $border);
# Margins from printer database entry
my ($pleft, $pright, $ptop, $pbottom) =
getmarginsformarginrecord($dat->{'printermargins'},