25 lines
631 B
Perl
25 lines
631 B
Perl
package Koha::Exceptions::Object;
|
|
|
|
use Modern::Perl;
|
|
|
|
use Exception::Class (
|
|
|
|
'Koha::Exceptions::Object' => {
|
|
description => 'Something went wrong!',
|
|
},
|
|
'Koha::Exceptions::Object::MethodNotFound' => {
|
|
isa => 'Koha::Exceptions::Object',
|
|
description => "Invalid method",
|
|
},
|
|
'Koha::Exceptions::Object::PropertyNotFound' => {
|
|
isa => 'Koha::Exceptions::Object',
|
|
description => "Invalid property",
|
|
},
|
|
'Koha::Exceptions::Object::MethodNotCoveredByTests' => {
|
|
isa => 'Koha::Exceptions::Object',
|
|
description => "Method not covered by tests",
|
|
},
|
|
);
|
|
|
|
1;
|