Mercurial > pidgin
diff src/perl.c @ 3517:6b0cb60162f4
[gaim-migrate @ 3590]
Rob McQueen added a mute feature to his nice little docklet. I added a
queuing feature. Configure the docklet in the plugins dialog to queue
unread messages, and when you receive a message the docklet will eat it up
and show a little message pending icon. Click on it, and read your message.
ICQ people will like it.
I also made plugin_event use a va_list.
I bet this breaks perl.
committer: Tailor Script <tailor@pidgin.im>
author | Sean Egan <seanegan@gmail.com> |
---|---|
date | Mon, 16 Sep 2002 08:35:24 +0000 |
parents | e23909729192 |
children | cd938f18f3f8 |
line wrap: on
line diff
--- a/src/perl.c Mon Sep 16 07:04:55 2002 +0000 +++ b/src/perl.c Mon Sep 16 08:35:24 2002 +0000 @@ -662,7 +662,7 @@ XSRETURN(0); } -int perl_event(enum gaim_event event, void *arg1, void *arg2, void *arg3, void *arg4) +int perl_event(enum gaim_event event, void *arg1, void *arg2, void *arg3, void *arg4, void *arg5) { char *buf = NULL; GList *handler; @@ -754,6 +754,7 @@ arg2 ? escape_quotes(arg2) : "", (int)arg3); break; case event_quit: + case event_blist_update: buf = g_malloc0(1); break; case event_new_conversation: @@ -780,6 +781,9 @@ g_free(tmp3); } break; + case event_draw_menu: + /* we can't handle this usefully without gtk/perl bindings */ + return 0; default: debug_printf("someone forgot to handle %s in the perl binding\n", event_name(event)); return 0;