Mercurial > pidgin

comparison src/gaim.h @ 806:67bdecdecbb7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[gaim-migrate @ 816] yay, i think perl is finally working well committer: Tailor Script <tailor@pidgin.im>
author Eric Warmenhoven <eric@warmenhoven.org>
date Thu, 31 Aug 2000 01:40:58 +0000
parents 022048cde898
children 9d61f3d01046
comparison
equal deleted inserted replaced
805:2f0655e185b8 806:67bdecdecbb7
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: 810 $" 404 #define REVISION "gaim:$Revision: 816 $"
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
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 void perl_autoload();
739 extern int perl_load_file(char *); 739 extern int perl_load_file(char *);
740 extern void perl_end(); 740 extern void perl_end();
741 extern int perl_event(enum gaim_event, char *); 741 extern int perl_event(char *, char *);
742 extern void load_perl_script(GtkWidget *, gpointer); 742 extern void load_perl_script(GtkWidget *, gpointer);
743 extern void unload_perl_scripts(GtkWidget *, gpointer); 743 extern void unload_perl_scripts(GtkWidget *, gpointer);
744 extern void list_perl_scripts(GtkWidget *, gpointer); 744 extern void list_perl_scripts(GtkWidget *, gpointer);
745 #endif 745 #endif
746 746