--- a/libpurple/plugins/perl/common/Xfer.xs Fri Sep 06 17:16:15 2013 +0530 +++ b/libpurple/plugins/perl/common/Xfer.xs Fri Sep 06 17:25:51 2013 +0530 @@ -9,7 +9,7 @@ HV *status_stash = gv_stashpv("Purple::Xfer::Status", 1); static const constiv *civ, type_const_iv[] = { -#define const_iv(name) {#name, (IV)PURPLE_XFER_##name} +#define const_iv(name) {#name, (IV)PURPLE_XFER_TYPE_##name} const_iv(UNKNOWN), const_iv(SEND), const_iv(RECEIVE),