projects
/
kivitendo-erp.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Debitorenbuchungen: Nicht auf den bereits formatierten Wechselkurs prüfen.
[kivitendo-erp.git]
/
scripts
/
console
diff --git
a/scripts/console
b/scripts/console
index
ca20b2b
..
42c193a
100755
(executable)
--- a/
scripts/console
+++ b/
scripts/console
@@
-39,8
+39,10
@@
package Devel::REPL;
use utf8;
use CGI qw( -no_xhtml);
use utf8;
use CGI qw( -no_xhtml);
+use DateTime;
use SL::Auth;
use SL::Form;
use SL::Auth;
use SL::Form;
+use SL::Helper::DateTime;
use SL::Locale;
use SL::LXDebug;
use Data::Dumper;
use SL::Locale;
use SL::LXDebug;
use Data::Dumper;
@@
-78,8
+80,12
@@
sub lxinit {
require "bin/mozilla/common.pl";
die "cannot find user $login" unless %::myconfig = $::auth->read_user($login);
require "bin/mozilla/common.pl";
die "cannot find user $login" unless %::myconfig = $::auth->read_user($login);
+
+ $::form->{login} = $login; # normaly implicit at login
+
die "cannot find locale for user $login" unless $::locale = Locale->new($::myconfig{countrycode});
die "cannot find locale for user $login" unless $::locale = Locale->new($::myconfig{countrycode});
+
return "logged in as $login";
}
return "logged in as $login";
}