"=======================================================================================================================
" HIGHLIGHT_WORD_UNDER_CURSOR:
"=======================================================================================================================

let w:m1 = 0
function! HighlightWordUnderCursor()
    if(exists('w:m1') && w:m1 > 0)
        silent! call matchdelete(w:m1)
        let w:m1 = 0
    endif
    let l:currentword = escape(expand('<cword>'), '.')
    if(strlen(l:currentword) > 0)
        let w:m1=100
        silent! call matchadd('BoldUnderline', '\<'.l:currentword.'\>', -1, w:m1)
    endif
endfunction

autocmd CursorHold,CursorHoldI * call HighlightWordUnderCursor()