Mercurial > pidgin.yaz
changeset 28717:911560d0c36f
merge of '0818f22621a06fa5a61bba3d4a10de1e42813cfa'
and '4b9ca13f2987492c10363d58816d0a2e5bdee54c'
author | Paul Aurich <paul@darkrain42.org> |
---|---|
date | Fri, 09 Oct 2009 01:39:41 +0000 |
parents | 203839bc0f7c (current diff) 1e5b69e67677 (diff) |
children | cb4853d04b92 3061a0c72b26 |
files | |
diffstat | 1 files changed, 8 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/libpurple/plugins/perl/common/Prpl.xs Thu Oct 08 21:31:18 2009 +0000 +++ b/libpurple/plugins/perl/common/Prpl.xs Fri Oct 09 01:39:41 2009 +0000 @@ -62,11 +62,15 @@ PREINIT: PurplePluginProtocolInfo *prpl_info; CODE: - prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(gc->prpl); - if (prpl_info && prpl_info->send_raw != NULL) { - RETVAL = prpl_info->send_raw(gc, str, strlen(str)); - } else { + if (!gc) RETVAL = 0; + else { + prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(gc->prpl); + if (prpl_info && prpl_info->send_raw != NULL) { + RETVAL = prpl_info->send_raw(gc, str, strlen(str)); + } else { + RETVAL = 0; + } } OUTPUT: RETVAL