Mercurial > vim
view src/testdir/test_fixeol.vim @ 24616:ed4d7ab9dcdc v8.2.2847
patch 8.2.2847: Perl not tested sufficiently
Commit: https://github.com/vim/vim/commit/588cf7547bafaff46a82bc125d05d24a1cedf827
Author: Dominique Pelle <dominique.pelle@gmail.com>
Date: Mon May 10 23:49:39 2021 +0200
patch 8.2.2847: Perl not tested sufficiently
Problem: Perl not tested sufficiently.
Solution: Add test. Also test W17. (Dominique Pell?, closes https://github.com/vim/vim/issues/8193)
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Tue, 11 May 2021 00:00:09 +0200 |
parents | 08940efa6b4e |
children | 3a01529f17f5 |
line wrap: on
line source
" Tests for 'fixeol' and 'eol' func Test_fixeol() " first write two test files – with and without trailing EOL " use Unix fileformat for consistency set ff=unix enew! call setline('.', 'with eol') w! XXEol enew! set noeol nofixeol call setline('.', 'without eol') w! XXNoEol set eol fixeol bwipe XXEol XXNoEol " try editing files with 'fixeol' disabled e! XXEol normal ostays eol set nofixeol w! XXTestEol e! XXNoEol normal ostays without set nofixeol w! XXTestNoEol bwipe! XXEol XXNoEol XXTestEol XXTestNoEol set fixeol " Append "END" to each file so that we can see what the last written char " was. normal ggdGaEND w >>XXEol w >>XXNoEol w >>XXTestEol w >>XXTestNoEol call assert_equal(['with eol', 'END'], readfile('XXEol')) call assert_equal(['without eolEND'], readfile('XXNoEol')) call assert_equal(['with eol', 'stays eol', 'END'], readfile('XXTestEol')) call assert_equal(['without eol', 'stays withoutEND'], \ readfile('XXTestNoEol')) call delete('XXEol') call delete('XXNoEol') call delete('XXTestEol') call delete('XXTestNoEol') set ff& fixeol& eol& enew! endfunc " vim: shiftwidth=2 sts=2 expandtab