oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

allow exception objects to pass through pluggable

Browse source
This commit is contained in:
Graham Knop 2009-05-21 14:49:14 +00:00
parent 43f09b433f
commit 0f27f27d68
1 changed files with 3 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lib/WebGUI/Pluggable.pm
View file

@ -195,6 +195,9 @@ sub instanciate {
} }
my $object; my $object;
if (! eval{$object = $module->$sub(@{$params}); 1}) { if (! eval{$object = $module->$sub(@{$params}); 1}) {
if ( ref $@ ) {
die $@;
}
croak "Could not instanciate object using $sub on $module because $@"; croak "Could not instanciate object using $sub on $module because $@";
} }
if (defined $object) { if (defined $object) {