aboutsummaryrefslogtreecommitdiff
path: root/plugin
diff options
context:
space:
mode:
authorTom Ryder <tom@sanctum.geek.nz>2018-05-30 22:52:52 +1200
committerTom Ryder <tom@sanctum.geek.nz>2018-05-30 22:52:52 +1200
commita1f580c76e5af568235cc03582f4310298be7328 (patch)
tree5c4cd3276bd991fb3a20b3bf8d891725a00a9b9d /plugin
downloadvim-insert-suspend-hlsearch-a1f580c76e5af568235cc03582f4310298be7328.tar.gz
vim-insert-suspend-hlsearch-a1f580c76e5af568235cc03582f4310298be7328.zip
Initial commitv0.1.0
Copied with minimal changes from tejr's dotfiles suite, v0.34.1.
Diffstat (limited to 'plugin')
-rw-r--r--plugin/insert_suspend_hlsearch.vim47
1 files changed, 47 insertions, 0 deletions
diff --git a/plugin/insert_suspend_hlsearch.vim b/plugin/insert_suspend_hlsearch.vim
new file mode 100644
index 0000000..b916ac4
--- /dev/null
+++ b/plugin/insert_suspend_hlsearch.vim
@@ -0,0 +1,47 @@
+"
+" insert_suspend_hlsearch.vim: If 'hlsearch' is enabled, switch it off when
+" the user starts an insert mode operation, and back on again when they're
+" done.
+"
+" Author: Tom Ryder <tom@sanctum.geek.nz>
+" License: Same as Vim itself
+"
+if exists('g:loaded_insert_suspend_hlsearch') || &compatible
+ finish
+endif
+if !has('autocmd') || !has('extra_search') || v:version < 700
+ finish
+endif
+let g:loaded_insert_suspend_hlsearch = 1
+
+" Save the current value of the 'hlsearch' option in a script variable, and
+" disable it if enabled. Note that :nohlsearch does not work for this; see
+" :help autocmd-searchpat.
+function s:HlsearchSuspend()
+ let s:hlsearch = &hlsearch
+ if s:hlsearch
+ set nohlsearch
+ endif
+ return
+endfunction
+
+" Restore the value of 'hlsearch' from the last time s:HlsearchSuspend was
+" called.
+function s:HlsearchRestore()
+ if s:hlsearch
+ set hlsearch
+ endif
+ return
+endfunction
+
+" Clear search highlighting as soon as I enter insert mode, and restore it
+" once left
+augroup insert_suspend_hlsearch
+ autocmd!
+ autocmd InsertEnter
+ \ *
+ \ call <SID>HlsearchSuspend()
+ autocmd InsertLeave
+ \ *
+ \ call <SID>HlsearchRestore()
+augroup END