mirror of
https://github.com/irssi/irssi.git
synced 2026-08-11 12:53:42 +02:00
--enable-perl* -> --with-perl*. Added a new libfe_perl which handles /SCRIPT
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
This commit is contained in:
parent
2d5edb8c4d
commit
6c2f9c685a
26 changed files with 1052 additions and 506 deletions
|
|
@ -1,20 +1,21 @@
|
|||
#include <EXTERN.h>
|
||||
#ifndef _SEM_SEMUN_UNDEFINED
|
||||
#define HAS_UNION_SEMUN
|
||||
#endif
|
||||
#include <perl.h>
|
||||
#ifdef NEED_PERL_H
|
||||
# include <EXTERN.h>
|
||||
# ifndef _SEM_SEMUN_UNDEFINED
|
||||
# define HAS_UNION_SEMUN
|
||||
# endif
|
||||
# include <perl.h>
|
||||
|
||||
#undef _
|
||||
#undef PACKAGE
|
||||
# undef _
|
||||
# undef PACKAGE
|
||||
|
||||
/* For compatibility with perl 5.004 and older */
|
||||
#ifndef ERRSV
|
||||
# define ERRSV GvSV(errgv)
|
||||
# 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"
|
||||
|
||||
extern GSList *perl_scripts;
|
||||
extern PerlInterpreter *my_perl; /* must be called my_perl or some perl implementations won't work */
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue