Print current input contents

Yes! Managed to read the current input line contents. Print this out on
every key press.

Thanks to these resources:

Key press signal:
https://github.com/shabble/irssi-docs/wiki/Signals#gui-readlinec

Getting input line contents:
https://github.com/shabble/irssi-docs/wiki/Irssi#getting-the-input-field-contents
https://github.com/irssi/scripts.irssi.org/blob/master/scripts/per_window_prompt.pl

1 files changed, 20 insertions, 0 deletions

diff --git a/vimput.pl b/vimput.pl
new file mode 100644
index 0000000..fc50740
--- /dev/null
+++ b/vimput.pl
@@ -0,0 +1,20 @@
+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);
+};