Mailing List Archive

Author: jm
Date: Thu Feb 5 19:36:06 2004
New Revision: 6529

Modified:
incubator/spamassassin/trunk/lib/Mail/SpamAssassin/PluginHandler.pm
Log:
some error-avoidance in plugin support

Modified: incubator/spamassassin/trunk/lib/Mail/SpamAssassin/PluginHandler.pm
==============================================================================
--- incubator/spamassassin/trunk/lib/Mail/SpamAssassin/PluginHandler.pm (original)
+++ incubator/spamassassin/trunk/lib/Mail/SpamAssassin/PluginHandler.pm Thu Feb 5 19:36:06 2004
@@ -89,7 +89,12 @@

dbg ("plugin: calling $subname on $plugin");
my $methodref = $plugin->can ($subname);
- $ret = &$methodref ($plugin, @_);
+
+ if (defined $methodref) {
+ eval {
+ $ret = &$methodref ($plugin, @_);
+ };
+ }

if ($plugin->{_inhibit_further_callbacks}) {
dbg ("plugin: $plugin inhibited further callbacks");