X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/blobdiff_plain/181ce4f5bab35c1f270a192f062cd27cd34060ba..df2cb4e9ab3eb6b70a84e09fad5eb6a3a6360bfa:/SL/Num2text.pm

diff --git a/SL/Num2text.pm b/SL/Num2text.pm
index f38f10849..15575c356 100644
--- a/SL/Num2text.pm
+++ b/SL/Num2text.pm
@@ -32,6 +32,8 @@
 #
 #=====================================================================
 
+use strict;
+
 sub init {
   my $self = shift;
 
@@ -129,7 +131,7 @@ sub num2text {
 
     # add thousand, million
     if ($i) {
-      $num = 10**($i * 3);
+      my $num = 10**($i * 3);
       push(@textnumber, $self->{numbername}{$num});
     }