Helper::Number: _format_number_units

[mfinanz.git] / SL / Helper / QrBill.pm

diff --git a/SL/Helper/QrBill.pm b/SL/Helper/QrBill.pm
index 7df8ff0bcde0d368cec06e803135aa6e443afc52..a83712430329188c9fcfb1158944c9fd886e11c8 100644 (file)
--- a/SL/Helper/QrBill.pm
+++ b/SL/Helper/QrBill.pm
@@ -117,8 +117,8 @@ sub _qrcode {
   my $self = shift;
 
   return Imager::QRCode->new(
-    size   =>  3,
-    margin =>  1,
+    size   =>  4,
+    margin =>  0,
     level  => 'M',
   );
 }
@@ -129,7 +129,7 @@ sub _cross {
   my $cross = Imager->new();
   $cross->read(file => $Config{cross_file}) or die $cross->errstr, "\n";
 
-  return $cross->scale(xpixels => 27, ypixels => 27, qtype => 'mixing');
+  return $cross->scale(xpixels => 35, ypixels => 35, qtype => 'mixing');
 }
 
 sub _plot {