X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/ed944ca355b3446d4e6c3fc22f748f77b64d58db..a19b92d1f0efeb313b18517452693b35e147063b:/SL/DBUtils.pm?ds=inline

diff --git a/SL/DBUtils.pm b/SL/DBUtils.pm
index 000bc1bdb..6d20a695c 100644
--- a/SL/DBUtils.pm
+++ b/SL/DBUtils.pm
@@ -12,6 +12,8 @@ our @EXPORT = qw(conv_i conv_date conv_dateq do_query selectrow_query do_stateme
              create_sort_spec does_table_exist
              add_token);
 
+use strict;
+
 sub conv_i {
   my ($value, $default) = @_;
   return (defined($value) && "$value" ne "") ? $value * 1 : $default;