Koha-clms/Koha/Exceptions.pm

48 lines
1.6 KiB
Perl

package Koha::Exceptions;
use Modern::Perl;
use Exception::Class (
# General exceptions
'Koha::Exceptions::Exception' => {
description => 'Something went wrong!',
},
'Koha::Exceptions::DuplicateObject' => {
isa => 'Koha::Exceptions::Exception',
description => 'Same object already exists',
},
'Koha::Exceptions::CannotDeleteDefault' => {
isa => 'Koha::Exceptions::Exception',
description => 'The default value cannot be deleted'
},
'Koha::Exceptions::MissingParameter' => {
isa => 'Koha::Exceptions::Exception',
description => 'A required parameter is missing'
},
# Virtualshelves exceptions
'Koha::Exceptions::Virtualshelves::DuplicateObject' => {
isa => 'Koha::Exceptions::DuplicateObject',
description => "Duplicate shelf object",
},
'Koha::Exceptions::Virtualshelves::InvalidInviteKey' => {
isa => 'Koha::Exceptions::Exception',
description => 'Invalid key on accepting the share',
},
'Koha::Exceptions::Virtualshelves::InvalidKeyOnSharing' => {
isa => 'Koha::Exceptions::Exception',
description=> 'Invalid key on sharing a shelf',
},
'Koha::Exceptions::Virtualshelves::ShareHasExpired' => {
isa => 'Koha::Exceptions::Exception',
description=> 'Cannot share this shelf, the share has expired',
},
'Koha::Exceptions::Virtualshelves::UseDbAdminAccount' => {
isa => 'Koha::Exceptions::Exception',
description => "Invalid use of database administrator account",
}
);
1;