--- a/libpurple/plugins/perl/common/Cmds.xs Sun Sep 22 21:56:10 2013 +0530 +++ b/libpurple/plugins/perl/common/Cmds.xs Sun Sep 22 22:19:30 2013 +0530 @@ -33,7 +33,7 @@ const_iv(VERY_LOW), const_iv(LOW), const_iv(DEFAULT), - const_iv(PRPL), + const_iv(PROTOCOL), const_iv(PLUGIN), const_iv(ALIAS), const_iv(HIGH),