From 0326b7c14a8acb7e4185df1f6033d87bab9ff152 Mon Sep 17 00:00:00 2001
From: Israel Chauca Fuentes <israel@chauca.net>
Date: Fri, 20 Jul 2012 15:51:19 -0400
Subject: [PATCH] Flush buffer on scrolling.

---
 autoload/delimitMate.vim |  6 +++++-
 plugin/delimitMate.vim   | 10 ++++++++++
 2 files changed, 15 insertions(+), 1 deletion(-)

diff --git a/autoload/delimitMate.vim b/autoload/delimitMate.vim
index 8e0465a..0fc8ba6 100644
--- a/autoload/delimitMate.vim
+++ b/autoload/delimitMate.vim
@@ -531,7 +531,11 @@ function! delimitMate#TestMappings() "{{{
 				\ b:_l_delimitMate_apostrophes_list +
 				\ ['<BS>', '<S-BS>', '<Del>', '<S-Tab>', '<Esc>'] +
 				\ ['<Up>', '<Down>', '<Left>', '<Right>', '<LeftMouse>', '<RightMouse>'] +
-				\ ['<Home>', '<End>', '<PageUp>', '<PageDown>', '<S-Down>', '<S-Up>', '<C-G>g']
+				\ ['<Home>', '<End>', '<PageUp>', '<PageDown>', '<S-Down>', '<S-Up>', '<C-G>g'] +
+				\ ['<ScrollWheelUp>', '<S-ScrollWheelUp>', '<C-ScrollWheelUp>'] +
+				\ ['<ScrollWheelDown>', '<S-ScrollWheelDown>', '<C-ScrollWheelDown>'] +
+				\ ['<ScrollWheelLeft>', '<S-ScrollWheelLeft>', '<C-ScrollWheelLeft>'] +
+				\ ['<ScrollWheelRight>', '<S-ScrollWheelRight>', '<C-ScrollWheelRight>']
 	let imaps = imaps + ( b:_l_delimitMate_expand_cr ?  ['<CR>'] : [] )
 	let imaps = imaps + ( b:_l_delimitMate_expand_space ?  ['<Space>'] : [] )
 
diff --git a/plugin/delimitMate.vim b/plugin/delimitMate.vim
index 191698e..211b1f6 100644
--- a/plugin/delimitMate.vim
+++ b/plugin/delimitMate.vim
@@ -367,6 +367,16 @@ function! s:ExtraMappings() "{{{
 			exec 'silent! imap <unique> <buffer> <'.map.'> <Plug>delimitMate'.map
 		endif
 	endfor
+	" Flush the char buffer on scrolling:
+	for map in ['ScrollWheelUp', 'S-ScrollWheelUp', 'C-ScrollWheelUp',
+				\ 'ScrollWheelDown', 'S-ScrollWheelDown', 'C-ScrollWheelDown',
+				\ 'ScrollWheelLeft', 'S-ScrollWheelLeft', 'C-ScrollWheelLeft',
+				\ 'ScrollWheelRight', 'S-ScrollWheelRight', 'C-ScrollWheelRight']
+		exec 'inoremap <silent> <Plug>delimitMate'.map.' <C-R>=<SID>Finish()<CR><'.map.'>'
+		if !hasmapto('<Plug>delimitMate'.map, 'i') && maparg('<'.map.'>', 'i') == ''
+			exec 'silent! imap <unique> <buffer> <'.map.'> <Plug>delimitMate'.map
+		endif
+	endfor
 	" Also for default MacVim movements:
 	if has('gui_macvim')
 		for [key, map] in [['D-Left','Home'], ['D-Right','End'], ['M-Left','C-Left'], ['M-Right','C-Right']]