]> wagnertech.de Git - mfinanz.git/blobdiff - SL/Controller/LoginScreen.pm
PriceSource: Doku Update
[mfinanz.git] / SL / Controller / LoginScreen.pm
index da2c0bfffcaac5322146432d1fa7602c9b9e7f1b..8ac63a72ddd373445e8221462da5ca650e57365e 100644 (file)
@@ -13,6 +13,7 @@ use SL::DB::AuthUser;
 use SL::DB::Employee;
 use SL::Locale::String qw(t8);
 use SL::User;
+use SL::Version;
 
 use Rose::Object::MakeMethods::Generic (
   'scalar --get_set_init' => [ qw(clients default_client_id) ],
@@ -79,7 +80,7 @@ sub action_login {
   }
 
   # Database update available?
-  ::end_of_request() if User::LOGIN_DBUPDATE_AVAILABLE() == $result;
+  $::dispatcher->end_request if User::LOGIN_DBUPDATE_AVAILABLE() == $result;
 
   # Other login errors.
   if (User::LOGIN_OK() != $result) {
@@ -178,7 +179,7 @@ sub init_default_client_id {
 sub show_login_form {
   my ($self, %params) = @_;
 
-  $self->render('login_screen/user_login', %params, version => $::form->read_version);
+  $self->render('login_screen/user_login', %params, version => SL::Version->get_version );
 }
 
 1;