--- a/libpurple/plugins/perl/common/Connection.xs Thu Jul 11 00:12:51 2013 +0530 +++ b/libpurple/plugins/perl/common/Connection.xs Thu Jul 11 04:16:01 2013 +0530 @@ -8,7 +8,7 @@ HV *stash = gv_stashpv("Purple::Connection::State", 1); static const constiv *civ, const_iv[] = { -#define const_iv(name) {#name, (IV)PURPLE_##name} +#define const_iv(name) {#name, (IV)PURPLE_CONNECTION_##name} const_iv(DISCONNECTED), const_iv(CONNECTED), const_iv(CONNECTING),