view src/testdir/test_source_utf8.vim @ 32489:d6055989fa27 v9.0.1576

patch 9.0.1576: users may not know what to do with an internal error Commit: https://github.com/vim/vim/commit/097c5370ea8abab17ceb0f3bcd74f57b1655c7f7 Author: Bram Moolenaar <Bram@vim.org> Date: Wed May 24 21:02:24 2023 +0100 patch 9.0.1576: users may not know what to do with an internal error Problem: Users may not know what to do with an internal error. Solution: Add a translated message with instructions.
author Bram Moolenaar <Bram@vim.org>
date Wed, 24 May 2023 22:15:06 +0200
parents ae10b91ac6b3
children
line wrap: on
line source

" Test the :source! command

source check.vim

func Test_source_utf8()
  " check that sourcing a script with 0x80 as second byte works
  new
  call setline(1, [':%s/àx/--à1234--/g', ':%s/Àx/--À1234--/g'])
  write! Xscript
  bwipe!
  new
  call setline(1, [' àx ', ' Àx '])
  source! Xscript | echo
  call assert_equal(' --à1234-- ', getline(1))
  call assert_equal(' --À1234-- ', getline(2))
  bwipe!
  call delete('Xscript')
endfunc

func Test_source_latin()
  " check that sourcing a latin1 script with a 0xc0 byte works
  new
  call setline(1, ["call feedkeys('r')", "call feedkeys('\xc0', 'xt')"])
  write! Xscript
  bwipe!
  new
  call setline(1, ['xxx'])
  source Xscript
  call assert_equal("\u00c0xx", getline(1))
  bwipe!
  call delete('Xscript')
endfunc

" Test for sourcing a file with CTRL-V's at the end of the line
func Test_source_ctrl_v()
  call writefile(['map __1 afirst',
        \ 'map __2 asecond',
        \ 'map __3 athird',
        \ 'map __4 afourth',
        \ 'map __5 afifth',
        \ "map __1 asd\<C-V>",
        \ "map __2 asd\<C-V>\<C-V>",
        \ "map __3 asd\<C-V>\<C-V>",
        \ "map __4 asd\<C-V>\<C-V>\<C-V>",
        \ "map __5 asd\<C-V>\<C-V>\<C-V>",
        \ ], 'Xtestfile', 'D')
  source Xtestfile
  enew!
  exe "normal __1\<Esc>\<Esc>__2\<Esc>__3\<Esc>\<Esc>__4\<Esc>__5\<Esc>"
  exe "%s/\<C-J>/0/g"
  call assert_equal(['sd',
        \ "map __2 asd\<Esc>secondsd\<Esc>sd0map __5 asd0fifth"],
        \ getline(1, 2))

  enew!
  unmap __1
  unmap __2
  unmap __3
  unmap __4
  unmap __5
endfunc

" vim: shiftwidth=2 sts=2 expandtab