From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Wed, 25 Jun 2008 14:14:34 +0000 (+0000)
Subject: Konstanten aus anderen Packages müssen mit dem Package-Namen beginnen.
X-Git-Tag: release-2.6.0beta1~111
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=d099e8002715b269a2984051edf720b0fca6bedf;p=kivitendo-erp.git

Konstanten aus anderen Packages müssen mit dem Package-Namen beginnen.
---

diff --git a/SL/User.pm b/SL/User.pm
index ece1fb8b5..cfa43fee3 100644
--- a/SL/User.pm
+++ b/SL/User.pm
@@ -768,7 +768,7 @@ sub dbupdate {
       last if ($version < $mindb);
 
       # apply upgrade
-      $main::lxdebug->message(DEBUG2, "Applying Update $upgradescript");
+      $main::lxdebug->message(LXDebug::DEBUG2, "Applying Update $upgradescript");
       if ($file_type eq "sql") {
         $self->process_query($form, $dbh, "sql/" . $form->{"dbdriver"} .
                              "-upgrade/$upgradescript", $str_maxdb, $db_charset);
@@ -852,7 +852,7 @@ sub dbupdate2 {
       my $file_type = $1;
 
       # apply upgrade
-      $main::lxdebug->message(DEBUG2, "Applying Update $control->{file}");
+      $main::lxdebug->message(LXDebug::DEBUG2, "Applying Update $control->{file}");
       print $form->parse_html_template("dbupgrade/upgrade_message2", $control);
 
       if ($file_type eq "sql") {