diff options
author | wl <wl> | 2012-09-20 07:48:28 +0000 |
---|---|---|
committer | wl <wl> | 2012-09-20 07:48:28 +0000 |
commit | 1be7153efcd1ccbfd4e10a1a4e4a7e1bc05ee2d5 (patch) | |
tree | 0340d5c8d90522c9f368cff8ef55aa91ec14ae13 /src/devices/gropdf/gropdf.pl | |
parent | e550448b35d01423af2060554b8684d70c14be43 (diff) | |
download | groff-1be7153efcd1ccbfd4e10a1a4e4a7e1bc05ee2d5.tar.gz |
[gropdf] Various minor fixes.
* font/devpdf/Foundry.in: Add font path to debian `gsfonts' package.
* font/devpdf/util/BuildFoundries.pl: Handle missing fonts in a more
sane way, do NOT abort the complete make run!
* src/devices/gropdf/gropdf: Accept papersize names (i.e. A4) as
either upper or lower case.
The -p (papersize) option should be length,width (currently reversed
- width,length)
* src/devices/gropdf/pdfmom.pl: Support use of GROFF_BIN_PATH.
Diffstat (limited to 'src/devices/gropdf/gropdf.pl')
-rw-r--r-- | src/devices/gropdf/gropdf.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/devices/gropdf/gropdf.pl b/src/devices/gropdf/gropdf.pl index d8a21e25..0ed81a4a 100644 --- a/src/devices/gropdf/gropdf.pl +++ b/src/devices/gropdf/gropdf.pl @@ -207,7 +207,7 @@ LoadDesc(); my $unitwidth=$desc{unitwidth}; my $papersz=$desc{papersize}; -$papersz=$fpsz if $fpsz; +$papersz=lc($fpsz) if $fpsz; $env{FontHT}=0; $env{FontSlant}=0; @@ -232,7 +232,7 @@ if (substr($papersz,0,1) eq '/' and -r $papersz) if ($papersz=~m/([\d.]+)([cipP]),([\d.]+)([cipP])/) { - @defaultmb=@mediabox=(0,0,ToPoints($1,$2),ToPoints($3,$4)); + @defaultmb=@mediabox=(0,0,ToPoints($3,$4),ToPoints($1,$2)); } elsif (exists($ppsz{$papersz})) { |