aboutsummaryrefslogtreecommitdiffstats
path: root/lib/kernel/test
diff options
context:
space:
mode:
authorBruce Yinhe <[email protected]>2014-10-06 14:54:33 +0200
committerBruce Yinhe <[email protected]>2014-10-06 14:54:33 +0200
commit610c746c0795ec9a96f960ea6461ef56d6d2ee24 (patch)
tree34a02f0e9d607368344a328a2506688e68679658 /lib/kernel/test
parentac3afd00be9a84a6c30c408256c9c41319c61d8d (diff)
parenta675467f2bba5c4e7fe643a46d3a48a3cf0b020a (diff)
downloadotp-610c746c0795ec9a96f960ea6461ef56d6d2ee24.tar.gz
otp-610c746c0795ec9a96f960ea6461ef56d6d2ee24.tar.bz2
otp-610c746c0795ec9a96f960ea6461ef56d6d2ee24.zip
Merge branch 'maint'
Diffstat (limited to 'lib/kernel/test')
-rw-r--r--lib/kernel/test/interactive_shell_SUITE.erl3
1 files changed, 3 insertions, 0 deletions
diff --git a/lib/kernel/test/interactive_shell_SUITE.erl b/lib/kernel/test/interactive_shell_SUITE.erl
index a375adceea..7f6024f642 100644
--- a/lib/kernel/test/interactive_shell_SUITE.erl
+++ b/lib/kernel/test/interactive_shell_SUITE.erl
@@ -296,6 +296,7 @@ ctrl_keys(doc) -> ["Tests various control keys"];
ctrl_keys(_Conf) when is_list(_Conf) ->
Cu=[$\^u],
Cw=[$\^w],
+ Cy=[$\^y],
Home=[27,$O,$H],
End=[27,$O,$F],
rtnode([{putline,""},
@@ -308,6 +309,8 @@ ctrl_keys(_Conf) when is_list(_Conf) ->
{putline,"world\"."++Home++"\"hello "}, % test <HOME>
{getline,"\"hello world\""},
{putline,"world"++Home++"\"hello "++End++"\"."}, % test <END>
+ {getline,"\"hello world\""},
+ {putline,"\"hello world\""++Cu++Cy++"."},
{getline,"\"hello world\""}]
++wordLeft()++wordRight(),[]).