Mercurial > pidgin3 / file diff

--- a/libpurple/plugins/perl/perl-common.c	Thu Mar 23 19:37:57 2017 +0300
+++ b/libpurple/plugins/perl/perl-common.c	Thu Mar 23 21:01:15 2017 +0300
@@ -304,7 +304,7 @@
 			break;
 
 		case PURPLE_TYPE_BOXED:
-			if (!strcmp(purple_value_get_specific_type(value), "SV"))
+			if (purple_strequal(purple_value_get_specific_type(value), "SV"))
 				purple_value_set_boxed(value, (sv == &PL_sv_undef ? NULL : sv));
 			else
 				purple_value_set_boxed(value, sv);
@@ -359,7 +359,7 @@
 			break;
 
 		case PURPLE_TYPE_BOXED:
-			if (!strcmp(purple_value_get_specific_type(value), "SV"))
+			if (purple_strequal(purple_value_get_specific_type(value), "SV"))
 			{
 				SV *sv = (SV *)purple_perl_get_boxed(value);