Mercurial > vim
comparison src/testdir/test_delete.vim @ 7615:228ff048db20 v7.4.1107
commit https://github.com/vim/vim/commit/da440d21a6b94d7f525fa7be9b1417c78dd9aa4c
Author: Bram Moolenaar <Bram@vim.org>
Date: Sat Jan 16 21:27:23 2016 +0100
patch 7.4.1107
Problem: Vim can create a directory but not delete it.
Solution: Add an argument to delete() to make it possible to delete a
directory, also recursively.
author | Christian Brabandt <cb@256bit.org> |
---|---|
date | Sat, 16 Jan 2016 21:30:05 +0100 |
parents | |
children | befbed72da87 |
comparison
equal
deleted
inserted
replaced
7614:427b35579737 | 7615:228ff048db20 |
---|---|
1 " Test for delete(). | |
2 | |
3 func Test_file_delete() | |
4 split Xfile | |
5 call setline(1, ['a', 'b']) | |
6 wq | |
7 call assert_equal(['a', 'b'], readfile('Xfile')) | |
8 call assert_equal(0, delete('Xfile')) | |
9 call assert_fails('call readfile("Xfile")', 'E484:') | |
10 call assert_equal(-1, delete('Xfile')) | |
11 endfunc | |
12 | |
13 func Test_dir_delete() | |
14 call mkdir('Xdir1') | |
15 call assert_true(isdirectory('Xdir1')) | |
16 call assert_equal(0, delete('Xdir1', 'd')) | |
17 call assert_false(isdirectory('Xdir1')) | |
18 call assert_equal(-1, delete('Xdir1', 'd')) | |
19 endfunc | |
20 | |
21 func Test_recursive_delete() | |
22 call mkdir('Xdir1') | |
23 call mkdir('Xdir1/subdir') | |
24 split Xdir1/Xfile | |
25 call setline(1, ['a', 'b']) | |
26 w | |
27 w Xdir1/subdir/Xfile | |
28 close | |
29 call assert_true(isdirectory('Xdir1')) | |
30 call assert_equal(['a', 'b'], readfile('Xdir1/Xfile')) | |
31 call assert_true(isdirectory('Xdir1/subdir')) | |
32 call assert_equal(['a', 'b'], readfile('Xdir1/subdir/Xfile')) | |
33 call assert_equal(0, delete('Xdir1', 'rf')) | |
34 call assert_false(isdirectory('Xdir1')) | |
35 call assert_equal(-1, delete('Xdir1', 'd')) | |
36 endfunc |