shell: support bell

This commit is contained in:
Björn Linse
2018-02-07 10:23:19 +01:00
parent a6052c7307
commit 60ce7d9e0a
3 changed files with 12 additions and 5 deletions

View File

@@ -104,13 +104,16 @@ describe("shell command :!", function()
]])
feed([[<CR>]])
-- Print BELL control code. #4338
screen.bell = false
feed([[:!printf '\x07\x07\x07\x07text'<CR>]])
screen:expect([[
~ |
:!printf '\x07\x07\x07\x07text' |
^G^G^G^Gtext |
text |
Press ENTER or type command to continue^ |
]])
]], nil, nil, function()
eq(true, screen.bell)
end)
feed([[<CR>]])
-- Print BS control code.
feed([[:echo system('printf ''\x08\n''')<CR>]])