changeset
[gaim-migrate @ 7472]
Wed, 24 Sep 2003 01:06:56 +0000
- author
- Christian Hammond <chipx86@chipx86.com>
- date
- Wed, 24 Sep 2003 01:06:56 +0000
- changeset 6925
- ace22b159921
- parent 6924
- 67d61490f6ac
- child 6926
- cfd8456ee7dd
[gaim-migrate @ 7472]
Don't free our string if it's the same one we're going to set. Oh yes, and
modifying params in signal callbacks now works. The monkeys will be
pleased.
| plugins/perl/perl-handlers.c | file | annotate | diff | comparison | revisions |
--- a/plugins/perl/perl-handlers.c Wed Sep 24 01:00:06 2003 +0000 +++ b/plugins/perl/perl-handlers.c Wed Sep 24 01:06:56 2003 +0000 @@ -159,8 +159,12 @@ break; case GAIM_TYPE_STRING: - g_free(*((char **)copy_args[i])); - *((char **)copy_args[i]) = g_strdup(SvPV(sv_args[i], na)); + if (strcmp(*((char **)copy_args[i]), SvPVX(sv_args[i]))) + { + g_free(*((char **)copy_args[i])); + *((char **)copy_args[i]) = + g_strdup(SvPV(sv_args[i], na)); + } break; case GAIM_TYPE_POINTER:
