zynk/irssi
2
0
Fork 0
mirror of https://github.com/irssi/irssi.git synced 2026-08-11 12:53:42 +02:00
Code Issues Projects Releases Packages Wiki Activity

Dependencies finally work correctly in perl libraries (they're each compiled

Browse source 
separately now). Added statusbar code to available to perl, it's now
possible to create new statusbar items with perl scripts.

statusbar_items_redraw(char *name) can now be used to easily redraw all
named statusbar items in screen.

Probably several other changes I've already forgotten :)


git-svn-id: http://svn.irssi.org/repos/irssi/trunk@1861 dbcabf3a-b0e7-0310-adc4-f8d773084564
This commit is contained in:
Timo Sirainen 2001-10-20 19:52:07 +00:00 • committed by cras
commit 76c6e9ab83
48 changed files with 430 additions and 126 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/perl/common/.cvsignore
View file

@ -1,7 +1,7 @@
Makefile
Makefile.PL
Irssi.c
Irssi.bs
*.c
*.o
pm_to_blib
blib

9
src/perl/common/Channel.xs
View file

@ -1,4 +1,7 @@
MODULE = Irssi PACKAGE = Irssi
#include "module.h"
MODULE = Irssi::Channel PACKAGE = Irssi
PROTOTYPES: ENABLE
void
channels()
@ -18,7 +21,7 @@ OUTPUT:
RETVAL
#*******************************
MODULE = Irssi PACKAGE = Irssi::Server
MODULE = Irssi::Channel PACKAGE = Irssi::Server
#*******************************
void
@ -68,7 +71,7 @@ PPCODE:
g_slist_free(list);
#*******************************
MODULE = Irssi PACKAGE = Irssi::Channel PREFIX = channel_
MODULE = Irssi::Channel PACKAGE = Irssi::Channel PREFIX = channel_
#*******************************
void

9
src/perl/common/Core.xs
View file

@ -1,4 +1,7 @@
MODULE = Irssi PACKAGE = Irssi
#include "module.h"
MODULE = Irssi::Core PACKAGE = Irssi
PROTOTYPES: ENABLE
void
signal_emit(signal, ...)
@ -374,7 +377,7 @@ OUTPUT:
RETVAL
#*******************************
MODULE = Irssi PACKAGE = Irssi::Server
MODULE = Irssi::Core PACKAGE = Irssi::Server
#*******************************
char *
@ -389,7 +392,7 @@ OUTPUT:
RETVAL
#*******************************
MODULE = Irssi PACKAGE = Irssi::Windowitem
MODULE = Irssi::Core PACKAGE = Irssi::Windowitem
#*******************************
char *

9
src/perl/common/Ignore.xs
View file

@ -1,4 +1,7 @@
MODULE = Irssi PACKAGE = Irssi
#include "module.h"
MODULE = Irssi::Ignore PACKAGE = Irssi
PROTOTYPES: ENABLE
void
ignores()
@ -22,7 +25,7 @@ OUTPUT:
RETVAL
#*******************************
MODULE = Irssi PACKAGE = Irssi::Server
MODULE = Irssi::Ignore PACKAGE = Irssi::Server
#*******************************
int
@ -35,7 +38,7 @@ ignore_check(server, nick, host, channel, text, level)
int level
#*******************************
MODULE = Irssi PACKAGE = Irssi::Ignore PREFIX = ignore_
MODULE = Irssi::Ignore PACKAGE = Irssi::Ignore PREFIX = ignore_
#*******************************
void

2
src/perl/common/Irssi.pm
View file

@ -7,7 +7,7 @@ package Irssi;
use strict;
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK);
$VERSION = "0.8";
$VERSION = "0.9";
require Exporter;
require DynaLoader;

23
src/perl/common/Irssi.xs
View file

@ -9,12 +9,17 @@ init()
CODE:
perl_api_version_check("Irssi");
INCLUDE: Channel.xs
INCLUDE: Core.xs
INCLUDE: Ignore.xs
INCLUDE: Log.xs
INCLUDE: Masks.xs
INCLUDE: Query.xs
INCLUDE: Rawlog.xs
INCLUDE: Server.xs
INCLUDE: Settings.xs
void
deinit()
CODE:
BOOT:
irssi_boot(Channel);
irssi_boot(Core);
irssi_boot(Ignore);
irssi_boot(Log);
irssi_boot(Masks);
irssi_boot(Query);
irssi_boot(Rawlog);
irssi_boot(Server);
irssi_boot(Settings);

