Mercurial > vim

view src/testdir/test_scriptnames.vim @ 20550:09143ab0fbbd v8.2.0829

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
patch 8.2.0829: filter() may give misleading error message Commit: https://github.com/vim/vim/commit/fcb0b61d15f66f0e9116a6bc56d9d8105bb913cf Author: Bram Moolenaar <Bram@vim.org> Date: Tue May 26 20:22:01 2020 +0200 patch 8.2.0829: filter() may give misleading error message Problem: filter() may give misleading error message. Solution: Also mention Blob as an allowed argument.
author Bram Moolenaar <Bram@vim.org>
date Tue, 26 May 2020 20:30:06 +0200
parents 1783c0b6bc2e
children 08940efa6b4e
line wrap: on
line source

" Test for :scriptnames

func Test_scriptnames()
  call writefile(['let did_load_script = 123'], 'Xscripting')
  source Xscripting
  call assert_equal(123, g:did_load_script)

  let scripts = split(execute('scriptnames'), "\n")
  let last = scripts[-1]
  call assert_match('\<Xscripting\>', last)
  let lastnr = substitute(last, '\D*\(\d\+\):.*', '\1', '')
  exe 'script ' . lastnr
  call assert_equal('Xscripting', expand('%:t'))

  call assert_fails('script ' . (lastnr + 1), 'E474:')
  call assert_fails('script 0', 'E939:')

  new
  call setline(1, 'nothing')
  call assert_fails('script ' . lastnr, 'E37:')
  exe 'script! ' . lastnr
  call assert_equal('Xscripting', expand('%:t'))

  bwipe
  call delete('Xscripting')
endfunc