diff --git a/plugins/lua/lua.c b/plugins/lua/lua.c
index 8d6b730e..d73fbb23 100644
--- a/plugins/lua/lua.c
+++ b/plugins/lua/lua.c
@@ -35,7 +35,7 @@
 
 #include <hexchat-plugin.h>
 
-#define WORD_ARRAY_LEN 48
+#define WORD_ARRAY_LEN 32
 
 static char plugin_name[] = "Lua";
 static char plugin_description[] = "Lua scripting interface";
diff --git a/plugins/perl/perl.c b/plugins/perl/perl.c
index cb563b38..6f30400c 100644
--- a/plugins/perl/perl.c
+++ b/plugins/perl/perl.c
@@ -283,7 +283,7 @@ list_item_to_sv ( hexchat_list *list, const char *const *fields )
 	return sv_2mortal (newRV_noinc ((SV *) hash));
 }
 
-#define WORD_ARRAY_LEN 48
+#define WORD_ARRAY_LEN 32
 
 static AV *
 array2av (char *array[])
diff --git a/src/common/hexchat.h b/src/common/hexchat.h
index 73430f0f..f7cacfcc 100644
--- a/src/common/hexchat.h
+++ b/src/common/hexchat.h
@@ -75,7 +75,7 @@
 #define DOMAINLEN	100
 #define NICKLEN		64				/* including the NULL, so 63 really */
 #define CHANLEN		300
-#define PDIWORDS	48
+#define PDIWORDS	32
 #define USERNAMELEN 10
 #define HIDDEN_CHAR	8			/* invisible character for xtext */