aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--vimput.pl24
1 files changed, 17 insertions, 7 deletions
diff --git a/vimput.pl b/vimput.pl
index 4ab42ed..fc9d38e 100644
--- a/vimput.pl
+++ b/vimput.pl
@@ -241,7 +241,7 @@ else {
$p2 = Irssi::input_add(
fileno $fuckface,
Irssi::INPUT_READ,
- \&pipe_input,
+ \&pipe_open_tmux_split,
\@ar2,
);
}
@@ -254,12 +254,22 @@ sub pipe_input {
my $input = <$read_handle>;
- if (index($input, VIMPUT_IPC_COMMAND_PREFIX) == 0) {
- print substr $input, length(VIMPUT_IPC_COMMAND_PREFIX);
- }
- else {
- print 'I: ' . $input;
- }
+ print 'I: ' . $input;
+
+ # TODO: Add $forked to not spawn more than one children unnecessarily
+
+ close $read_handle;
+ Irssi::input_remove($$pipe_tag);
+}
+
+
+sub pipe_open_tmux_split {
+ my ($args) = @_;
+ my ($read_handle, $pipe_tag) = @$args;
+
+ my $input = <$read_handle>;
+
+ print 'C: ' . $input;
# TODO: Add $forked to not spawn more than one children unnecessarily