Mercurial > vim
view src/testdir/test_backup.vim @ 17952:4754339d9aee v8.1.1972
patch 8.1.1972: no proper test for getchar()
Commit: https://github.com/vim/vim/commit/5d712e4672c6c8cf7f35cfb7d8eb7e8aa24062ac
Author: Bram Moolenaar <Bram@vim.org>
Date: Tue Sep 3 23:37:01 2019 +0200
patch 8.1.1972: no proper test for getchar()
Problem: No proper test for getchar().
Solution: Add a test with special characters.
| author | Bram Moolenaar <Bram@vim.org> |
|---|---|
| date | Tue, 03 Sep 2019 23:45:04 +0200 |
| parents | 77968a364ec4 |
| children | d8628d75c47a |
line wrap: on
line source
" Tests for the backup function func Test_backup() set backup backupdir=. backupskip= new call setline(1, ['line1', 'line2']) :f Xbackup.txt :w! Xbackup.txt " backup file is only created after " writing a second time (before overwriting) :w! Xbackup.txt let l = readfile('Xbackup.txt~') call assert_equal(['line1', 'line2'], l) bw! set backup&vim backupdir&vim backupskip&vim call delete('Xbackup.txt') call delete('Xbackup.txt~') endfunc func Test_backup2() set backup backupdir=.// backupskip= new call setline(1, ['line1', 'line2', 'line3']) :f Xbackup.txt :w! Xbackup.txt " backup file is only created after " writing a second time (before overwriting) :w! Xbackup.txt sp *Xbackup.txt~ call assert_equal(['line1', 'line2', 'line3'], getline(1,'$')) let f=expand('%') call assert_match('%testdir%Xbackup.txt\~', f) bw! bw! call delete('Xbackup.txt') call delete(f) set backup&vim backupdir&vim backupskip&vim endfunc func Test_backup2_backupcopy() set backup backupdir=.// backupcopy=yes backupskip= new call setline(1, ['line1', 'line2', 'line3']) :f Xbackup.txt :w! Xbackup.txt " backup file is only created after " writing a second time (before overwriting) :w! Xbackup.txt sp *Xbackup.txt~ call assert_equal(['line1', 'line2', 'line3'], getline(1,'$')) let f=expand('%') call assert_match('%testdir%Xbackup.txt\~', f) bw! bw! call delete('Xbackup.txt') call delete(f) set backup&vim backupdir&vim backupcopy&vim backupskip&vim endfunc