[collectd] [PATCH] perl plugin: Warn if "EnableDebugger" has been used after "LoadPlugin".

[Sebastian Harl]

Signed-off-by: Sebastian Harl <sh at tokkee.org>
---
 src/perl.c |    5 +++++
 1 files changed, 5 insertions(+), 0 deletions(-)

diff --git a/src/perl.c b/src/perl.c
index 7558a50..4d50cee 100644
--- a/src/perl.c
+++ b/src/perl.c
@@ -1478,6 +1478,11 @@ static int perl_config_enabledebugger (pTHX_ oconfig_item_t *ci)
 		return 1;
 	}
 
+	if (NULL == aTHX) {
+		log_warn ("EnableDebugger has no effects if used after LoadPlugin.");
+		return 1;
+	}
+
 	value = ci->values[0].value.string;
 
 	perl_argv = (char **)realloc (perl_argv,
-- 
1.5.4.2.133.g3d51e

-------------- next part --------------
A non-text attachment was scrubbed...
Name: not available
Type: application/pgp-signature
Size: 189 bytes
Desc: Digital signature
Url : http://mailman.verplant.org/pipermail/collectd/attachments/20080224/9a98e2fa/attachment.pgp