X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FDBUpgrade2.pm;h=66ce85f9c1c3d9e9b6847a75c29027b87ffd5a92;hb=62311126ae09507b29034c26fa17e1696c48a1d4;hp=8cde113ea3b3978ccbf7bf2c1c294bc9c7e2fc6c;hpb=0cfb13d05adadebb86e9dab9bc1f2d3410ef1ee7;p=kivitendo-erp.git

diff --git a/SL/DBUpgrade2.pm b/SL/DBUpgrade2.pm
index 8cde113ea..66ce85f9c 100644
--- a/SL/DBUpgrade2.pm
+++ b/SL/DBUpgrade2.pm
@@ -1,5 +1,7 @@
 package SL::DBUpgrade2;
 
+use SL::Common;
+
 require Exporter;
 @ISA = qw(Exporter);
 
@@ -45,6 +47,8 @@ sub parse_dbupdate_controls {
       }
     }
 
+    $control->{charset} ||= Common::DEFAULT_CHARSET;
+
     _control_error($form, $file_name,
                    $locale->text("Missing 'tag' field."))
       unless ($control->{"tag"});