comparison plugins/perl/perl-common.c @ 7239:3875b924d622

[gaim-migrate @ 7814] This should fix the problem where sending-im-msg causes segfaults. Other signal types are bound to also cause this problem. Yay for pointer madness and copy-and-paste-related issues. committer: Tailor Script <tailor@pidgin.im>
author Christian Hammond <chipx86@chipx86.com>
date Sun, 12 Oct 2003 05:25:41 +0000
parents 11d05ddf30a3
children d3a7ff6a91bb
comparison
equal deleted inserted replaced
7238:60aa7d4ebfba 7239:3875b924d622
543 543
544 case GAIM_TYPE_STRING: 544 case GAIM_TYPE_STRING:
545 if ((*copy_arg = (void *)va_arg(*args, char *)) == NULL) 545 if ((*copy_arg = (void *)va_arg(*args, char *)) == NULL)
546 return &PL_sv_undef; 546 return &PL_sv_undef;
547 547
548 return newSVGChar(*(char **)*copy_arg); 548 return newSVGChar(*(char *)*copy_arg);
549 549
550 case GAIM_TYPE_POINTER: 550 case GAIM_TYPE_POINTER:
551 if ((*copy_arg = (void *)va_arg(*args, void *)) == NULL) 551 if ((*copy_arg = (void *)va_arg(*args, void *)) == NULL)
552 return &PL_sv_undef; 552 return &PL_sv_undef;
553 553