| Bram Moolenaar | b782ba4 | 2018-08-07 21:39:28 +0200 | [diff] [blame] | 1 | " Tests for the backup function |
| 2 | |
| 3 | func Test_backup() |
| Bram Moolenaar | efe0373 | 2018-08-09 22:26:38 +0200 | [diff] [blame] | 4 | set backup backupdir=. backupskip= |
| Bram Moolenaar | b782ba4 | 2018-08-07 21:39:28 +0200 | [diff] [blame] | 5 | new |
| 6 | call setline(1, ['line1', 'line2']) |
| 7 | :f Xbackup.txt |
| 8 | :w! Xbackup.txt |
| 9 | " backup file is only created after |
| 10 | " writing a second time (before overwriting) |
| 11 | :w! Xbackup.txt |
| 12 | let l = readfile('Xbackup.txt~') |
| 13 | call assert_equal(['line1', 'line2'], l) |
| 14 | bw! |
| Bram Moolenaar | efe0373 | 2018-08-09 22:26:38 +0200 | [diff] [blame] | 15 | set backup&vim backupdir&vim backupskip&vim |
| Bram Moolenaar | b782ba4 | 2018-08-07 21:39:28 +0200 | [diff] [blame] | 16 | call delete('Xbackup.txt') |
| 17 | call delete('Xbackup.txt~') |
| 18 | endfunc |
| 19 | |
| Bram Moolenaar | b86abad | 2020-08-01 16:08:19 +0200 | [diff] [blame] | 20 | func Test_backup_backupskip() |
| 21 | set backup backupdir=. backupskip=*.txt |
| 22 | new |
| 23 | call setline(1, ['line1', 'line2']) |
| 24 | :f Xbackup.txt |
| 25 | :w! Xbackup.txt |
| 26 | " backup file is only created after |
| 27 | " writing a second time (before overwriting) |
| 28 | :w! Xbackup.txt |
| 29 | call assert_false(filereadable('Xbackup.txt~')) |
| 30 | bw! |
| 31 | set backup&vim backupdir&vim backupskip&vim |
| 32 | call delete('Xbackup.txt') |
| 33 | call delete('Xbackup.txt~') |
| 34 | endfunc |
| 35 | |
| Bram Moolenaar | b782ba4 | 2018-08-07 21:39:28 +0200 | [diff] [blame] | 36 | func Test_backup2() |
| Bram Moolenaar | efe0373 | 2018-08-09 22:26:38 +0200 | [diff] [blame] | 37 | set backup backupdir=.// backupskip= |
| Bram Moolenaar | b782ba4 | 2018-08-07 21:39:28 +0200 | [diff] [blame] | 38 | new |
| 39 | call setline(1, ['line1', 'line2', 'line3']) |
| 40 | :f Xbackup.txt |
| 41 | :w! Xbackup.txt |
| 42 | " backup file is only created after |
| 43 | " writing a second time (before overwriting) |
| 44 | :w! Xbackup.txt |
| 45 | sp *Xbackup.txt~ |
| 46 | call assert_equal(['line1', 'line2', 'line3'], getline(1,'$')) |
| Bram Moolenaar | b86abad | 2020-08-01 16:08:19 +0200 | [diff] [blame] | 47 | let f = expand('%') |
| Bram Moolenaar | f8f88f8 | 2018-08-08 11:02:32 +0200 | [diff] [blame] | 48 | call assert_match('%testdir%Xbackup.txt\~', f) |
| Bram Moolenaar | b782ba4 | 2018-08-07 21:39:28 +0200 | [diff] [blame] | 49 | bw! |
| 50 | bw! |
| 51 | call delete('Xbackup.txt') |
| 52 | call delete(f) |
| Bram Moolenaar | efe0373 | 2018-08-09 22:26:38 +0200 | [diff] [blame] | 53 | set backup&vim backupdir&vim backupskip&vim |
| Bram Moolenaar | b782ba4 | 2018-08-07 21:39:28 +0200 | [diff] [blame] | 54 | endfunc |
| 55 | |
| 56 | func Test_backup2_backupcopy() |
| Bram Moolenaar | efe0373 | 2018-08-09 22:26:38 +0200 | [diff] [blame] | 57 | set backup backupdir=.// backupcopy=yes backupskip= |
| Bram Moolenaar | b782ba4 | 2018-08-07 21:39:28 +0200 | [diff] [blame] | 58 | new |
| 59 | call setline(1, ['line1', 'line2', 'line3']) |
| 60 | :f Xbackup.txt |
| 61 | :w! Xbackup.txt |
| 62 | " backup file is only created after |
| 63 | " writing a second time (before overwriting) |
| 64 | :w! Xbackup.txt |
| 65 | sp *Xbackup.txt~ |
| 66 | call assert_equal(['line1', 'line2', 'line3'], getline(1,'$')) |
| Bram Moolenaar | b86abad | 2020-08-01 16:08:19 +0200 | [diff] [blame] | 67 | let f = expand('%') |
| Bram Moolenaar | f8f88f8 | 2018-08-08 11:02:32 +0200 | [diff] [blame] | 68 | call assert_match('%testdir%Xbackup.txt\~', f) |
| Bram Moolenaar | b782ba4 | 2018-08-07 21:39:28 +0200 | [diff] [blame] | 69 | bw! |
| 70 | bw! |
| 71 | call delete('Xbackup.txt') |
| 72 | call delete(f) |
| Bram Moolenaar | efe0373 | 2018-08-09 22:26:38 +0200 | [diff] [blame] | 73 | set backup&vim backupdir&vim backupcopy&vim backupskip&vim |
| Bram Moolenaar | b782ba4 | 2018-08-07 21:39:28 +0200 | [diff] [blame] | 74 | endfunc |
| Bram Moolenaar | 1de5f7c | 2020-06-11 19:22:43 +0200 | [diff] [blame] | 75 | |
| 76 | " Test for using a non-existing directory as a backup directory |
| 77 | func Test_non_existing_backupdir() |
| Bram Moolenaar | b86abad | 2020-08-01 16:08:19 +0200 | [diff] [blame] | 78 | set backupdir=./non_existing_dir backupskip= |
| Bram Moolenaar | 3411265 | 2022-09-05 21:40:44 +0100 | [diff] [blame] | 79 | call writefile(['line1'], 'Xbackupdir', 'D') |
| Bram Moolenaar | e7cda97 | 2022-08-29 11:02:59 +0100 | [diff] [blame] | 80 | new Xbackupdir |
| Bram Moolenaar | 1de5f7c | 2020-06-11 19:22:43 +0200 | [diff] [blame] | 81 | call assert_fails('write', 'E510:') |
| Bram Moolenaar | 3411265 | 2022-09-05 21:40:44 +0100 | [diff] [blame] | 82 | |
| Bram Moolenaar | b86abad | 2020-08-01 16:08:19 +0200 | [diff] [blame] | 83 | set backupdir&vim backupskip&vim |
| Bram Moolenaar | 1de5f7c | 2020-06-11 19:22:43 +0200 | [diff] [blame] | 84 | endfunc |
| 85 | |
| 86 | " vim: shiftwidth=2 sts=2 expandtab |