26 lines
710 B
C
26 lines
710 B
C
--- 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
|
|
{
|