s:vim_version()

  function! s:vim_version() " {{{
    redir => lines
    silent! version
    redir END
    let m1 = []
    let m2 = []
    let regex1 = '^VIM - Vi IMproved \(\d\+.\i\+\) '
    let regex2 = '^Included patches: \(\d\+\)-\(\d\+\)'
    for line in split(lines,"\n")
      if  line =~# regex1
        let m1 = matchlist(line,regex1)
      endif
      if  line =~# regex2
        let m2 = matchlist(line,regex2)
      endif
    endfor
    return printf('%s.%04s', m1[1], m2[2])
  endfunction " }}}