--- a/libpurple/plugins/perl/common/Notify.xs Mon Aug 22 03:40:04 2011 +0000 +++ b/libpurple/plugins/perl/common/Notify.xs Mon Aug 22 04:14:16 2011 +0000 @@ -135,7 +135,7 @@ PREINIT: GList *l; PPCODE: - l = purple_notify_user_info_get_entries(user_info); + l = purple_notify_user_info_get_entries(user_info)->head; for (; l != NULL; l = l->next) { XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::NotifyUserInfoEntry"))); }