X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FDBUtils.pm;h=e041e10014160119a421b1b20c2871b960e4a248;hb=2508bbb1ab2056ec40635f4dda1c7023a5f3254f;hp=000bc1bdbe8ebfb3ac474af4453f8a81c064f07c;hpb=ed944ca355b3446d4e6c3fc22f748f77b64d58db;p=kivitendo-erp.git diff --git a/SL/DBUtils.pm b/SL/DBUtils.pm index 000bc1bdb..e041e1001 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; @@ -556,8 +558,6 @@ Dumps a query using LXDebug->message, using LEVEL for the debug-level of LXDebug =back -=head1 SEE ALSO - =head1 MODULE AUTHORS Moritz Bunkus Em.bunkus@linet-services.deE