--- src/scripting/perl/hooks.h.orig	2009-02-09 23:20:48.000000000 -0800
+++ src/scripting/perl/hooks.h	2009-02-09 23:21:03.000000000 -0800
@@ -2,6 +2,10 @@
 #ifndef EL__SCRIPTING_PERL_HOOKS_H
 #define EL__SCRIPTING_PERL_HOOKS_H
 
+/* src/util/lists.h */
+#undef LIST_HEAD
+#define LIST_HEAD(x) x *next; x *prev
+
 struct event_hook_info;
 
 extern struct event_hook_info perl_scripting_hooks[];
