added cleanup call to script runner

git-svn-id: svn://svn.open-ils.org/ILS/trunk@5996 dcc99617-32d9-48b4-a31d-7c20da2025e4

diff --git a/Open-ILS/src/perlmods/OpenILS/SIP/Item.pm b/Open-ILS/src/perlmods/OpenILS/SIP/Item.pm
index a24a716..58670bf 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/SIP/Item.pm
+++ b/Open-ILS/src/perlmods/OpenILS/SIP/Item.pm
@@ -97,11 +97,13 @@ sub run_attr_script {
        $runner->load($item_config_script);
 
        unless( $self->{item_config_result} = $runner->run ) {
+               $runner->cleanup;
                warn "Item config script [$path : $item_config_script] failed to run: $@\n";
                syslog('LOG_ERR', "OILS: Item config script [$path : $item_config_script] failed to run: $@");
                return undef;
        }
 
+       $runner->cleanup;
        return 1;
 }