1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
|
Description: fix missing Version to mean auto-Version as documented
Having the Version member initialized to "1" if not present breaks the logic
in _calcVersion.
Bug: https://rt.cpan.org/Public/Bug/Display.html?id=20297
Bug-Debian: https://bugs.debian.org/cgi-bin/bugreport.cgi?bug=849066
--- a/Barcode/QRcode.pm
+++ b/Barcode/QRcode.pm
@@ -37,7 +37,7 @@ sub init($$$){
$oSelf->{text} = $sTxt;
$oSelf->{Ecc} = $rhPrm->{Ecc} || ' ';
$oSelf->{Ecc} =~ tr/LMHQ/M/c; #Not /LMQH/ => M
- $oSelf->{Version} = $rhPrm->{Version} || 1;
+ $oSelf->{Version} = $rhPrm->{Version} // 0;
$oSelf->{ModuleSize} = $rhPrm->{ModuleSize} || 1;
$oSelf->{ModuleSize} = int($oSelf->{ModuleSize});
|