mirror of
https://github.com/neovim/neovim.git
synced 2025-09-06 03:18:16 +00:00
65fb622000
Hope this will make people using feed_command less likely: this hides bugs. Already found at least two: 1. msgpackparse() will show internal error: hash_add() in case of duplicate keys, though it will still work correctly. Currently silenced. 2. ttimeoutlen was spelled incorrectly, resulting in option not being set when expected. Test was still functioning somehow though. Currently fixed.
102 lines
3.1 KiB
Lua
102 lines
3.1 KiB
Lua
local helpers = require('test.functional.helpers')(after_each)
|
|
local clear, source = helpers.clear, helpers.source
|
|
local eq, eval, command = helpers.eq, helpers.eval, helpers.command
|
|
|
|
if helpers.pending_win32(pending) then return end
|
|
|
|
describe('Test for delete()', function()
|
|
before_each(clear)
|
|
|
|
it('file delete', function()
|
|
command('split Xfile')
|
|
command("call setline(1, ['a', 'b'])")
|
|
command('wq')
|
|
eq(eval("['a', 'b']"), eval("readfile('Xfile')"))
|
|
eq(0, eval("delete('Xfile')"))
|
|
eq(-1, eval("delete('Xfile')"))
|
|
end)
|
|
|
|
it('directory delete', function()
|
|
command("call mkdir('Xdir1')")
|
|
eq(1, eval("isdirectory('Xdir1')"))
|
|
eq(0, eval("delete('Xdir1', 'd')"))
|
|
eq(0, eval("isdirectory('Xdir1')"))
|
|
eq(-1, eval("delete('Xdir1', 'd')"))
|
|
end)
|
|
it('recursive delete', function()
|
|
command("call mkdir('Xdir1')")
|
|
command("call mkdir('Xdir1/subdir')")
|
|
command("call mkdir('Xdir1/empty')")
|
|
command('split Xdir1/Xfile')
|
|
command("call setline(1, ['a', 'b'])")
|
|
command('w')
|
|
command('w Xdir1/subdir/Xfile')
|
|
command('close')
|
|
|
|
eq(1, eval("isdirectory('Xdir1')"))
|
|
eq(eval("['a', 'b']"), eval("readfile('Xdir1/Xfile')"))
|
|
eq(1, eval("isdirectory('Xdir1/subdir')"))
|
|
eq(eval("['a', 'b']"), eval("readfile('Xdir1/subdir/Xfile')"))
|
|
eq(1, eval("isdirectory('Xdir1/empty')"))
|
|
eq(0, eval("delete('Xdir1', 'rf')"))
|
|
eq(0, eval("isdirectory('Xdir1')"))
|
|
eq(-1, eval("delete('Xdir1', 'd')"))
|
|
end)
|
|
|
|
it('symlink delete', function()
|
|
source([[
|
|
split Xfile
|
|
call setline(1, ['a', 'b'])
|
|
wq
|
|
silent !ln -s Xfile Xlink
|
|
]])
|
|
-- Delete the link, not the file
|
|
eq(0, eval("delete('Xlink')"))
|
|
eq(-1, eval("delete('Xlink')"))
|
|
eq(0, eval("delete('Xfile')"))
|
|
end)
|
|
|
|
it('symlink directory delete', function()
|
|
command("call mkdir('Xdir1')")
|
|
command("silent !ln -s Xdir1 Xlink")
|
|
eq(1, eval("isdirectory('Xdir1')"))
|
|
eq(1, eval("isdirectory('Xlink')"))
|
|
-- Delete the link, not the directory
|
|
eq(0, eval("delete('Xlink')"))
|
|
eq(-1, eval("delete('Xlink')"))
|
|
eq(0, eval("delete('Xdir1', 'd')"))
|
|
end)
|
|
|
|
it('symlink recursive delete', function()
|
|
source([[
|
|
call mkdir('Xdir3')
|
|
call mkdir('Xdir3/subdir')
|
|
call mkdir('Xdir4')
|
|
split Xdir3/Xfile
|
|
call setline(1, ['a', 'b'])
|
|
w
|
|
w Xdir3/subdir/Xfile
|
|
w Xdir4/Xfile
|
|
close
|
|
silent !ln -s ../Xdir4 Xdir3/Xlink
|
|
]])
|
|
|
|
eq(1, eval("isdirectory('Xdir3')"))
|
|
eq(eval("['a', 'b']"), eval("readfile('Xdir3/Xfile')"))
|
|
eq(1, eval("isdirectory('Xdir3/subdir')"))
|
|
eq(eval("['a', 'b']"), eval("readfile('Xdir3/subdir/Xfile')"))
|
|
eq(1, eval("isdirectory('Xdir4')"))
|
|
eq(1, eval("isdirectory('Xdir3/Xlink')"))
|
|
eq(eval("['a', 'b']"), eval("readfile('Xdir4/Xfile')"))
|
|
|
|
eq(0, eval("delete('Xdir3', 'rf')"))
|
|
eq(0, eval("isdirectory('Xdir3')"))
|
|
eq(-1, eval("delete('Xdir3', 'd')"))
|
|
-- symlink is deleted, not the directory it points to
|
|
eq(1, eval("isdirectory('Xdir4')"))
|
|
eq(eval("['a', 'b']"), eval("readfile('Xdir4/Xfile')"))
|
|
eq(0, eval("delete('Xdir4/Xfile')"))
|
|
eq(0, eval("delete('Xdir4', 'd')"))
|
|
end)
|
|
end)
|