aboutsummaryrefslogtreecommitdiffstats
path: root/vim-mode/vim_mode.pl
diff options
context:
space:
mode:
authorSimon Ruderich <simon@ruderich.org>2010-09-27 15:26:00 +0000
committerSimon Ruderich <simon@ruderich.org>2010-09-27 15:26:00 +0000
commita5f44bd441281345c44e7f13b0c317e366117711 (patch)
tree9483b78c6b1c88142c3d64e0c2e9fbafffc92bca /vim-mode/vim_mode.pl
parentvim_mode: Add X. (diff)
downloadirssi-scripts-a5f44bd441281345c44e7f13b0c317e366117711.tar.gz
irssi-scripts-a5f44bd441281345c44e7f13b0c317e366117711.zip
vim_mode: Rename esc_buf to input_buf.
Diffstat (limited to '')
-rw-r--r--vim-mode/vim_mode.pl34
1 files changed, 17 insertions, 17 deletions
diff --git a/vim-mode/vim_mode.pl b/vim-mode/vim_mode.pl
index 742e7b8..0be39b9 100644
--- a/vim-mode/vim_mode.pl
+++ b/vim-mode/vim_mode.pl
@@ -83,9 +83,9 @@ my $non_word = '[^a-zA-Z0-9_\s]';
# GLOBAL VARIABLES
# buffer to keep track of the last N keystrokes following an Esc character.
-my @esc_buf;
-my $esc_buf_timer;
-my $esc_buf_enabled = 0;
+my @input_buf;
+my $input_buf_timer;
+my $input_buf_enabled = 0;
# flag to allow us to emulate keystrokes without re-intercepting them
my $should_ignore = 0;
@@ -724,13 +724,13 @@ sub got_key {
# Esc key
if ($key == 27) {
print "Esc seen, starting buffer" if DEBUG;
- $esc_buf_enabled = 1;
+ $input_buf_enabled = 1;
# NOTE: this timeout might be too low on laggy systems, but
# it comes at the cost of keystroke latency for things that
# contain escape sequences (arrow keys, etc)
- $esc_buf_timer
- = Irssi::timeout_add_once(10, \&handle_esc_buffer, undef);
+ $input_buf_timer
+ = Irssi::timeout_add_once(10, \&handle_input_buffer, undef);
} elsif ($mode == M_INS) {
if ($key == 3) { # Ctrl-C enter command mode
@@ -745,8 +745,8 @@ sub got_key {
}
}
- if ($esc_buf_enabled) {
- push @esc_buf, $key;
+ if ($input_buf_enabled) {
+ push @input_buf, $key;
_stop();
return;
}
@@ -756,14 +756,14 @@ sub got_key {
}
}
-sub handle_esc_buffer {
+sub handle_input_buffer {
- Irssi::timeout_remove($esc_buf_timer);
- $esc_buf_timer = undef;
+ Irssi::timeout_remove($input_buf_timer);
+ $input_buf_timer = undef;
# see what we've collected.
- print "Esc buffer contains: ", join(", ", @esc_buf) if DEBUG;
+ print "Input buffer contains: ", join(", ", @input_buf) if DEBUG;
- if (@esc_buf == 1 && $esc_buf[0] == 27) {
+ if (@input_buf == 1 && $input_buf[0] == 27) {
print "Enter Command Mode" if DEBUG;
_update_mode(M_CMD);
@@ -780,19 +780,19 @@ sub handle_esc_buffer {
# or pass it off to the command handler.
if ($mode == M_CMD) {
# command
- my $key_str = join '', map { chr } @esc_buf;
+ my $key_str = join '', map { chr } @input_buf;
if ($key_str =~ m/^\e\[([ABCD])/) {
print "Arrow key: $1" if DEBUG;
} else {
print "Dunno what that is." if DEBUG;
}
} else {
- _emulate_keystrokes(@esc_buf);
+ _emulate_keystrokes(@input_buf);
}
}
- @esc_buf = ();
- $esc_buf_enabled = 0;
+ @input_buf = ();
+ $input_buf_enabled = 0;
}
sub handle_numeric_prefix {