2001-06-27 22:56:17 +00:00
|
|
|
#
|
|
|
|
|
# Perl interface to irssi functions.
|
|
|
|
|
#
|
|
|
|
|
|
|
|
|
|
package Irssi::UI;
|
|
|
|
|
|
|
|
|
|
use strict;
|
|
|
|
|
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK);
|
|
|
|
|
|
2001-10-20 19:52:07 +00:00
|
|
|
$VERSION = "0.9";
|
2001-06-27 22:56:17 +00:00
|
|
|
|
|
|
|
|
require Exporter;
|
|
|
|
|
require DynaLoader;
|
|
|
|
|
|
|
|
|
|
@ISA = qw(Exporter DynaLoader);
|
2001-07-12 19:51:33 +00:00
|
|
|
@EXPORT = qw();
|
2001-06-27 22:56:17 +00:00
|
|
|
@EXPORT_OK = qw();
|
|
|
|
|
|
2001-10-24 23:17:27 +00:00
|
|
|
bootstrap Irssi::UI $VERSION if (!Irssi::Core::is_static());
|
2001-06-27 22:56:17 +00:00
|
|
|
|
|
|
|
|
Irssi::UI::init();
|
|
|
|
|
|
2001-12-10 20:23:50 +00:00
|
|
|
Irssi::EXPORT_ALL();
|
|
|
|
|
|
2001-06-27 22:56:17 +00:00
|
|
|
1;
|