mirror of
https://github.com/irssi/irssi.git
synced 2026-08-14 06:02:16 +02:00
76c6e9ab83
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
24 lines
315 B
Perl
24 lines
315 B
Perl
#
|
|
# Perl interface to irssi functions.
|
|
#
|
|
|
|
package Irssi::TextUI;
|
|
|
|
use strict;
|
|
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK);
|
|
|
|
$VERSION = "0.9";
|
|
|
|
require Exporter;
|
|
require DynaLoader;
|
|
|
|
@ISA = qw(Exporter DynaLoader);
|
|
@EXPORT = qw();
|
|
@EXPORT_OK = qw();
|
|
|
|
bootstrap Irssi::TextUI $VERSION;
|
|
|
|
Irssi::TextUI::init();
|
|
|
|
1;
|
|
|