7
src/perl/common/Log.xs
View file

@ -1,4 +1,7 @@
MODULE = Irssi PACKAGE = Irssi
#include "module.h"
MODULE = Irssi::Log PACKAGE = Irssi
PROTOTYPES: ENABLE
void
logs()
@ -19,7 +22,7 @@ log_find(fname)
char *fname
#*******************************
MODULE = Irssi PACKAGE = Irssi::Log PREFIX = log_
MODULE = Irssi::Log PACKAGE = Irssi::Log PREFIX = log_
#*******************************
void

1
src/perl/common/Makefile.PL.in
View file

@ -2,5 +2,6 @@ use ExtUtils::MakeMaker;
WriteMakefile('NAME' => 'Irssi',
'LIBS' => '',
'OBJECT' => '$(O_FILES)',
'INC' => '-I../../.. -I@top_srcdir@ -I@top_srcdir@/src -I@top_srcdir@/src/core @GLIB_CFLAGS@',
'VERSION_FROM' => '@srcdir@/Irssi.pm');

7
src/perl/common/Masks.xs
View file

@ -1,4 +1,7 @@
MODULE = Irssi PACKAGE = Irssi
#include "module.h"
MODULE = Irssi::Masks PACKAGE = Irssi
PROTOTYPES: ENABLE
int
mask_match(mask, nick, user, host)
@ -32,7 +35,7 @@ OUTPUT:
RETVAL
#*******************************
MODULE = Irssi PACKAGE = Irssi::Server
MODULE = Irssi::Masks PACKAGE = Irssi::Server
#*******************************
int

9
src/perl/common/Query.xs
View file

@ -1,4 +1,7 @@
MODULE = Irssi PACKAGE = Irssi
#include "module.h"
MODULE = Irssi::Query PACKAGE = Irssi
PROTOTYPES: ENABLE
void
queries()
@ -20,7 +23,7 @@ OUTPUT:
RETVAL
#*******************************
MODULE = Irssi PACKAGE = Irssi::Server
MODULE = Irssi::Query PACKAGE = Irssi::Server
#*******************************
void
@ -41,7 +44,7 @@ query_find(server, nick)
char *nick
#*******************************
MODULE = Irssi PACKAGE = Irssi::Query PREFIX = query_
MODULE = Irssi::Query PACKAGE = Irssi::Query PREFIX = query_
#*******************************
void

7
src/perl/common/Rawlog.xs
View file

@ -1,4 +1,7 @@
MODULE = Irssi PACKAGE = Irssi
#include "module.h"
MODULE = Irssi::Rawlog PACKAGE = Irssi
PROTOTYPES: ENABLE
void
rawlog_set_size(lines)
@ -8,7 +11,7 @@ Irssi::Rawlog
rawlog_create()
#*******************************
MODULE = Irssi PACKAGE = Irssi::Rawlog PREFIX = rawlog_
MODULE = Irssi::Rawlog PACKAGE = Irssi::Rawlog PREFIX = rawlog_
#*******************************
void

7
src/perl/common/Server.xs
View file

@ -1,4 +1,7 @@
MODULE = Irssi PACKAGE = Irssi
#include "module.h"
MODULE = Irssi::Server PACKAGE = Irssi
PROTOTYPES: ENABLE
void
servers()
@ -36,7 +39,7 @@ server_find_chatnet(chatnet)
char *chatnet
#*******************************
MODULE = Irssi PACKAGE = Irssi::Server PREFIX = server_
MODULE = Irssi::Server PACKAGE = Irssi::Server PREFIX = server_
#*******************************
void

5
src/perl/common/Settings.xs
View file

@ -1,4 +1,7 @@
MODULE = Irssi PACKAGE = Irssi
#include "module.h"
MODULE = Irssi::Settings PACKAGE = Irssi
PROTOTYPES: ENABLE
char *
settings_get_str(key)