Package: libgd-barcode-perl Version: 1.15-5 Severity: important Tags: upstream patch
Control: forwarded -1 https://rt.cpan.org/Public/Bug/Display.html?id=20297 GD::Barcode::QRcode docs say: Version Version ie. size of barcode image (Default = auto select). However, the following code dies: $ perl -MGD::Barcode::QRcode -E'use warnings; binmode(STDOUT); \ GD::Barcode::QRcode->new("https://www.debian.org/";)' Overflow error. version 1 total bits: 364 max bits: 128 As noted in the upstream bug (7 years ago!), changing the initialization of Version from $oSelf->{Version} = $rhPrm->{Version} || 1; to $oSelf->{Version} = $rhPrm->{Version} || 0; fixes the logic in _caclVersion(). I am going to apply the proposed patch and upload. -- System Information: Debian Release: stretch/sid APT prefers unstable-debug APT policy: (500, 'unstable-debug'), (500, 'unstable'), (1, 'experimental') Architecture: amd64 (x86_64) Foreign Architectures: i386 Kernel: Linux 4.8.0-2-amd64 (SMP w/4 CPU cores) Locale: LANG=bg_BG.UTF-8, LC_CTYPE=bg_BG.UTF-8 (charmap=UTF-8) Shell: /bin/sh linked to /bin/dash Init: systemd (via /run/systemd/system) Versions of packages libgd-barcode-perl depends on: ii libgd-perl [libgd-gd2-perl] 2.53-3 ii perl 5.24.1~rc4-1 libgd-barcode-perl recommends no packages. libgd-barcode-perl suggests no packages. -- no debconf information
