From: Sebastian Harl <sh@tokkee.org>
Date: Mon, 25 Feb 2008 07:28:39 +0000 (+0100)
Subject: perl plugin: Warn if "EnableDebugger" has been used after "LoadPlugin".
X-Git-Tag: collectd-4.2.5~14
X-Git-Url: https://git.tokkee.org/?a=commitdiff_plain;h=49b54bac99ab5c853826507ea525ba915f35eaa6;p=collectd.git

perl plugin: Warn if "EnableDebugger" has been used after "LoadPlugin".

Signed-off-by: Sebastian Harl <sh@tokkee.org>
Signed-off-by: Florian Forster <octo@huhu.verplant.org>
---

diff --git a/src/perl.c b/src/perl.c
index 1ed9d003..50d189f8 100644
--- a/src/perl.c
+++ b/src/perl.c
@@ -940,6 +940,11 @@ static int perl_config_includedir (oconfig_item_t *ci)
 			|| (OCONFIG_TYPE_STRING != ci->values[0].type))
 		return 1;
 
+	if (NULL == aTHX) {
+		log_warn ("EnableDebugger has no effects if used after LoadPlugin.");
+		return 1;
+	}
+
 	value = ci->values[0].value.string;
 
 	if (NULL == perl) {