Mercurial > pidgin
changeset 784:4c292b3f74ea
[gaim-migrate @ 794]
now all i have to do is add the UI and i'm set
committer: Tailor Script <tailor@pidgin.im>
| author | Eric Warmenhoven <eric@warmenhoven.org> |
|---|---|
| date | Tue, 29 Aug 2000 05:16:34 +0000 |
| parents | 5bad8e4d1c88 |
| children | dc9ad68fc30e |
| files | src/aim.c src/buddy.c src/gaim.h src/plugins.c |
| diffstat | 4 files changed, 19 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/src/aim.c Tue Aug 29 05:08:38 2000 +0000 +++ b/src/aim.c Tue Aug 29 05:16:34 2000 +0000 @@ -114,6 +114,9 @@ c = c->next; } #endif /* GAIM_PLUGINS */ +#ifdef USE_PERL + perl_end(); +#endif exit(0); #endif /* USE_APPLET */ @@ -555,6 +558,10 @@ gdk_threads_enter(); +#ifdef USE_PERL + perl_init(); +#endif + #ifdef USE_APPLET applet_widget_register_callback(APPLET_WIDGET(applet), "prefs",
--- a/src/buddy.c Tue Aug 29 05:08:38 2000 +0000 +++ b/src/buddy.c Tue Aug 29 05:16:34 2000 +0000 @@ -968,6 +968,9 @@ c = c->next; } #endif +#ifdef USE_PERL + perl_end(); +#endif exit(0); }
--- a/src/gaim.h Tue Aug 29 05:08:38 2000 +0000 +++ b/src/gaim.h Tue Aug 29 05:16:34 2000 +0000 @@ -401,7 +401,7 @@ #define TYPE_SIGNOFF 4 #define TYPE_KEEPALIVE 5 -#define REVISION "gaim:$Revision: 790 $" +#define REVISION "gaim:$Revision: 794 $" #define FLAPON "FLAPON\r\n\r\n" #define ROAST "Tic/Toc" @@ -732,6 +732,13 @@ /* Functions in sound.c */ extern void play_sound(int); +/* Functions in perl.c */ +#ifdef USE_PERL +extern void perl_init(); +extern int perl_load_file(char *); +extern void perl_end(); +extern int perl_event(enum gaim_event, char *); +#endif /* Functions in plugins.c */ #ifdef GAIM_PLUGINS