view src/testdir/test_lineending.vim @ 14294:6c5c8de48152 v8.1.0163

patch 8.1.0163: insufficient testing for Tcl commit https://github.com/vim/vim/commit/2549acf794109731eab693bd396bb863d0e2cff4 Author: Bram Moolenaar <Bram@vim.org> Date: Sat Jul 7 22:42:01 2018 +0200 patch 8.1.0163: insufficient testing for Tcl Problem: Insufficient testing for Tcl. Solution: Add a few more tests. (Dominique Pelle, closes https://github.com/vim/vim/issues/3166)
author Christian Brabandt <cb@256bit.org>
date Sat, 07 Jul 2018 22:45:05 +0200
parents 0240e7e3d736
children 08940efa6b4e
line wrap: on
line source

" Tests for saving/loading a file with some lines ending in
" CTRL-M, some not
func Test_lineending()
  let l = ["this line ends in a\<CR>",
	      \ "this one doesn't",
	      \ "this one does\<CR>",
	      \ "and the last one doesn't"]
  set ta tx
  enew!
  call append(0, l)
  $delete
  write Xfile1
  bwipe Xfile1
  edit Xfile1
  let t = getline(1, '$')
  call assert_equal(l, t)
  new | only
  call delete('Xfile1')
endfunc