From eadc06ba1664102da07ec08aeca6c3e1eccc4e96 Mon Sep 17 00:00:00 2001 From: aycabta Date: Thu, 6 Jun 2019 04:25:16 +0900 Subject: Add test_ed_transpose_words_for_mbchar --- test/reline/test_key_actor_emacs.rb | 42 +++++++++++++++++++++++++++++++++++++ 1 file changed, 42 insertions(+) (limited to 'test/reline/test_key_actor_emacs.rb') diff --git a/test/reline/test_key_actor_emacs.rb b/test/reline/test_key_actor_emacs.rb index d79627a8c2..4194659631 100644 --- a/test/reline/test_key_actor_emacs.rb +++ b/test/reline/test_key_actor_emacs.rb @@ -861,6 +861,48 @@ class Reline::KeyActor::Emacs::Test < Reline::TestCase assert_cursor_max(12) end + def test_ed_transpose_words_for_mbchar + input_keys('あいう かきく') + assert_line('あいう かきく') + assert_byte_pointer_size('あいう かきく') + assert_cursor(13) + assert_cursor_max(13) + input_keys("\M-t", false) + assert_line('かきく あいう') + assert_byte_pointer_size('かきく あいう') + assert_cursor(13) + assert_cursor_max(13) + input_keys("\C-a\C-k", false) + input_keys(' あいう かきく ') + input_keys("\C-b" * 4, false) + assert_line(' あいう かきく ') + assert_byte_pointer_size(' あいう かき') + assert_cursor(13) + assert_cursor_max(18) + input_keys("\M-t", false) + assert_line(' かきく あいう ') + assert_byte_pointer_size(' かきく あいう') + assert_cursor(15) + assert_cursor_max(18) + input_keys("\C-a\C-k", false) + input_keys(' あいう かきく ') + input_keys("\C-b" * 6, false) + assert_line(' あいう かきく ') + assert_byte_pointer_size(' あいう ') + assert_cursor(9) + assert_cursor_max(18) + input_keys("\M-t", false) + assert_line(' かきく あいう ') + assert_byte_pointer_size(' かきく あいう') + assert_cursor(15) + assert_cursor_max(18) + input_keys("\M-t", false) + assert_line(' あいう かきく') + assert_byte_pointer_size(' あいう かきく') + assert_cursor(18) + assert_cursor_max(18) + end + def test_ed_digit input_keys('0123') assert_byte_pointer_size('0123') -- cgit v1.2.3