view src/testdir/test_lineending.vim @ 32714:d83068c95ba0 v9.0.1681

patch 9.0.1681: Build Failure with Perl 5.38 Commit: https://github.com/vim/vim/commit/1d7caa58e3c87f75a4becbceabbd1af181ace11e Author: Philip H <47042125+pheiduck@users.noreply.github.com> Date: Thu Jun 22 08:55:47 2023 +0200 patch 9.0.1681: Build Failure with Perl 5.38 Problem: Build Failure with Perl 5.38 Solution: Fix Build Failure closes: #12543, closes: #12575
author Christian Brabandt <cb@256bit.org>
date Wed, 09 Aug 2023 20:15:03 +0200
parents 08940efa6b4e
children
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

" vim: shiftwidth=2 sts=2 expandtab