Mercurial > vim
view src/testdir/test_backup.vim @ 33644:449601dbba78 v9.0.2062
patch 9.0.2062: Janet files are not recognised
Commit: https://github.com/vim/vim/commit/c038427d2a27445e612761f19c92b2b8b05afdea
Author: Doug Kearns <dougkearns@gmail.com>
Date: Mon Oct 23 19:24:05 2023 +0200
patch 9.0.2062: Janet files are not recognised
Problem: Janet files are not recognised
Solution: Add filename and shebang detection (without
adding an extra filetype plugin)
Those are used by the Janet language:
http://www.janet-lang.org
closes: #13400
Signed-off-by: Christian Brabandt <cb@256bit.org>
Co-authored-by: Doug Kearns <dougkearns@gmail.com>
| author | Christian Brabandt <cb@256bit.org> |
|---|---|
| date | Mon, 23 Oct 2023 19:30:08 +0200 |
| parents | ba5ca7c7d44c |
| children |
line wrap: on
line source
" Tests for the backup function source check.vim 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_backup_backupskip() set backup backupdir=. backupskip=*.txt 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 call assert_false(filereadable('Xbackup.txt~')) 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 " Test for using a non-existing directory as a backup directory func Test_non_existing_backupdir() set backupdir=./non_existing_dir backupskip= call writefile(['line1'], 'Xbackupdir', 'D') new Xbackupdir call assert_fails('write', 'E510:') set backupdir&vim backupskip&vim endfunc " vim: shiftwidth=2 sts=2 expandtab