diff -r 9f8e83051c26 -r 5d9e2581005b libpurple/plugins/perl/common/SavedStatuses.xs
--- a/libpurple/plugins/perl/common/SavedStatuses.xs	Thu Feb 06 01:10:04 2014 -0800
+++ b/libpurple/plugins/perl/common/SavedStatuses.xs	Thu Feb 06 18:56:36 2014 +0530
@@ -4,7 +4,7 @@
  * type I get errors from gcc. One way about ignoring types in a cast, and the
  * other about assigning to read-only variables.
 const Purple::StatusType
-purple_savedstatus_substatus_get_type(substatus)
+purple_savedstatus_substatus_get_status_type(substatus)
 	const Purple::SavedStatus::Sub substatus
 */
 
@@ -22,7 +22,7 @@
 	const char *title
 
 void
-purple_savedstatus_set_type(status, type)
+purple_savedstatus_set_primitive_type(status, type)
 	Purple::SavedStatus status
 	Purple::StatusPrimitive type
 
@@ -88,7 +88,7 @@
 	const Purple::SavedStatus saved_status
 
 Purple::StatusPrimitive
-purple_savedstatus_get_type(saved_status)
+purple_savedstatus_get_primitive_type(saved_status)
 	const Purple::SavedStatus saved_status
 
 const char *