projects
/
kivitendo-erp.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Dispatcher bruacht kein SL/ include, wenn Form in der korrekten Form "SL::Form" einge...
[kivitendo-erp.git]
/
SL
/
Auth
/
DB.pm
diff --git
a/SL/Auth/DB.pm
b/SL/Auth/DB.pm
index
d4e4d48
..
2ad131a
100644
(file)
--- a/
SL/Auth/DB.pm
+++ b/
SL/Auth/DB.pm
@@
-1,8
+1,6
@@
package SL::Auth::DB;
package SL::Auth::DB;
-use DBI;
-
-#use SL::Auth;
+use SL::Auth::Constants qw(:all);
use SL::DBUtils;
use strict;
use SL::DBUtils;
use strict;
@@
-34,7
+32,7
@@
sub authenticate {
if (!$dbh) {
$main::lxdebug->leave_sub();
if (!$dbh) {
$main::lxdebug->leave_sub();
- return
SL::Auth->ERR_BACKEND()
;
+ return
ERR_BACKEND
;
}
my $query = qq|SELECT password FROM auth."user" WHERE login = ?|;
}
my $query = qq|SELECT password FROM auth."user" WHERE login = ?|;
@@
-45,7
+43,7
@@
sub authenticate {
$main::lxdebug->leave_sub();
$main::lxdebug->leave_sub();
- return $password eq $stored_password ?
SL::Auth->OK() : SL::Auth->ERR_PASSWORD()
;
+ return $password eq $stored_password ?
OK : ERR_PASSWORD
;
}
sub can_change_password {
}
sub can_change_password {
@@
-64,7
+62,7
@@
sub change_password {
if (!$dbh) {
$main::lxdebug->leave_sub();
if (!$dbh) {
$main::lxdebug->leave_sub();
- return
SL::Auth->ERR_BACKEND()
+ return
ERR_BACKEND;
}
$password = crypt $password, substr($login, 0, 2) if (!$is_crypted);
}
$password = crypt $password, substr($login, 0, 2) if (!$is_crypted);