diff --git a/mail/p5-Sendmail-Milter/files/patch-callbacks.c b/mail/p5-Sendmail-Milter/files/patch-callbacks.c
index aa5cc3c0d175..c184f71ded7e 100644
--- a/mail/p5-Sendmail-Milter/files/patch-callbacks.c
+++ b/mail/p5-Sendmail-Milter/files/patch-callbacks.c
@@ -1,14 +1,25 @@
 --- callbacks.c.orig	2000-07-19 06:20:36 UTC
 +++ callbacks.c
+@@ -31,8 +31,8 @@
+ /* Macro for pushing the SMFICTX * argument */
+ 
+ #define XPUSHs_Sendmail_Milter_Context	\
+-	(XPUSHs(sv_2mortal(sv_setref_iv(NEWSV(25, 0), \
+-		"Sendmail::Milter::Context", (IV) ctx))))
++	XPUSHs(sv_2mortal(sv_setref_iv(NEWSV(25, 0), \
++		"Sendmail::Milter::Context", (IV) ctx)))
+ 
+ /* Global callback variable names */
+ 
 @@ -489,6 +489,11 @@ callback_ssockaddr(pTHX_ SV *callback, SMFICTX *ctx, c
  	{
  		XPUSHs(sv_2mortal(newSVpvn((char *)arg_sa,
  					   sizeof(_SOCK_ADDR))));
 +	}
 +	else if (arg_sa->sa_family == AF_INET6)
 +	{
 +		XPUSHs(sv_2mortal(newSVpvn((char *)arg_sa,
 +				   sizeof(struct sockaddr_in6))));
  	}
  	else
  	{