24 lines
547 B
Perl
24 lines
547 B
Perl
package Koha::Exceptions::Authentication;
|
|
|
|
use Modern::Perl;
|
|
|
|
use Koha::Exception;
|
|
|
|
use Exception::Class (
|
|
|
|
'Koha::Exceptions::Authentication' => {
|
|
isa => 'Koha::Exception',
|
|
},
|
|
'Koha::Exceptions::Authentication::Required' => {
|
|
isa => 'Koha::Exceptions::Authentication',
|
|
description => 'Authentication required'
|
|
},
|
|
'Koha::Exceptions::Authentication::SessionExpired' => {
|
|
isa => 'Koha::Exceptions::Authentication',
|
|
description => 'Session has been expired',
|
|
},
|
|
|
|
);
|
|
|
|
1;
|