irssi/src/perl/common/Irssi.xs

#include "module.h"

static int initialized = FALSE;

MODULE = Irssi  PACKAGE = Irssi

PROTOTYPES: ENABLE

void
init()
CODE:
	if (initialized) return;
	perl_api_version_check("Irssi");
	initialized = TRUE;

        perl_settings_init();

void
deinit()
CODE:
	if (!initialized) return;
        perl_settings_deinit();

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);