Bug#514380: libpdf-api2-perl: fails to embed certain PNMs

[Jeffrey Ratcliffe]

Package: libpdf-api2-perl
Version: 0.72.003-1
Severity: normal

Some PNMs are not embedded properly. See the script below and sample PNM,
which produces a blank PDF.

#!/usr/bin/perl -w
use strict;
use PDF::API2;
my $pdf = PDF::API2-> new(-file => 'test.pdf');
my $page = $pdf-> page;
my $gfx = $page->gfx;
my $img = $pdf->image_pnm('test.pnm');
$gfx->image($img);
$pdf->save;
$pdf->end();
-------------- next part --------------
A non-text attachment was scrubbed...
Name: test.pnm.bz2
Type: application/x-bzip2
Size: 11921 bytes
Desc: not available
Url : http://lists.alioth.debian.org/pipermail/pkg-perl-maintainers/attachments/20090206/9046f9d5/attachment.bin