mirror of
https://github.com/irssi/irssi.git
synced 2026-08-15 14:42:08 +02:00
6c2f9c685a
commands. /RUN -> /SCRIPT LOAD, /PERLFLUSH -> /SCRIPT FLUSH, /PERL -> /SCRIPT EXEC. Added /SCRIPT UNLOAD, /SCRIPT LIST. Lots of cleanups. filename_complete() has extra argument for "default directory" which is searched if no path is given when completing. git-svn-id: http://svn.irssi.org/repos/irssi/trunk@1680 dbcabf3a-b0e7-0310-adc4-f8d773084564
21 lines
429 B
C
21 lines
429 B
C
#ifdef NEED_PERL_H
|
|
# include <EXTERN.h>
|
|
# ifndef _SEM_SEMUN_UNDEFINED
|
|
# define HAS_UNION_SEMUN
|
|
# endif
|
|
# include <perl.h>
|
|
|
|
# undef _
|
|
# undef PACKAGE
|
|
|
|
/* For compatibility with perl 5.004 and older */
|
|
# ifndef ERRSV
|
|
# define ERRSV GvSV(errgv)
|
|
# endif
|
|
|
|
extern PerlInterpreter *my_perl; /* must be called my_perl or some perl implementations won't work */
|
|
#endif
|
|
|
|
#include "common.h"
|
|
|
|
#define MODULE_NAME "irssi-perl"
|