1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
|
-- Tests for 'directory' option.
-- - ".", in same dir as file
-- - "./dir", in directory relative to file
-- - "dir", in directory relative to current dir
local helpers = require('test.functional.helpers')(after_each)
local lfs = require('lfs')
local insert, eq = helpers.insert, helpers.eq
local neq, eval = helpers.neq, helpers.eval
local clear, execute = helpers.clear, helpers.execute
local wait, write_file = helpers.wait, helpers.write_file
local function ls_dir_sorted(dirname)
local files = {}
for f in lfs.dir(dirname) do
if f ~= "." and f~= ".." then
table.insert(files, f)
end
end
table.sort(files)
return files
end
describe("'directory' option", function()
setup(function()
local text = [[
start of testfile
line 2 Abcdefghij
line 3 Abcdefghij
end of testfile
]]
write_file('Xtest1', text)
lfs.mkdir('Xtest.je')
lfs.mkdir('Xtest2')
write_file('Xtest2/Xtest3', text)
clear()
end)
teardown(function()
execute('qall!')
helpers.rmdir('Xtest.je')
helpers.rmdir('Xtest2')
os.remove('Xtest1')
end)
it('is working', function()
insert([[
start of testfile
line 2 Abcdefghij
line 3 Abcdefghij
end of testfile]])
execute('set swapfile')
execute('set dir=.,~')
-- sanity check: files should not exist yet.
eq(nil, lfs.attributes('.Xtest1.swp'))
execute('e! Xtest1')
wait()
eq('Xtest1', eval('buffer_name("%")'))
-- Verify that the swapfile exists. In the legacy test this was done by
-- reading the output from :!ls.
neq(nil, lfs.attributes('.Xtest1.swp'))
execute('set dir=./Xtest2,.,~')
execute('e Xtest1')
wait()
-- swapfile should no longer exist in CWD.
eq(nil, lfs.attributes('.Xtest1.swp'))
eq({ "Xtest1.swp", "Xtest3" }, ls_dir_sorted("Xtest2"))
execute('set dir=Xtest.je,~')
execute('e Xtest2/Xtest3')
eq(1, eval('&swapfile'))
wait()
eq({ "Xtest3" }, ls_dir_sorted("Xtest2"))
eq({ "Xtest3.swp" }, ls_dir_sorted("Xtest.je"))
end)
end)
|