X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/d9cd41c59bfa524ab16e1e4a7b76020aaff6ac14..5494f687372570c9d1c5eb5c6aad73767e50820a:/scripts/rose_auto_create_model.pl?ds=sidebyside diff --git a/scripts/rose_auto_create_model.pl b/scripts/rose_auto_create_model.pl index fb6ef7ef9..12ac0bdaf 100755 --- a/scripts/rose_auto_create_model.pl +++ b/scripts/rose_auto_create_model.pl @@ -31,7 +31,6 @@ my %blacklist = SL::DB::Helper::Mappings->get_blacklist; my %package_names = SL::DB::Helper::Mappings->get_package_names; our $form; -our $cgi; our $auth; our %lx_office_conf; @@ -59,10 +58,10 @@ sub setup { $::lxdebug = LXDebug->new(); $::locale = Locale->new("de"); $::form = new Form; - $::cgi = new CGI(''); $::auth = SL::Auth->new(); $::user = User->new($login); %::myconfig = $auth->read_user($login); + $::request = { cgi => CGI->new({}) }; $form->{script} = 'rose_meta_data.pl'; $form->{login} = $login;