Added awareness of comments, so word-based columns will not extend into them.

Example Code:

  # Git aliases
  alias gs="git status"
  alias ts="tig status"
  alias glr="git pull --rebase"

Before this fix, if you ran vic on one of "alias" words, then "# Git" would
also have been selected.  After this fix it won't.

Author: coderifous

plugin/textobj/word-column.vim

@@ -7,16 +7,17 @@ function! TextObjWordBasedColumn()
   let stopcol     = col("'>")
   let linenum     = line(".")
   let indentlevel = s:indent_level(".")
-  let startline   = s:find_boundary_row(linenum, indentlevel, -1)
-  let stopline    = s:find_boundary_row(linenum, indentlevel, 1)
+  let startline   = s:find_boundary_row(linenum, startcol, indentlevel, -1)
+  let stopline    = s:find_boundary_row(linenum, startcol, indentlevel, 1)
   exec "silent normal!" startline . "gg" . startcol . "|" stopline . "gg" . stopcol . "|"
 endfunction
 
-function! s:find_boundary_row(linenum, indentlevel, step)
-  let sameindent = s:indent_level(a:linenum + a:step) == a:indentlevel
-  let nonblank   = getline(a:linenum + a:step) =~ "[^ \t]"
-  if sameindent && nonblank
-    return s:find_boundary_row(a:linenum + a:step, a:indentlevel, a:step)
+function! s:find_boundary_row(linenum, startcol, indentlevel, step)
+  let nonblank       = getline(a:linenum + a:step) =~ "[^ \t]"
+  let sameindent     = s:indent_level(a:linenum + a:step) == a:indentlevel
+  let is_not_comment = ! s:is_comment(a:linenum + a:step, a:startcol)
+  if sameindent && nonblank && is_not_comment
+    return s:find_boundary_row(a:linenum + a:step, a:startcol, a:indentlevel, a:step)
   else
     return a:linenum
   endif
@@ -27,6 +28,10 @@ function! s:indent_level(linenum)
   return match(line, "[^ \t]")
 endfunction
 
+function! s:is_comment(linenum, column)
+  return synIDattr(synIDtrans(synID(a:linenum, a:column, 1)),"name") == "Comment"
+endfunction
+
 if (!exists("g:skip_default_textobj_word_column_mappings"))
   vnoremap <silent> ac <Esc>vaw:call TextObjWordBasedColumn()<cr>
   vnoremap <silent> aC <Esc>vaW:call TextObjWordBasedColumn()<cr>