comparison: src/perl.c
src/perl.c
- changeset 3166
- 6738e212e4a8
- parent 3033
- 1f078ab46e76
- child 3167
- 30c514c365e0
equal
deleted
inserted
replaced
| 3165:723be0ba502b | 3166:6738e212e4a8 |
|---|---|
| 715 case event_chat_recv: | 715 case event_chat_recv: |
| 716 { | 716 { |
| 717 char *t3, *t4; | 717 char *t3, *t4; |
| 718 t3 = g_strdup(escape_quotes(arg3)); | 718 t3 = g_strdup(escape_quotes(arg3)); |
| 719 t4 = arg4 ? g_strdup(escape_quotes(arg4)) : g_malloc0(1); | 719 t4 = arg4 ? g_strdup(escape_quotes(arg4)) : g_malloc0(1); |
| 720 buf = g_strdup_printf("'%lu','%d','%s','%s'", (unsigned long)arg1, (int)arg2, t3, t4); | 720 buf = g_strdup_printf("'%lu','%d','%s','%s'", (unsigned long)arg1, (int)arg2, *t3, *t4); |
| 721 g_free(t3); | 721 g_free(t3); |
| 722 g_free(t4); | 722 g_free(t4); |
| 723 } | 723 } |
| 724 break; | 724 break; |
| 725 case event_chat_send_invite: | 725 case event_chat_send_invite: |
