Changeset 10974 for lang

Timestamp:

05/03/08 01:08:19 (5 years ago)

Author:

topia

Message:

* use eval for ->destruct.

Files:

• lang/perl/tiarra/trunk/main/ModuleManager.pm (modified) (1 diff)

lang/perl/tiarra/trunk/main/ModuleManager.pm

@@ -200 +200 @@
         # %loaded_modsに古い物が入っているので、破棄する。
         $show_msg->("Configuration of the module ".$_->block_name." has been changed. It will be restarted.");
-        $loaded_mods{$_->block_name}->destruct;
+        eval {
+            $loaded_mods{$_->block_name}->destruct;
+        }; if ($@) {
+            $this->_runloop->notify_error($@);
+        }
         $this->remove_from_blacklist($_->block_name);
         $_->block_name => $this->_load($_);