X-Git-Url: http://git.silcnet.org/gitweb/?a=blobdiff_plain;f=apps%2Firssi%2Fsrc%2Fperl%2Fsilc%2FSilc.xs;fp=apps%2Firssi%2Fsrc%2Fperl%2Fsilc%2FSilc.xs;h=0000000000000000000000000000000000000000;hb=72c2de619079457f7a68100eb13385275a424a23;hp=b80f651d8571919982ffb7d256fbaff2ebf03577;hpb=e7b6c157b80152bf9fb9266e6bdd93f9fb0db776;p=runtime.git diff --git a/apps/irssi/src/perl/silc/Silc.xs b/apps/irssi/src/perl/silc/Silc.xs deleted file mode 100644 index b80f651d..00000000 --- a/apps/irssi/src/perl/silc/Silc.xs +++ /dev/null @@ -1,37 +0,0 @@ -#include "module.h" - -static void perl_silc_server_fill_hash(HV *hv, SILC_SERVER_REC *server) -{ - perl_server_fill_hash(hv, (SERVER_REC *) server); - - hv_store(hv, "umode", 5, newSViv(server->umode), 0); -} - -MODULE = Irssi::Silc PACKAGE = Irssi::Silc - -PROTOTYPES: ENABLE - -void -init() -PREINIT: - static int initialized = FALSE; - int chat_type; -CODE: - if (initialized) return; - perl_api_version_check("Irssi::Silc"); - initialized = TRUE; - - chat_type = chat_protocol_lookup("SILC"); - - irssi_add_object(module_get_uniq_id("SERVER", 0), - chat_type, "Irssi::Silc::Server", - (PERL_OBJECT_FUNC) perl_silc_server_fill_hash); - -void -deinit() -CODE: - -BOOT: - irssi_boot(Silc__Channel); - irssi_boot(Silc__Query); - irssi_boot(Silc__Server);