diff options
Diffstat (limited to 'perl')
| -rw-r--r-- | perl/Rspamd/Message.xs | 2 | ||||
| -rw-r--r-- | perl/Rspamd/Object.xs | 2 | ||||
| -rw-r--r-- | perl/Rspamd/Task.xs | 2 |
3 files changed, 3 insertions, 3 deletions
diff --git a/perl/Rspamd/Message.xs b/perl/Rspamd/Message.xs index e8f0571bc..c9a21886e 100644 --- a/perl/Rspamd/Message.xs +++ b/perl/Rspamd/Message.xs @@ -65,7 +65,7 @@ rspamd_message_get_recipients(message, type) CODE: retav = newAV(); #ifndef GMIME24 - rcpt = g_mime_message_get_recipients (message, type); + rcpt = (InternetAddressList *)g_mime_message_get_recipients (message, type); while (rcpt) { SV * address = newSViv(0); sv_setref_pv(address, "Mail::Rspamd::InternetAddress", (Mail__Rspamd__InternetAddress)(rcpt->address)); diff --git a/perl/Rspamd/Object.xs b/perl/Rspamd/Object.xs index cf5fffb11..2f56fb995 100644 --- a/perl/Rspamd/Object.xs +++ b/perl/Rspamd/Object.xs @@ -15,7 +15,7 @@ rspamd_object_get_content_type (mime_object) char * textdata; GMimeContentType *ct; CODE: - ct = g_mime_object_get_content_type (mime_object); + ct = (GMimeContentType *)g_mime_object_get_content_type (mime_object); textdata = g_mime_content_type_to_string (ct); RETVAL = g_mime_content_type_new_from_string (textdata); plist = g_list_prepend (plist, RETVAL); diff --git a/perl/Rspamd/Task.xs b/perl/Rspamd/Task.xs index dec521660..16719ef7b 100644 --- a/perl/Rspamd/Task.xs +++ b/perl/Rspamd/Task.xs @@ -55,7 +55,7 @@ rspamd_task_insert_result (task, metric, symbol, flag) const char *symbol double flag CODE: - insert_result (task, metric, symbol, flag); + insert_result (task, metric, symbol, flag, NULL); Mail::Rspamd::Conf rspamd_task_get_conf (task) |