projects
/
kivitendo-erp.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Spool-Dateien: Handling vom wiederholten Spoolen desselben Beleges gefixt
[kivitendo-erp.git]
/
scripts
/
rose_auto_create_model.pl
diff --git
a/scripts/rose_auto_create_model.pl
b/scripts/rose_auto_create_model.pl
index
c99a4b9
..
14e4ba0
100755
(executable)
--- 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;
my %package_names = SL::DB::Helper::Mappings->get_package_names;
our $form;
-our $cgi;
our $auth;
our %lx_office_conf;
our $auth;
our %lx_office_conf;
@@
-56,13
+55,13
@@
sub setup {
usage();
}
usage();
}
- $::lxdebug = LXDebug->new();
+ $::lxdebug
= LXDebug->new();
$::locale = Locale->new("de");
$::form = new Form;
$::locale = Locale->new("de");
$::form = new Form;
- $::cgi = new CGI('');
$::auth = SL::Auth->new();
$::auth = SL::Auth->new();
- $::user = User->new($login);
- %::myconfig = $auth->read_user($login);
+ $::user = User->new(login => $login);
+ %::myconfig = $auth->read_user(login => $login);
+ $::request = { cgi => CGI->new({}) };
$form->{script} = 'rose_meta_data.pl';
$form->{login} = $login;
$form->{script} = 'rose_meta_data.pl';
$form->{login} = $login;