Fix bad interaction with Test::Class:

"Operation "eq": no method found, left argument in overloaded package WebGUI::Error..."
This commit is contained in:
Scott Walters 2010-08-04 11:01:39 -04:00
parent b8905ed780
commit 13c27bc38b

View file

@ -290,6 +290,12 @@ use Exception::Class (
package WebGUI::Error;
use overload '~~' => sub {
return $_[0]->isa($_[1]);
},
'eq' => sub {
return $_[0]->error eq $_[1];
},
'ne' => sub {
return $_[0]->error ne $_[1];
};
}