comparison src/gaim.h @ 800:022048cde898

[gaim-migrate @ 810] perl! yay! finally :-P committer: Tailor Script <tailor@pidgin.im>
author Eric Warmenhoven <eric@warmenhoven.org>
date Wed, 30 Aug 2000 19:45:01 +0000
parents 9dc39872e1f9
children 67bdecdecbb7
comparison
equal deleted inserted replaced
799:72f8ac951c11 800:022048cde898
399 #define TYPE_DATA 2 399 #define TYPE_DATA 2
400 #define TYPE_ERROR 3 400 #define TYPE_ERROR 3
401 #define TYPE_SIGNOFF 4 401 #define TYPE_SIGNOFF 4
402 #define TYPE_KEEPALIVE 5 402 #define TYPE_KEEPALIVE 5
403 403
404 #define REVISION "gaim:$Revision: 808 $" 404 #define REVISION "gaim:$Revision: 810 $"
405 #define FLAPON "FLAPON\r\n\r\n" 405 #define FLAPON "FLAPON\r\n\r\n"
406 406
407 #define ROAST "Tic/Toc" 407 #define ROAST "Tic/Toc"
408 408
409 409
733 extern void play_sound(int); 733 extern void play_sound(int);
734 734
735 /* Functions in perl.c */ 735 /* Functions in perl.c */
736 #ifdef USE_PERL 736 #ifdef USE_PERL
737 extern void perl_init(); 737 extern void perl_init();
738 extern void perl_autoload();
738 extern int perl_load_file(char *); 739 extern int perl_load_file(char *);
739 extern void perl_end(); 740 extern void perl_end();
740 extern int perl_event(enum gaim_event, char *); 741 extern int perl_event(enum gaim_event, char *);
741 extern void load_perl_script(GtkWidget *, gpointer); 742 extern void load_perl_script(GtkWidget *, gpointer);
742 extern void unload_perl_scripts(GtkWidget *, gpointer); 743 extern void unload_perl_scripts(GtkWidget *, gpointer);