From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Tue, 28 Feb 2017 10:31:54 +0000 (+0100)
Subject: PrintOptions: keine Warnungen wegen einmaliger Verwendung bekannter Variablen
X-Git-Tag: release-3.5.4~1262
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=e62861f7943b1ff8fade85fcc39ff668bd3995ee;p=kivitendo-erp.git

PrintOptions: keine Warnungen wegen einmaliger Verwendung bekannter Variablen
---

diff --git a/SL/Helper/PrintOptions.pm b/SL/Helper/PrintOptions.pm
index a4e1f0ef5..164a5c39c 100644
--- a/SL/Helper/PrintOptions.pm
+++ b/SL/Helper/PrintOptions.pm
@@ -18,11 +18,15 @@ sub opthash { +{ value => shift, selected => shift, oname => shift } }
 sub get_print_options {
   my ($class, %params) = @_;
 
+  no warnings 'once';
+
   my $form     = $params{form}     || $::form;
   my $myconfig = $params{myconfig} || \%::myconfig;
   my $locale   = $params{locale}   || $::locale;
   my $options  = $params{options};
 
+  use warnings 'once';
+
   my $prefix = $options->{dialog_name_prefix} || '';
 
   # names 3 parameters and returns a hashref, for use in templates