comparison plugins/perl/perl.c @ 5408:2af3224b329a

[gaim-migrate @ 5784] I hope this is right :) It'll shut up the errors in the debug window anyway. committer: Tailor Script <tailor@pidgin.im>
author Christian Hammond <chipx86@chipx86.com>
date Sat, 17 May 2003 01:48:09 +0000
parents 6d1707dc8c3d
children ad445074d239
comparison
equal deleted inserted replaced
5407:a93a1a443691 5408:2af3224b329a
930 tmpbuf2[0] = '\0'; 930 tmpbuf2[0] = '\0';
931 tmpbuf3[0] = '\0'; 931 tmpbuf3[0] = '\0';
932 932
933 /* Make a pretty array of char*'s with which to call perl functions */ 933 /* Make a pretty array of char*'s with which to call perl functions */
934 switch (event) { 934 switch (event) {
935 case event_connecting:
935 case event_signon: 936 case event_signon:
936 case event_signoff: 937 case event_signoff:
937 g_snprintf(tmpbuf1, 16, "%lu", (unsigned long)arg1); 938 g_snprintf(tmpbuf1, 16, "%lu", (unsigned long)arg1);
938 buf[0] = tmpbuf1; 939 buf[0] = tmpbuf1;
939 break; 940 break;