X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/97ca71803894a306320729483111d02fa5d61cec..1de53cbf8a926ae3ae89bc5466ab660df82484b2:/SL/Auth.pm diff --git a/SL/Auth.pm b/SL/Auth.pm index 72e36978f..e7f8f7bee 100644 --- a/SL/Auth.pm +++ b/SL/Auth.pm @@ -1,18 +1,13 @@ package SL::Auth; -use constant OK => 0; -use constant ERR_PASSWORD => 1; -use constant ERR_BACKEND => 100; - -use constant SESSION_OK => 0; -use constant SESSION_NONE => 1; -use constant SESSION_EXPIRED => 2; +use DBI; use Digest::MD5 qw(md5_hex); use IO::File; use Time::HiRes qw(gettimeofday); use List::MoreUtils qw(uniq); +use SL::Auth::Constants qw(:all); use SL::Auth::DB; use SL::Auth::LDAP;