fun! CompleteMonths()
  for m in split("Jan Feb Mar Apr May Jun Jul Aug Sep")
      call complete_add(m)
    if complete_check()
      break
    endif
  endfor
  return []
endfun

fun! CompleteMore()
  call complete(1, split("Oct Nov Dec"))
  return []
endfun

fun! MyComplete(findstart, base)
  if a:findstart
    let line = getline('.')
    let start = col('.') - 1
    while start > 0 && line[start - 1] =~ '\a'
      let start -= 1
    endwhile
    return start
  else
    call CompleteMonths()
    call CompleteMore()
    return []
  endif
endf

set completefunc=MyComplete

" Ju