$::request auch in dbupgrade2_tool initialisieren

diff --git a/scripts/dbupgrade2_tool.pl b/scripts/dbupgrade2_tool.pl
index 9b1e9e0d8349ede8454aa44451f2e0f47acbb1d5..5ed9c27c111e215c01e7984e25895f67157c4fde 100755 (executable)
--- a/scripts/dbupgrade2_tool.pl
+++ b/scripts/dbupgrade2_tool.pl
@@ -461,8 +461,12 @@ sub build_upgrade_order {
 #######
 #######
 
 #######
 #######
 

-$locale = Locale->new;
-$form   = Form->new;
+$locale    = Locale->new;
+$form      = Form->new;
+$::request = SL::Request->new(
+  cgi    => CGI->new({}),
+  layout => SL::Layout::None->new,
+);

 
 #######
 #######
 
 #######
 #######