use strict;

use vars qw($VERSION %IRSSI);
use Irssi;

$VERSION = '1.0';
%IRSSI = {
	authors     => 'Teddy Wing',
	contact     => 'irssi@teddywing.com',
	name        => 'Vimput',
	description => '',
	license     => 'GPL',
};


Irssi::signal_add_last 'gui key pressed' => sub {
	my ($key) = @_;

	print Irssi::parse_special('$L', undef, 0);
};