Mercurial > pidgin
comparison src/plugins.c @ 1100:f168625b63fe
[gaim-migrate @ 1110]
some perl updates, and indication of which account got warned
committer: Tailor Script <tailor@pidgin.im>
| author | Eric Warmenhoven <eric@warmenhoven.org> |
|---|---|
| date | Thu, 16 Nov 2000 08:48:01 +0000 |
| parents | 4927ce25d8cc |
| children | cd96ca1aed02 |
comparison
equal
deleted
inserted
replaced
| 1099:4416ead31db7 | 1100:f168625b63fe |
|---|---|
| 617 break; | 617 break; |
| 618 } | 618 } |
| 619 return buf; | 619 return buf; |
| 620 } | 620 } |
| 621 | 621 |
| 622 void plugin_event(enum gaim_event event, void *arg1, void *arg2, void *arg3, void *arg4) { | 622 int plugin_event(enum gaim_event event, void *arg1, void *arg2, void *arg3, void *arg4) { |
| 623 #ifdef USE_PERL | 623 #ifdef USE_PERL |
| 624 char buf[BUF_LONG]; | 624 char buf[BUF_LONG]; |
| 625 char *tmp; | 625 char *tmp; |
| 626 #endif | 626 #endif |
| 627 #ifdef GAIM_PLUGINS | 627 #ifdef GAIM_PLUGINS |
| 819 break; | 819 break; |
| 820 } | 820 } |
| 821 tmp = event_name(event); | 821 tmp = event_name(event); |
| 822 g_snprintf(debug_buff, sizeof debug_buff, "%s: %s\n", tmp, buf); | 822 g_snprintf(debug_buff, sizeof debug_buff, "%s: %s\n", tmp, buf); |
| 823 debug_print(debug_buff); | 823 debug_print(debug_buff); |
| 824 perl_event(tmp, buf); | 824 return perl_event(tmp, buf); |
| 825 #else | |
| 826 return 0; | |
| 825 #endif | 827 #endif |
| 826 } | 828 } |
