diff options
Diffstat (limited to '')
-rw-r--r-- | history-search/history_search.pl | 44 |
1 files changed, 0 insertions, 44 deletions
diff --git a/history-search/history_search.pl b/history-search/history_search.pl index d54e264..0a2282e 100644 --- a/history-search/history_search.pl +++ b/history-search/history_search.pl @@ -148,47 +148,3 @@ sub UNLOAD { print Dumper(\@_); uninstall_prompt(); } -# my $prev_typed; -# my $prev_startpos; -# my $enabled = 0; - -# Irssi::command_bind('history_search', sub { -# $enabled = ! $enabled; -# if ($enabled) { -# $prev_typed = ''; -# $prev_startpos = 0; -# } -# }); - -# Irssi::signal_add_last 'gui key pressed' => sub { -# my ($key) = @_; - -# if ($key == 10) { # enter -# $enabled = 0; -# } - -# return unless $enabled; - -# my $prompt = Irssi::parse_special('$L'); -# my $pos = Irssi::gui_input_get_pos(); - -# if ($pos < $prev_startpos) { -# $enabled = 0; -# return; -# } - -# my $typed = substr($prompt, $prev_startpos, ($pos-$prev_startpos)); - -# my $history = ($typed eq '') ? '' : Irssi::parse_special('$!' . $typed . '!'); -# if ($history eq '') { -# $history = $typed; -# } - -# my $startpos = index(lc($history), lc($typed)); - -# Irssi::gui_input_set($history); -# Irssi::gui_input_set_pos($startpos + length($typed)); - -# $prev_typed = $typed; -# $prev_startpos = $startpos; -# }; |