行の中央にジャンプする関数

良くないとは分かっていながら，
長い行を移動するときに，
lllllllllllllllllllllll
とか
hhhhhhhhhhhhhhhhhhhhhhh
とかタイプしてしまう．
前後はH,M,Lで混ぜたりしてるので，
そこまで苦痛じゃないんだけど
左右が面倒くさいので行の中央にジャンプする関数書いてみた．
全く使ってなかったのでmapは#に．

function! s:JumpMiddle()
	let end = col('$')-1
	let middle = float2nr(ceil(end/2))
	let save_cursor = getpos(".")
	let save_cursor[2] = middle
	call setpos('.', save_cursor)
endfun
nnoremap <silent> # :call <SID>JumpMiddle()<CR>