def bind_termcap_arrow_keys(map)
xkeymap = @_rl_keymap
@_rl_keymap = map
rl_bind_keyseq_if_unbound(@_rl_term_ku, :rl_get_previous_history)
rl_bind_keyseq_if_unbound(@_rl_term_kd, :rl_get_next_history)
rl_bind_keyseq_if_unbound(@_rl_term_kr, :rl_forward_char)
rl_bind_keyseq_if_unbound(@_rl_term_kl, :rl_backward_char)
rl_bind_keyseq_if_unbound(@_rl_term_kh, :rl_beg_of_line)
rl_bind_keyseq_if_unbound(@_rl_term_at7, :rl_end_of_line)
rl_bind_keyseq_if_unbound(@_rl_term_kD, :rl_delete)
rl_bind_keyseq_if_unbound(@_rl_term_kI, :rl_overwrite_mode)
@_rl_keymap = xkeymap
end