view src/testdir/test101.in @ 8465:5927180d0b4d v7.4.1523

commit https://github.com/vim/vim/commit/0622732b32ff4a883e4f490a1b38ada539da8ba2 Author: Bram Moolenaar <Bram@vim.org> Date: Tue Mar 8 20:58:29 2016 +0100 patch 7.4.1523 Problem: Writing channel to a file fails on MS-Windows. Solution: Disable it for now.
author Christian Brabandt <cb@256bit.org>
date Tue, 08 Mar 2016 21:00:04 +0100
parents 01c668384bcc
children
line wrap: on
line source

Test for v:hlsearch     vim: set ft=vim :

STARTTEST
:" Last abc: Q
:so small.vim
:new
:call setline(1, repeat(['aaa'], 10))
:set hlsearch nolazyredraw
:let r=[]
:command -nargs=0 -bar AddR :call add(r, [screenattr(1, 1), v:hlsearch])
/aaa
:AddR
:nohlsearch
:AddR
:let v:hlsearch=1
:AddR
:let v:hlsearch=0
:AddR
:set hlsearch
:AddR
:let v:hlsearch=0
:AddR
n:AddR
:let v:hlsearch=0
:AddR
/
:AddR
:set nohls
/
:AddR
:let r1=r[0][0]
:" I guess it is not guaranteed that screenattr outputs always the same character
:call map(r, 'v:val[1].":".(v:val[0]==r1?"highlighted":"not highlighted")')
:try
:   let v:hlsearch=[]
:catch
:   call add(r, matchstr(v:exception,'^Vim(let):E\d\+:'))
:endtry
:bwipeout!
:$put=r
:call garbagecollect(1)
:"
:/^start:/,$wq! test.out
:" vim: et ts=4 isk-=\:
:call getchar()
ENDTEST

start: