Package: gscan2pdf
Version: 0.9.24-1
Severity: normal
DjVu text zones do not cover whole pages (as it should) unless
resolution is 72.
The attached patch fixes the bug.
-- System Information:
Debian Release: lenny/sid
APT prefers testing
APT policy: (900, 'testing'), (600, 'unstable'), (500, 'experimental')
Architecture: i386 (i686)
Kernel: Linux 2.6.24-1-686 (SMP w/2 CPU cores)
Locale: LANG=C, LC_CTYPE=pl_PL.utf8 (charmap=UTF-8)
Shell: /bin/sh linked to /bin/dash
Versions of packages gscan2pdf depends on:
ii imagemagick 7:6.3.7.9.dfsg1-2+b2 image manipulation programs
ii libconfig-general-p 2.38-1 Generic Configuration Module
ii libgtk2-ex-simple-l 0.50-1.1 A simple interface to Gtk2's compl
ii libgtk2-imageview-p 0.04-1+b1Perl bindings for the GtkImageView
ii liblocale-gettext-p 1.05-4 Using libc functions for internati
ii libpdf-api2-perl0.69-2 create or modify PDF documents in
ii librsvg2-common 2.22.2-2 SAX-based renderer library for SVG
ii libsane 1.0.19-11API library for scanners
ii libtiff-tools 3.8.2-8 TIFF manipulation and conversion t
ii perlmagick 7:6.3.7.9.dfsg1-2+b2 Perl interface to the libMagick gr
ii sane-utils 1.0.19-11API library for scanners -- utilit
Versions of packages gscan2pdf recommends:
ii djvulibre-bin 3.5.20-7 Utilities for the DjVu image forma
pn gocr none (no description available)
pn libgtk2-ex-podviewer-perl none (no description available)
pn sane none (no description available)
ii tesseract-ocr 2.03-1 Command line OCR tool
pn unpaper none (no description available)
ii xdg-utils 1.0.2-6desktop integration utilities from
-- debconf-show failed
--
Jakub Wilk
--- gscan2pdf.orig 2008-06-17 17:15:37.0 +0200
+++ gscan2pdf 2008-06-17 17:14:58.0 +0200
@@ -2990,8 +2990,8 @@
my $djvusedtxtfile = djvusedtxtfile;
open (FILE, :utf8, $djvusedtxtfile)
or die sprintf($d-get(Can't open file: %s), $djvusedtxtfile);
- print FILE (page 0 0 , int($w*72/$resolution), , int($h*72/$resolution), \n;
- print FILE (line 0 0 , int($w*72/$resolution), , int($h*72/$resolution), \;
+ print FILE (page 0 0 $w $h\n;
+ print FILE (line 0 0 $w $h \;
print FILE $txt, \));
close FILE;