diff options
| -rw-r--r-- | INSTALL | 3 | ||||
| -rw-r--r-- | TODO | 2 | ||||
| -rw-r--r-- | acconfig.h | 1 | ||||
| -rw-r--r-- | configure.in | 7 | ||||
| -rw-r--r-- | src/perl/module.h | 5 | ||||
| -rw-r--r-- | src/perl/perl-common.c | 4 | ||||
| -rw-r--r-- | src/perl/perl-common.h | 6 | ||||
| -rw-r--r-- | src/perl/perl-core.c | 5 |
8 files changed, 0 insertions, 33 deletions
@@ -47,9 +47,6 @@ as well. If you want to use only curses calls for some reason, use Perl support generates most of the problems. There's quite a many things that can go wrong: - - Perl 5.004 doesn't work by default, you'll need to edit - src/perl/irssi-core.pl and remove all lines with "delete_package" - in them. - Compiling fails if you compile irssi with GCC in a system that has perl compiled with some other C compiler. Very common problem with non-Linux/BSD systems. You'll need to edit src/perl/*/Makefile files @@ -568,8 +568,6 @@ FIXME translate signal_add() it - Irssi::keyboard_entry_redirect() - Irssi::format_get_text() - - "use Symbol(delete_package)" doesn't work with perl 5.004 and crashes - irssi .. at least remove the crashing! - Irssi::signal_remove() could accept hashes - /command parameter parser so it'd be easier to handle -options etc. - Try to get the Makefiles generated so that compiling with GCC would @@ -1,7 +1,6 @@ /* misc.. */ #undef HAVE_IPV6 #undef HAVE_SOCKS_H -#undef HAVE_PL_PERL #undef HAVE_STATIC_PERL #undef HAVE_GMODULE #undef HAVE_GC_H diff --git a/configure.in b/configure.in index e50f647e..b33f4432 100644 --- a/configure.in +++ b/configure.in @@ -477,13 +477,6 @@ if test "$want_perl" != "no"; then else PERL_LDFLAGS=`$perlpath -MExtUtils::Embed -e ldopts 2>/dev/null` - dnl * Perl 5.004 and older use perl_xxx variables while - dnl * later use PL_perl_xxx variables .. - have_pl_perl=`$perlpath -e 'print $] < 5.005 ? "no" : "yes";'` - if test "x$have_pl_perl" = "xyes"; then - AC_DEFINE(HAVE_PL_PERL) - fi - if test "x$DYNLIB_MODULES" = "xno" -a "$want_perl" != "static"; then dnl * wanted perl as module, won't get it. want_perl=static diff --git a/src/perl/module.h b/src/perl/module.h index 9a2e8063..2fd15137 100644 --- a/src/perl/module.h +++ b/src/perl/module.h @@ -10,11 +10,6 @@ # 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 diff --git a/src/perl/perl-common.c b/src/perl/perl-common.c index 9fe8d587..517e6102 100644 --- a/src/perl/perl-common.c +++ b/src/perl/perl-common.c @@ -48,10 +48,6 @@ typedef struct { PERL_OBJECT_FUNC fill_func; } PERL_OBJECT_REC; -#ifndef HAVE_PL_PERL -STRLEN PL_na; -#endif - static GHashTable *iobject_stashes, *plain_stashes; static GSList *use_protocols; diff --git a/src/perl/perl-common.h b/src/perl/perl-common.h index 32e6e655..e2992ee9 100644 --- a/src/perl/perl-common.h +++ b/src/perl/perl-common.h @@ -26,12 +26,6 @@ char *perl_function_get_package(const char *function); Increases the reference counter for the return value. */ SV *perl_func_sv_inc(SV *func, const char *package); -/* For compatibility with perl 5.004 and older */ -#ifndef HAVE_PL_PERL -# define PL_sv_undef sv_undef -extern STRLEN PL_na; -#endif - #ifndef pTHX_ # define pTHX_ #endif diff --git a/src/perl/perl-core.c b/src/perl/perl-core.c index 1f6188be..5e401ead 100644 --- a/src/perl/perl-core.c +++ b/src/perl/perl-core.c @@ -34,11 +34,6 @@ #include "XSUB.h" #include "irssi-core.pl.h" -/* For compatibility with perl 5.004 and older */ -#ifndef HAVE_PL_PERL -# define PL_perl_destruct_level perl_destruct_level -#endif - GSList *perl_scripts; PerlInterpreter *my_perl; |