Update

1 files changed, 703 insertions, 701 deletions

diff --git a/autoload/htmlcomplete.vim b/autoload/htmlcomplete.vim
index f58793a2..fc9a4b5a 100644
--- a/autoload/htmlcomplete.vim
+++ b/autoload/htmlcomplete.vim
@@ -1,12 +1,12 @@
 if !exists('g:polyglot_disabled') || index(g:polyglot_disabled, 'html5') == -1
   
 " Vim completion script
-" Language:	HTML and XHTML
-" Maintainer:	Mikolaj Machowski ( mikmach AT wp DOT pl )
-" Last Change:	2006 Oct 19
+" Language:     HTML and XHTML
+" Maintainer:   Mikolaj Machowski ( mikmach AT wp DOT pl )
+" Last Change:  2006 Oct 19
 " Modified:     othree <othree@gmail.com>
 " Changes:      Add HTML5, WAI-ARIA support
-" Last Change:	2010 Sep 25
+" Last Change:  2016 Oct 11
 
 if !exists('g:aria_attributes_complete')
   let g:aria_attributes_complete = 1
@@ -16,42 +16,42 @@ endif
 " To use with other HTML versions add another "elseif" condition to match
 " proper DOCTYPE.
 function! htmlcomplete#DetectOmniFlavor()
-    if &filetype == 'xhtml'
-        let b:html_omni_flavor = 'xhtml10s'
-    else
-        let b:html_omni_flavor = 'html5'
+  if &filetype == 'xhtml'
+    let b:html_omni_flavor = 'xhtml10s'
+  else
+    let b:html_omni_flavor = 'html5'
+  endif
+  let i = 1
+  let line = ""
+  while i < 10 && i < line("$")
+    let line = getline(i)
+    if line =~ '<!DOCTYPE.*\<DTD '
+      break
     endif
-    let i = 1
-    let line = ""
-    while i < 10 && i < line("$")
-        let line = getline(i)
-        if line =~ '<!DOCTYPE.*\<DTD '
-            break
-        endif
-        let i += 1
-    endwhile
-    if line =~ '<!DOCTYPE.*\<DTD '  " doctype line found above
-        if line =~ ' HTML 3\.2'
-            let b:html_omni_flavor = 'html32'
-        elseif line =~ ' XHTML 1\.1'
-            let b:html_omni_flavor = 'xhtml11'
-        else    " two-step detection with strict/frameset/transitional
-            if line =~ ' XHTML 1\.0'
-                let b:html_omni_flavor = 'xhtml10'
-            elseif line =~ ' HTML 4\.01'
-                let b:html_omni_flavor = 'html401'
-            elseif line =~ ' HTML 4.0\>'
-                let b:html_omni_flavor = 'html40'
-            endif
-            if line =~ '\<Transitional\>'
-                let b:html_omni_flavor .= 't'
-            elseif line =~ '\<Frameset\>'
-                let b:html_omni_flavor .= 'f'
-            else
-                let b:html_omni_flavor .= 's'
-            endif
-        endif
+    let i += 1
+  endwhile
+  if line =~ '<!DOCTYPE.*\<DTD '  " doctype line found above
+    if line =~ ' HTML 3\.2'
+      let b:html_omni_flavor = 'html32'
+    elseif line =~ ' XHTML 1\.1'
+      let b:html_omni_flavor = 'xhtml11'
+    else    " two-step detection with strict/frameset/transitional
+      if line =~ ' XHTML 1\.0'
+        let b:html_omni_flavor = 'xhtml10'
+      elseif line =~ ' HTML 4\.01'
+        let b:html_omni_flavor = 'html401'
+      elseif line =~ ' HTML 4.0\>'
+        let b:html_omni_flavor = 'html40'
+      endif
+      if line =~ '\<Transitional\>'
+        let b:html_omni_flavor .= 't'
+      elseif line =~ '\<Frameset\>'
+        let b:html_omni_flavor .= 'f'
+      else
+        let b:html_omni_flavor .= 's'
+      endif
     endif
+  endif
 endfunction
 
 function! htmlcomplete#CompleteTags(findstart, base)
@@ -59,491 +59,493 @@ function! htmlcomplete#CompleteTags(findstart, base)
     " locate the start of the word
     let line = getline('.')
     let start = col('.') - 1
-	let curline = line('.')
-	let compl_begin = col('.') - 2
+  let curline = line('.')
+  let compl_begin = col('.') - 2
     while start >= 0 && line[start - 1] =~ '\(\k\|[!:.-]\)'
-		let start -= 1
+    let start -= 1
     endwhile
-	" Handling of entities {{{
-	if start >= 0 && line[start - 1] =~ '&'
-		let b:entitiescompl = 1
-		let b:compl_context = ''
-		return start
-	endif
-	" }}}
-	" Handling of <style> tag {{{
-	let stylestart = searchpair('<style\>', '', '<\/style\>', "bnW")
-	let styleend   = searchpair('<style\>', '', '<\/style\>', "nW")
-	if stylestart != 0 && styleend != 0
-		if stylestart <= curline && styleend >= curline
-			let start = col('.') - 1
-			let b:csscompl = 1
-			while start >= 0 && line[start - 1] =~ '\(\k\|-\)'
-				let start -= 1
-			endwhile
-		endif
-	endif
-	" }}}
-	" Handling of <script> tag {{{
-	let scriptstart = searchpair('<script\>', '', '<\/script\>', "bnW")
-	let scriptend   = searchpair('<script\>', '', '<\/script\>', "nW")
-	if scriptstart != 0 && scriptend != 0
-		if scriptstart <= curline && scriptend >= curline
-			let start = col('.') - 1
-			let b:jscompl = 1
-			let b:jsrange = [scriptstart, scriptend]
-			while start >= 0 && line[start - 1] =~ '\k'
-				let start -= 1
-			endwhile
-			" We are inside of <script> tag. But we should also get contents
-			" of all linked external files and (secondary, less probably) other <script> tags
-			" This logic could possible be done in separate function - may be
-			" reused in events scripting (also with option could be reused for
-			" CSS
-			let b:js_extfiles = []
-			let l = line('.')
-			let c = col('.')
-			call cursor(1,1)
-			while search('<\@<=script\>', 'W') && line('.') <= l
-				if synIDattr(synID(line('.'),col('.')-1,0),"name") !~? 'comment'
-					let sname = matchstr(getline('.'), '<script[^>]*src\s*=\s*\([''"]\)\zs.\{-}\ze\1')
-					if filereadable(sname)
-						let b:js_extfiles += readfile(sname)
-					endif
-				endif
-			endwhile
-			call cursor(1,1)
-			let js_scripttags = []
-			while search('<script\>', 'W') && line('.') < l
-				if matchstr(getline('.'), '<script[^>]*src') == ''
-					let js_scripttag = getline(line('.'), search('</script>', 'W'))
-					let js_scripttags += js_scripttag
-				endif
-			endwhile
-			let b:js_extfiles += js_scripttags
-			call cursor(l,c)
-			unlet! l c
-		endif
-	endif
-	" }}}
-	if !exists("b:csscompl") && !exists("b:jscompl")
-		let b:compl_context = getline('.')[0:(compl_begin)]
-		if b:compl_context !~ '<[^>]*$'
-			" Look like we may have broken tag. Check previous lines.
-			let i = 1
-			while 1
-				let context_line = getline(curline-i)
-				if context_line =~ '<[^>]*$'
-					" Yep, this is this line
-					let context_lines = getline(curline-i, curline-1) + [b:compl_context]
-					let b:compl_context = join(context_lines, ' ')
-					break
-				elseif context_line =~ '>[^<]*$' || i == curline
-					" We are in normal tag line, no need for completion at all
-					" OR reached first line without tag at all
-					let b:compl_context = ''
-					break
-				endif
-				let i += 1
-			endwhile
-			" Make sure we don't have counter
-			unlet! i
-		endif
-		let b:compl_context = matchstr(b:compl_context, '.*\zs<.*')
-
-		" Return proper start for on-events. Without that beginning of
-		" completion will be badly reported
-		if b:compl_context =~? 'on[a-z]*\s*=\s*\(''[^'']*\|"[^"]*\)$'
-			let start = col('.') - 1
-			while start >= 0 && line[start - 1] =~ '\k'
-				let start -= 1
-			endwhile
-		endif
-		" If b:compl_context begins with <? we are inside of PHP code. It
-		" wasn't closed so PHP completion passed it to HTML
-		if &filetype =~? 'php' && b:compl_context =~ '^<?'
-			let b:phpcompl = 1
-			let start = col('.') - 1
-			while start >= 0 && line[start - 1] =~ '[a-zA-Z_0-9\x7f-\xff$]'
-				let start -= 1
-			endwhile
-		endif
-	else
-		let b:compl_context = getline('.')[0:compl_begin]
-	endif
+  " Handling of entities {{{
+  if start >= 0 && line[start - 1] =~ '&'
+    let b:entitiescompl = 1
+    let b:compl_context = ''
+    return start
+  endif
+  " }}}
+  " Handling of <style> tag {{{
+  let stylestart = searchpair('<style\>', '', '<\/style\>', "bnW")
+  let styleend   = searchpair('<style\>', '', '<\/style\>', "nW")
+  if stylestart != 0 && styleend != 0
+    if stylestart <= curline && styleend >= curline
+      let start = col('.') - 1
+      let b:csscompl = 1
+      while start >= 0 && line[start - 1] =~ '\(\k\|-\)'
+        let start -= 1
+      endwhile
+    endif
+  endif
+  " }}}
+  " Handling of <script> tag {{{
+  let scriptstart = searchpair('<script\>', '', '<\/script\>', "bnW")
+  let scriptend   = searchpair('<script\>', '', '<\/script\>', "nW")
+  if scriptstart != 0 && scriptend != 0
+    if scriptstart <= curline && scriptend >= curline
+      let start = col('.') - 1
+      let b:jscompl = 1
+      let b:jsrange = [scriptstart, scriptend]
+      while start >= 0 && line[start - 1] =~ '\k'
+        let start -= 1
+      endwhile
+      " We are inside of <script> tag. But we should also get contents
+      " of all linked external files and (secondary, less probably) other <script> tags
+      " This logic could possible be done in separate function - may be
+      " reused in events scripting (also with option could be reused for
+      " CSS
+      let b:js_extfiles = []
+      let l = line('.')
+      let c = col('.')
+      call cursor(1,1)
+      while search('<\@<=script\>', 'W') && line('.') <= l
+        if synIDattr(synID(line('.'),col('.')-1,0),"name") !~? 'comment'
+          let sname = matchstr(getline('.'), '<script[^>]*src\s*=\s*\([''"]\)\zs.\{-}\ze\1')
+          if filereadable(sname)
+            let b:js_extfiles += readfile(sname)
+          endif
+        endif
+      endwhile
+      call cursor(1,1)
+      let js_scripttags = []
+      while search('<script\>', 'W') && line('.') < l
+        if matchstr(getline('.'), '<script[^>]*src') == ''
+          let js_scripttag = getline(line('.'), search('</script>', 'W'))
+          let js_scripttags += js_scripttag
+        endif
+      endwhile
+      let b:js_extfiles += js_scripttags
+      call cursor(l,c)
+      unlet! l c
+    endif
+  endif
+  " }}}
+  if !exists("b:csscompl") && !exists("b:jscompl")
+    let b:compl_context = getline('.')[0:(compl_begin)]
+    if b:compl_context !~ '<[^>]*$'
+      " Look like we may have broken tag. Check previous lines.
+      let i = 1
+      while 1
+        let context_line = getline(curline-i)
+        if context_line =~ '<[^>]*$'
+          " Yep, this is this line
+          let context_lines = getline(curline-i, curline-1) + [b:compl_context]
+          let b:compl_context = join(context_lines, ' ')
+          break
+        elseif context_line =~ '>[^<]*$' || i == curline
+          " We are in normal tag line, no need for completion at all
+          " OR reached first line without tag at all
+          let b:compl_context = ''
+          break
+        endif
+        let i += 1
+      endwhile
+      " Make sure we don't have counter
+      unlet! i
+    endif
+    let b:compl_context = matchstr(b:compl_context, '.*\zs<.*')
+
+    " Return proper start for on-events. Without that beginning of
+    " completion will be badly reported
+    if b:compl_context =~? 'on[a-z]*\s*=\s*\(''[^'']*\|"[^"]*\)$'
+      let start = col('.') - 1
+      while start >= 0 && line[start - 1] =~ '\k'
+        let start -= 1
+      endwhile
+    endif
+    " If b:compl_context begins with <? we are inside of PHP code. It
+    " wasn't closed so PHP completion passed it to HTML
+    if &filetype =~? 'php' && b:compl_context =~ '^<?'
+      let b:phpcompl = 1
+      let start = col('.') - 1
+      while start >= 0 && line[start - 1] =~ '[a-zA-Z_0-9\x7f-\xff$]'
+        let start -= 1
+      endwhile
+    endif
+  else
+    let b:compl_context = getline('.')[0:compl_begin]
+  endif
     return start
   else
-	" Initialize base return lists
+  " Initialize base return lists
     let res = []
     let res2 = []
-	" a:base is very short - we need context
-	let context = b:compl_context
-	" Check if we should do CSS completion inside of <style> tag
-	" or JS completion inside of <script> tag or PHP completion in case of <?
-	" tag AND &ft==php
-	if exists("b:csscompl")
-		unlet! b:csscompl
-		let context = b:compl_context
-		unlet! b:compl_context
-		return csscomplete#CompleteCSS(0, context)
-	elseif exists("b:jscompl")
-		unlet! b:jscompl
-		return javascriptcomplete#CompleteJS(0, a:base)
-	elseif exists("b:phpcompl")
-		unlet! b:phpcompl
-		let context = b:compl_context
-		return phpcomplete#CompletePHP(0, a:base)
-	else
-		if len(b:compl_context) == 0 && !exists("b:entitiescompl")
-			return []
-		endif
-		let context = matchstr(b:compl_context, '.\zs.*')
-	endif
-	unlet! b:compl_context
-	" Entities completion {{{
-	if exists("b:entitiescompl")
-		unlet! b:entitiescompl
-
-		if !exists("b:html_omni")
-			call htmlcomplete#CheckDoctype()
-			call htmlcomplete#LoadData()
-		endif
+  " a:base is very short - we need context
+  let context = b:compl_context
+  " Check if we should do CSS completion inside of <style> tag
+  " or JS completion inside of <script> tag or PHP completion in case of <?
+  " tag AND &ft==php
+  if exists("b:csscompl")
+    unlet! b:csscompl
+    let context = b:compl_context
+    unlet! b:compl_context
+    return csscomplete#CompleteCSS(0, context)
+  elseif exists("b:jscompl")
+    unlet! b:jscompl
+    return javascriptcomplete#CompleteJS(0, a:base)
+  elseif exists("b:phpcompl")
+    unlet! b:phpcompl
+    let context = b:compl_context
+    return phpcomplete#CompletePHP(0, a:base)
+  else
+    if len(b:compl_context) == 0 && !exists("b:entitiescompl")
+      return []
+    endif
+    let context = matchstr(b:compl_context, '.\zs.*')
+  endif
+  unlet! b:compl_context
+  " Entities completion {{{
+  if exists("b:entitiescompl")
+    unlet! b:entitiescompl
+
+    if !exists("b:html_omni")
+      call htmlcomplete#CheckDoctype()
+      call htmlcomplete#LoadData()
+    endif
     if g:aria_attributes_complete == 1 && !exists("b:aria_omni")
       call htmlcomplete#LoadAria()
     endif
 
     let entities =  b:html_omni['vimxmlentities']
 
-		if len(a:base) == 1
-			for m in entities
-				if m =~ '^'.a:base
-					call add(res, m.';')
-				endif
-			endfor
-			return res
-		else
-			for m in entities
-				if m =~? '^'.a:base
-					call add(res, m.';')
-				elseif m =~? a:base
-					call add(res2, m.';')
-				endif
-			endfor
-
-			return res + res2
-		endif
-
-
-	endif
-	" }}}
-	if context =~ '>'
-		" Generally if context contains > it means we are outside of tag and
-		" should abandon action - with one exception: <style> span { bo
-		if context =~ 'style[^>]\{-}>[^<]\{-}$'
-			return csscomplete#CompleteCSS(0, context)
-		elseif context =~ 'script[^>]\{-}>[^<]\{-}$'
-			let b:jsrange = [line('.'), search('<\/script\>', 'nW')]
-			return javascriptcomplete#CompleteJS(0, context)
-		else
-			return []
-		endif
-	endif
-
-	" If context contains > it means we are already outside of tag and we
-	" should abandon action
-	" If context contains white space it is attribute.
-	" It can be also value of attribute.
-	" We have to get first word to offer proper completions
-	if context == ''
-		let tag = ''
-	else
-		let tag = split(context)[0]
-		" Detect if tag is uppercase to return in proper case,
-		" we need to make it lowercase for processing
-		if tag =~ '^\u*$'
-			let uppercase_tag = 1
-			let tag = tolower(tag)
-		else
-			let uppercase_tag = 0
-		endif
-	endif
-	" Get last word, it should be attr name
-	let attr = matchstr(context, '\S\+="[^"]*$')
+    if len(a:base) == 1
+      for m in entities
+        if m =~ '^'.a:base
+          call add(res, m.';')
+        endif
+      endfor
+      return res
+    else
+      for m in entities
+        if m =~? '^'.a:base
+          call add(res, m.';')
+        elseif m =~? a:base
+          call add(res2, m.';')
+        endif
+      endfor
+
+      return res + res2
+    endif
+
+
+  endif
+  " }}}
+  if context =~ '>'
+    " Generally if context contains > it means we are outside of tag and
+    " should abandon action - with one exception: <style> span { bo
+    if context =~ 'style[^>]\{-}>[^<]\{-}$'
+      return csscomplete#CompleteCSS(0, context)
+    elseif context =~ 'script[^>]\{-}>[^<]\{-}$'
+      let b:jsrange = [line('.'), search('<\/script\>', 'nW')]
+      return javascriptcomplete#CompleteJS(0, context)
+    else
+      return []
+    endif
+  endif
+
+  " If context contains > it means we are already outside of tag and we
+  " should abandon action
+  " If context contains white space it is attribute.
+  " It can be also value of attribute.
+  " We have to get first word to offer proper completions
+  if context == ''
+    let tag = ''
+  else
+    let tag = split(context)[0]
+    " Detect if tag is uppercase to return in proper case,
+    " we need to make it lowercase for processing
+    if tag =~ '^\u*$'
+      let uppercase_tag = 1
+      let tag = tolower(tag)
+    else
+      let uppercase_tag = 0
+    endif
+  endif
+  " Get last word, it should be attr name
+  let attr = matchstr(context, '\S\+="[^"]*$')
     if attr == ''
         let attr = matchstr(context, '.*\s\zs.*')
     endif
-	" Possible situations where any prediction would be difficult:
-	" 1. Events attributes
-	if context =~ '\s'
-		" Sort out style, class, and on* cases
-		if context =~? "\\s\\(on[a-z]+\\|id\\|style\\|class\\)\\s*=\\s*[\"']"
-			" Id, class completion {{{
-			if context =~? "\\(id\\|class\\)\\s*=\\s*[\"'][a-zA-Z0-9_ -]*$"
-				if context =~? "class\\s*=\\s*[\"'][a-zA-Z0-9_ -]*$"
-					let search_for = "class"
-				elseif context =~? "id\\s*=\\s*[\"'][a-zA-Z0-9_ -]*$"
-					let search_for = "id"
-				endif
-				" Handle class name completion
-				" 1. Find lines of <link stylesheet>
-				" 1a. Check file for @import
-				" 2. Extract filename(s?) of stylesheet,
-				call cursor(1,1)
-				let head = getline(search('<head\>'), search('<\/head>'))
-				let headjoined = join(copy(head), ' ')
-				if headjoined =~ '<style'
-					" Remove possibly confusing CSS operators
-					let stylehead = substitute(headjoined, '+>\*[,', ' ', 'g')
-					if search_for == 'class'
-						let styleheadlines = split(stylehead)
-						let headclasslines = filter(copy(styleheadlines), "v:val =~ '\\([a-zA-Z0-9:]\\+\\)\\?\\.[a-zA-Z0-9_-]\\+'")
-					else
-						let stylesheet = split(headjoined, '[{}]')
-						" Get all lines which fit id syntax
-						let classlines = filter(copy(stylesheet), "v:val =~ '#[a-zA-Z0-9_-]\\+'")
-						" Filter out possible color definitions
-						call filter(classlines, "v:val !~ ':\\s*#[a-zA-Z0-9_-]\\+'")
-						" Filter out complex border definitions
-						call filter(classlines, "v:val !~ '\\(none\\|hidden\\|dotted\\|dashed\\|solid\\|double\\|groove\\|ridge\\|inset\\|outset\\)\\s*#[a-zA-Z0-9_-]\\+'")
-						let templines = join(classlines, ' ')
-						let headclasslines = split(templines)
-						call filter(headclasslines, "v:val =~ '#[a-zA-Z0-9_-]\\+'")
-					endif
-					let internal = 1
-				else
-					let internal = 0
-				endif
-				let styletable = []
-				let secimportfiles = []
-				let filestable = filter(copy(head), "v:val =~ '\\(@import\\|link.*stylesheet\\)'")
-				for line in filestable
-					if line =~ "@import"
-						let styletable += [matchstr(line, "import\\s\\+\\(url(\\)\\?[\"']\\?\\zs\\f\\+\\ze")]
-					elseif line =~ "<link"
-						let styletable += [matchstr(line, "href\\s*=\\s*[\"']\\zs\\f\\+\\ze")]
-					endif
-				endfor
-				for file in styletable
-					if filereadable(file)
-						let stylesheet = readfile(file)
-						let secimport = filter(copy(stylesheet), "v:val =~ '@import'")
-						if len(secimport) > 0
-							for line in secimport
-								let secfile = matchstr(line, "import\\s\\+\\(url(\\)\\?[\"']\\?\\zs\\f\\+\\ze")
-								let secfile = fnamemodify(file, ":p:h").'/'.secfile
-								let secimportfiles += [secfile]
-							endfor
-						endif
-					endif
-				endfor
-				let cssfiles = styletable + secimportfiles
-				let classes = []
-				for file in cssfiles
-					if filereadable(file)
-						let stylesheet = readfile(file)
-						let stylefile = join(stylesheet, ' ')
-						let stylefile = substitute(stylefile, '+>\*[,', ' ', 'g')
-						if search_for == 'class'
-							let stylesheet = split(stylefile)
-							let classlines = filter(copy(stylesheet), "v:val =~ '\\([a-zA-Z0-9:]\\+\\)\\?\\.[a-zA-Z0-9_-]\\+'")
-						else
-							let stylesheet = split(stylefile, '[{}]')
-							" Get all lines which fit id syntax
-							let classlines = filter(copy(stylesheet), "v:val =~ '#[a-zA-Z0-9_-]\\+'")
-							" Filter out possible color definitions
-							call filter(classlines, "v:val !~ ':\\s*#[a-zA-Z0-9_-]\\+'")
-							" Filter out complex border definitions
-							call filter(classlines, "v:val !~ '\\(none\\|hidden\\|dotted\\|dashed\\|solid\\|double\\|groove\\|ridge\\|inset\\|outset\\)\\s*#[a-zA-Z0-9_-]\\+'")
-							let templines = join(classlines, ' ')
-							let stylelines = split(templines)
-							let classlines = filter(stylelines, "v:val =~ '#[a-zA-Z0-9_-]\\+'")
-
-						endif
+  " Possible situations where any prediction would be difficult:
+  " 1. Events attributes
+  if context =~ '\s'
+    " Sort out style, class, and on* cases
+    if context =~? "\\(id\\|class\\)\\s*=\\s*[\"'][a-zA-Z0-9_ -]*$"
+     \ || context =~? "style\\s*=\\s*[\"'][^\"']*$"
+     \ || context =~? 'on[a-z]*\s*=\s*\(''[^'']*\|"[^"]*\)$'
+      " Id, class completion {{{
+      if context =~? "\\(id\\|class\\)\\s*=\\s*[\"'][a-zA-Z0-9_ -]*$"
+        if context =~? "class\\s*=\\s*[\"'][a-zA-Z0-9_ -]*$"
+          let search_for = "class"
+        elseif context =~? "id\\s*=\\s*[\"'][a-zA-Z0-9_ -]*$"
+          let search_for = "id"
+        endif
+        " Handle class name completion
+        " 1. Find lines of <link stylesheet>
+        " 1a. Check file for @import
+        " 2. Extract filename(s?) of stylesheet,
+        call cursor(1,1)
+        let head = getline(search('<head\>'), search('<\/head>'))
+        let headjoined = join(copy(head), ' ')
+        if headjoined =~ '<style'
+          " Remove possibly confusing CSS operators
+          let stylehead = substitute(headjoined, '+>\*[,', ' ', 'g')
+          if search_for == 'class'
+            let styleheadlines = split(stylehead)
+            let headclasslines = filter(copy(styleheadlines), "v:val =~ '\\([a-zA-Z0-9:]\\+\\)\\?\\.[a-zA-Z0-9_-]\\+'")
+          else
+            let stylesheet = split(headjoined, '[{}]')
+            " Get all lines which fit id syntax
+            let classlines = filter(copy(stylesheet), "v:val =~ '#[a-zA-Z0-9_-]\\+'")
+            " Filter out possible color definitions
+            call filter(classlines, "v:val !~ ':\\s*#[a-zA-Z0-9_-]\\+'")
+            " Filter out complex border definitions
+            call filter(classlines, "v:val !~ '\\(none\\|hidden\\|dotted\\|dashed\\|solid\\|double\\|groove\\|ridge\\|inset\\|outset\\)\\s*#[a-zA-Z0-9_-]\\+'")
+            let templines = join(classlines, ' ')
+            let headclasslines = split(templines)
+            call filter(headclasslines, "v:val =~ '#[a-zA-Z0-9_-]\\+'")
+          endif
+          let internal = 1
+        else
+          let internal = 0
+        endif
+        let styletable = []
+        let secimportfiles = []
+        let filestable = filter(copy(head), "v:val =~ '\\(@import\\|link.*stylesheet\\)'")
+        for line in filestable
+          if line =~ "@import"
+            let styletable += [matchstr(line, "import\\s\\+\\(url(\\)\\?[\"']\\?\\zs\\f\\+\\ze")]
+          elseif line =~ "<link"
+            let styletable += [matchstr(line, "href\\s*=\\s*[\"']\\zs\\f\\+\\ze")]
+          endif
+        endfor
+        for file in styletable
+          if filereadable(file)
+            let stylesheet = readfile(file)
+            let secimport = filter(copy(stylesheet), "v:val =~ '@import'")
+            if len(secimport) > 0
+              for line in secimport
+                let secfile = matchstr(line, "import\\s\\+\\(url(\\)\\?[\"']\\?\\zs\\f\\+\\ze")
+                let secfile = fnamemodify(file, ":p:h").'/'.secfile
+                let secimportfiles += [secfile]
+              endfor
+            endif
+          endif
+        endfor
+        let cssfiles = styletable + secimportfiles
+        let classes = []
+        for file in cssfiles
+          if filereadable(file)
+            let stylesheet = readfile(file)
+            let stylefile = join(stylesheet, ' ')
+            let stylefile = substitute(stylefile, '+>\*[,', ' ', 'g')
+            if search_for == 'class'
+              let stylesheet = split(stylefile)
+              let classlines = filter(copy(stylesheet), "v:val =~ '\\([a-zA-Z0-9:]\\+\\)\\?\\.[a-zA-Z0-9_-]\\+'")
+            else
+              let stylesheet = split(stylefile, '[{}]')
+              " Get all lines which fit id syntax
+              let classlines = filter(copy(stylesheet), "v:val =~ '#[a-zA-Z0-9_-]\\+'")
+              " Filter out possible color definitions
+              call filter(classlines, "v:val !~ ':\\s*#[a-zA-Z0-9_-]\\+'")
+              " Filter out complex border definitions
+              call filter(classlines, "v:val !~ '\\(none\\|hidden\\|dotted\\|dashed\\|solid\\|double\\|groove\\|ridge\\|inset\\|outset\\)\\s*#[a-zA-Z0-9_-]\\+'")
+              let templines = join(classlines, ' ')
+              let stylelines = split(templines)
+              let classlines = filter(stylelines, "v:val =~ '#[a-zA-Z0-9_-]\\+'")
+
+            endif
                         " We gathered classes definitions from all external files
                         let classes += classlines
-					endif
-				endfor
-				if internal == 1
-					let classes += headclasslines
-				endif
-
-				if search_for == 'class'
-					let elements = {}
-					for element in classes
-						if element =~ '^\.'
-							let class = matchstr(element, '^\.\zs[a-zA-Z][a-zA-Z0-9_-]*\ze')
-							let class = substitute(class, ':.*', '', '')
-							if has_key(elements, 'common')
-								let elements['common'] .= ' '.class
-							else
-								let elements['common'] = class
-							endif
-						else
-							let class = matchstr(element, '[a-zA-Z1-6]*\.\zs[a-zA-Z][a-zA-Z0-9_-]*\ze')
-							let tagname = tolower(matchstr(element, '[a-zA-Z1-6]*\ze.'))
-							if tagname != ''
-								if has_key(elements, tagname)
-									let elements[tagname] .= ' '.class
-								else
-									let elements[tagname] = class
-								endif
-							endif
-						endif
-					endfor
-
-					if has_key(elements, tag) && has_key(elements, 'common')
-						let values = split(elements[tag]." ".elements['common'])
-					elseif has_key(elements, tag) && !has_key(elements, 'common')
-						let values = split(elements[tag])
-					elseif !has_key(elements, tag) && has_key(elements, 'common')
-						let values = split(elements['common'])
-					else
-						return []
-					endif
-
-				elseif search_for == 'id'
-					" Find used IDs
-					" 1. Catch whole file
-					let filelines = getline(1, line('$'))
-					" 2. Find lines with possible id
-					let used_id_lines = filter(filelines, 'v:val =~ "id\\s*=\\s*[\"''][a-zA-Z0-9_-]\\+"')
-					" 3a. Join all filtered lines
-					let id_string = join(used_id_lines, ' ')
-					" 3b. And split them to be sure each id is in separate item
-					let id_list = split(id_string, 'id\s*=\s*')
-					" 4. Extract id values
-					let used_id = map(id_list, 'matchstr(v:val, "[\"'']\\zs[a-zA-Z0-9_-]\\+\\ze")')
-					let joined_used_id = ','.join(used_id, ',').','
-
-					let allvalues = map(classes, 'matchstr(v:val, ".*#\\zs[a-zA-Z0-9_-]\\+")')
-
-					let values = []
-
-					for element in classes
-						if joined_used_id !~ ','.element.','
-							let values += [element]
-						endif
-
-					endfor
-
-				endif
-
-				" We need special version of sbase
-				let classbase = matchstr(context, ".*[\"']")
-				let classquote = matchstr(classbase, '.$')
-
-				let entered_class = matchstr(attr, ".*=\\s*[\"']\\zs.*")
-
-				for m in sort(values)
-					if m =~? '^'.entered_class
-						call add(res, m . classquote)
-					elseif m =~? entered_class
-						call add(res2, m . classquote)
-					endif
-				endfor
-
-				return res + res2
-
-			elseif context =~? "style\\s*=\\s*[\"'][^\"']*$"
-				return csscomplete#CompleteCSS(0, context)
-
-			endif
-			" }}}
-			" Complete on-events {{{
-			if context =~? 'on[a-z]*\s*=\s*\(''[^'']*\|"[^"]*\)$'
-				" We have to:
-				" 1. Find external files
-				let b:js_extfiles = []
-				let l = line('.')
-				let c = col('.')
-				call cursor(1,1)
-				while search('<\@<=script\>', 'W') && line('.') <= l
-					if synIDattr(synID(line('.'),col('.')-1,0),"name") !~? 'comment'
-						let sname = matchstr(getline('.'), '<script[^>]*src\s*=\s*\([''"]\)\zs.\{-}\ze\1')
-						if filereadable(sname)
-							let b:js_extfiles += readfile(sname)
-						endif
-					endif
-				endwhile
-				" 2. Find at least one <script> tag
-				call cursor(1,1)
-				let js_scripttags = []
-				while search('<script\>', 'W') && line('.') < l
-					if matchstr(getline('.'), '<script[^>]*src') == ''
-						let js_scripttag = getline(line('.'), search('</script>', 'W'))
-						let js_scripttags += js_scripttag
-					endif
-				endwhile
-				let b:js_extfiles += js_scripttags
-
-				" 3. Proper call for javascriptcomplete#CompleteJS
-				call cursor(l,c)
-				let js_context = matchstr(a:base, '\k\+$')
-				let js_shortcontext = substitute(a:base, js_context.'$', '', '')
-				let b:compl_context = context
-				let b:jsrange = [l, l]
-				unlet! l c
-				return javascriptcomplete#CompleteJS(0, js_context)
-
-			endif
-
-			" }}}
-			let stripbase = matchstr(context, ".*\\(on[a-zA-Z]*\\|style\\|class\\)\\s*=\\s*[\"']\\zs.*")
-			" Now we have context stripped from all chars up to style/class.
-			" It may fail with some strange style value combinations.
-			if stripbase !~ "[\"']"
-				return []
-			endif
-		endif
-		" Value of attribute completion {{{
-		" If attr contains =\s*[\"'] we catched value of attribute
-		if attr =~ "=\s*[\"']" || attr =~ "=\s*$"
-			" Let do attribute specific completion
-			let attrname = matchstr(attr, '.*\ze\s*=')
-			let entered_value = matchstr(attr, ".*=\\s*[\"']\\?\\zs.*")
-			let values = []
-			" Load data {{{
-			if !exists("b:html_omni")
-				call htmlcomplete#CheckDoctype()
-				call htmlcomplete#LoadData()
-			endif
+          endif
+        endfor
+        if internal == 1
+          let classes += headclasslines
+        endif
+
+        if search_for == 'class'
+          let elements = {}
+          for element in classes
+            if element =~ '^\.'
+              let class = matchstr(element, '^\.\zs[a-zA-Z][a-zA-Z0-9_-]*\ze')
+              let class = substitute(class, ':.*', '', '')
+              if has_key(elements, 'common')
+                let elements['common'] .= ' '.class
+              else
+                let elements['common'] = class
+              endif
+            else
+              let class = matchstr(element, '[a-zA-Z1-6]*\.\zs[a-zA-Z][a-zA-Z0-9_-]*\ze')
+              let tagname = tolower(matchstr(element, '[a-zA-Z1-6]*\ze.'))
+              if tagname != ''
+                if has_key(elements, tagname)
+                  let elements[tagname] .= ' '.class
+                else
+                  let elements[tagname] = class
+                endif
+              endif
+            endif
+          endfor
+
+          if has_key(elements, tag) && has_key(elements, 'common')
+            let values = split(elements[tag]." ".elements['common'])
+          elseif has_key(elements, tag) && !has_key(elements, 'common')
+            let values = split(elements[tag])
+          elseif !has_key(elements, tag) && has_key(elements, 'common')
+            let values = split(elements['common'])
+          else
+            return []
+          endif
+
+        elseif search_for == 'id'
+          " Find used IDs
+          " 1. Catch whole file
+          let filelines = getline(1, line('$'))
+          " 2. Find lines with possible id
+          let used_id_lines = filter(filelines, 'v:val =~ "id\\s*=\\s*[\"''][a-zA-Z0-9_-]\\+"')
+          " 3a. Join all filtered lines
+          let id_string = join(used_id_lines, ' ')
+          " 3b. And split them to be sure each id is in separate item
+          let id_list = split(id_string, 'id\s*=\s*')
+          " 4. Extract id values
+          let used_id = map(id_list, 'matchstr(v:val, "[\"'']\\zs[a-zA-Z0-9_-]\\+\\ze")')
+          let joined_used_id = ','.join(used_id, ',').','
+
+          let allvalues = map(classes, 'matchstr(v:val, ".*#\\zs[a-zA-Z0-9_-]\\+")')
+
+          let values = []
+
+          for element in classes
+            if joined_used_id !~ ','.element.','
+              let values += [element]
+            endif
+
+          endfor
+
+        endif
+
+        " We need special version of sbase
+        let classbase = matchstr(context, ".*[\"']")
+        let classquote = matchstr(classbase, '.$')
+
+        let entered_class = matchstr(attr, ".*=\\s*[\"']\\zs.*")
+
+        for m in sort(values)
+          if m =~? '^'.entered_class
+            call add(res, m . classquote)
+          elseif m =~? entered_class
+            call add(res2, m . classquote)
+          endif
+        endfor
+
+        return res + res2
+
+      elseif context =~? "style\\s*=\\s*[\"'][^\"']*$"
+        return csscomplete#CompleteCSS(0, context)
+
+      endif
+      " }}}
+      " Complete on-events {{{
+      if context =~? 'on[a-z]*\s*=\s*\(''[^'']*\|"[^"]*\)$'
+        " We have to:
+        " 1. Find external files
+        let b:js_extfiles = []
+        let l = line('.')
+        let c = col('.')
+        call cursor(1,1)
+        while search('<\@<=script\>', 'W') && line('.') <= l
+          if synIDattr(synID(line('.'),col('.')-1,0),"name") !~? 'comment'
+            let sname = matchstr(getline('.'), '<script[^>]*src\s*=\s*\([''"]\)\zs.\{-}\ze\1')
+            if filereadable(sname)
+              let b:js_extfiles += readfile(sname)
+            endif
+          endif
+        endwhile
+        " 2. Find at least one <script> tag
+        call cursor(1,1)
+        let js_scripttags = []
+        while search('<script\>', 'W') && line('.') < l
+          if matchstr(getline('.'), '<script[^>]*src') == ''
+            let js_scripttag = getline(line('.'), search('</script>', 'W'))
+            let js_scripttags += js_scripttag
+          endif
+        endwhile
+        let b:js_extfiles += js_scripttags
+
+        " 3. Proper call for javascriptcomplete#CompleteJS
+        call cursor(l,c)
+        let js_context = matchstr(a:base, '\k\+$')
+        let js_shortcontext = substitute(a:base, js_context.'$', '', '')
+        let b:compl_context = context
+        let b:jsrange = [l, l]
+        unlet! l c
+        return javascriptcomplete#CompleteJS(0, js_context)
+
+      endif
+
+      " }}}
+      let stripbase = matchstr(context, ".*\\(on[a-zA-Z]*\\|style\\|class\\)\\s*=\\s*[\"']\\zs.*")
+      " Now we have context stripped from all chars up to style/class.
+      " It may fail with some strange style value combinations.
+      if stripbase !~ "[\"']"
+        return []
+      endif
+    endif
+    " Value of attribute completion {{{
+    " If attr contains =\s*[\"'] we catched value of attribute
+    if attr =~ "=\s*[\"']" || attr =~ "=\s*$"
+      " Let do attribute specific completion
+      let attrname = matchstr(attr, '.*\ze\s*=')
+      let entered_value = matchstr(attr, ".*=\\s*[\"']\\?\\zs.*")
+      let values = []
+      " Load data {{{
+      if !exists("b:html_omni")
+        call htmlcomplete#CheckDoctype()
+        call htmlcomplete#LoadData()
+      endif
       if g:aria_attributes_complete == 1 && !exists("b:aria_omni")
         call htmlcomplete#LoadAria()
       endif
-			" }}}
-			if attrname == 'href'
-				" Now we are looking for local anchors defined by name or id
-				if entered_value =~ '^#'
-					let file = join(getline(1, line('$')), ' ')
-					" Split it be sure there will be one id/name element in
-					" item, it will be also first word [a-zA-Z0-9_-] in element
-					let oneelement = split(file, "\\(meta \\)\\@<!\\(name\\|id\\)\\s*=\\s*[\"']")
-					for i in oneelement
-						let values += ['#'.matchstr(i, "^[a-zA-Z][a-zA-Z0-9%_-]*")]
-					endfor
-				endif
-			else
-				if has_key(b:html_omni, tag) && has_key(b:html_omni[tag][1], attrname)
-					let values = b:html_omni[tag][1][attrname]
+      " }}}
+      if attrname == 'href'
+        " Now we are looking for local anchors defined by name or id
+        if entered_value =~ '^#'
+          let file = join(getline(1, line('$')), ' ')
+          " Split it be sure there will be one id/name element in
+          " item, it will be also first word [a-zA-Z0-9_-] in element
+          let oneelement = split(file, "\\(meta \\)\\@<!\\(name\\|id\\)\\s*=\\s*[\"']")
+          for i in oneelement
+            let values += ['#'.matchstr(i, "^[a-zA-Z][a-zA-Z0-9%_-]*")]
+          endfor
+        endif
+      else
+        if has_key(b:html_omni, tag) && has_key(b:html_omni[tag][1], attrname)
+          let values = b:html_omni[tag][1][attrname]
                 elseif attrname =~ '^aria-' && exists("b:aria_omni") && has_key(b:aria_omni['aria_attributes'], attrname)
-					let values = b:aria_omni['aria_attributes'][attrname]
-				else
-					return []
-				endif
-			endif
-
-			if len(values) == 0
-				return []
+          let values = b:aria_omni['aria_attributes'][attrname]
+        else
+          return []
+        endif
+      endif
+
+      if len(values) == 0
+        return []
             endif
 
-			" We need special version of sbase
-			let attrbase = matchstr(context, ".*[\"']")
-			let attrquote = matchstr(attrbase, '.$')
-			if attrquote !~ "['\"]"
-				let attrquoteopen = '"'
+      " We need special version of sbase
+      let attrbase = matchstr(context, ".*[\"']")
+      let attrquote = matchstr(attrbase, '.$')
+      if attrquote !~ "['\"]"
+        let attrquoteopen = '"'
                 let attrquote = '"'
-			else
-				let attrquoteopen = ''
+      else
+        let attrquoteopen = ''
             endif
             " Multi value attributes don't need ending quote
             let info = ''
@@ -563,39 +565,39 @@ function! htmlcomplete#CompleteTags(findstart, base)
                     let entered_value = split(entered_value)[-1]
                 endif
             endif
-			for m in values
-				" This if is needed to not offer all completions as-is
-				" alphabetically but sort them. Those beginning with entered
-				" part will be as first choices
-				if m =~ '^'.entered_value
-					call add(res, attrquoteopen . m . attrquote)
-				elseif m =~ entered_value
-					call add(res2, attrquoteopen . m . attrquote)
-				endif
-			endfor
-
-			return res + res2
-
-		endif
-		" }}}
-		" Attribute completion {{{
-		" Shorten context to not include last word
-		let sbase = matchstr(context, '.*\ze\s.*')
-
-		" Load data {{{
-		if !exists("b:html_omni")
-			call htmlcomplete#CheckDoctype()
-			call htmlcomplete#LoadData()
-		endif
+      for m in values
+        " This if is needed to not offer all completions as-is
+        " alphabetically but sort them. Those beginning with entered
+        " part will be as first choices
+        if m =~ '^'.entered_value
+          call add(res, attrquoteopen . m . attrquote)
+        elseif m =~ entered_value
+          call add(res2, attrquoteopen . m . attrquote)
+        endif
+      endfor
+
+      return res + res2
+
+    endif
+    " }}}
+    " Attribute completion {{{
+    " Shorten context to not include last word
+    let sbase = matchstr(context, '.*\ze\s.*')
+
+    " Load data {{{
+    if !exists("b:html_omni")
+      call htmlcomplete#CheckDoctype()
+      call htmlcomplete#LoadData()
+    endif
     if g:aria_attributes_complete == 1 && !exists("b:aria_omni")
       call htmlcomplete#LoadAria()
     endif
-		" }}}
+    " }}}
 
-		if has_key(b:html_omni, tag)
-			let attrs = keys(b:html_omni[tag][1])
-		else
-			return []
+    if has_key(b:html_omni, tag)
+      let attrs = keys(b:html_omni[tag][1])
+    else
+      return []
         endif
         if exists("b:aria_omni")
             let roles = []
@@ -617,28 +619,28 @@ function! htmlcomplete#CompleteTags(findstart, base)
             endfor
         endif
 
-		for m in sort(attrs)
-			if m =~ '^'.attr
-				call add(res, m)
-			elseif m =~ attr
-				call add(res2, m)
-			endif
-		endfor
-		"let menu = res + res2
-		let menu = res
-		if has_key(b:html_omni, 'vimxmlattrinfo') || (exists("b:aria_omni") && has_key(b:aria_omni, 'vimariaattrinfo'))
-			let final_menu = []
-			for i in range(len(menu))
-				let item = menu[i]
-				if has_key(b:html_omni['vimxmlattrinfo'], item)
-					let m_menu = b:html_omni['vimxmlattrinfo'][item][0]
-					let m_info = b:html_omni['vimxmlattrinfo'][item][1]
+    for m in sort(attrs)
+      if m =~ '^'.attr
+        call add(res, m)
+      elseif m =~ attr
+        call add(res2, m)
+      endif
+    endfor
+    "let menu = res + res2
+    let menu = res
+    if has_key(b:html_omni, 'vimxmlattrinfo') || (exists("b:aria_omni") && has_key(b:aria_omni, 'vimariaattrinfo'))
+      let final_menu = []
+      for i in range(len(menu))
+        let item = menu[i]
+        if has_key(b:html_omni['vimxmlattrinfo'], item)
+          let m_menu = b:html_omni['vimxmlattrinfo'][item][0]
+          let m_info = b:html_omni['vimxmlattrinfo'][item][1]
                 elseif exists("b:aria_omni") && has_key(b:aria_omni['vimariaattrinfo'], item)
-					let m_menu = b:aria_omni['vimariaattrinfo'][item][0]
-					let m_info = b:aria_omni['vimariaattrinfo'][item][1]
+          let m_menu = b:aria_omni['vimariaattrinfo'][item][0]
+          let m_info = b:aria_omni['vimariaattrinfo'][item][1]
                 else
-					let m_menu = ''
-					let m_info = ''
+          let m_menu = ''
+          let m_info = ''
                 endif
                 if item =~ '^aria-' && exists("b:aria_omni")
                     if len(b:aria_omni['aria_attributes'][item]) > 0 && b:aria_omni['aria_attributes'][item][0] =~ '^\(BOOL\|'.item.'\)$'
@@ -655,128 +657,128 @@ function! htmlcomplete#CompleteTags(findstart, base)
                         let item .= '="'
                     endif
                 endif
-				let final_menu += [{'word':item, 'menu':m_menu, 'info':m_info}]
-			endfor
-		else
-			let final_menu = []
-			for i in range(len(menu))
-				let item = menu[i]
-				if len(b:html_omni[tag][1][item]) > 0 && b:html_omni[tag][1][item][0] =~ '^\(BOOL\|'.item.'\)$'
-					let item = item
-				else
-					let item .= '="'
-				endif
-				let final_menu += [item]
-			endfor
-			return final_menu
-
-		endif
-		return final_menu
-
-	endif
-	" }}}
-	" Close tag {{{
-	let b:unaryTagsStack = "area base br col command embed hr img input keygen link meta param source track wbr"
-	if context =~ '^\/'
-		if context =~ '^\/.'
-			return []
-		else
-			let opentag = xmlcomplete#GetLastOpenTag("b:unaryTagsStack")
-			return [opentag.">"]
-		endif
-	endif
-	" }}}
-	" Load data {{{
-	if !exists("b:html_omni")
-		call htmlcomplete#CheckDoctype()
-		call htmlcomplete#LoadData()
-	endif
+        let final_menu += [{'word':item, 'menu':m_menu, 'info':m_info}]
+      endfor
+    else
+      let final_menu = []
+      for i in range(len(menu))
+        let item = menu[i]
+        if len(b:html_omni[tag][1][item]) > 0 && b:html_omni[tag][1][item][0] =~ '^\(BOOL\|'.item.'\)$'
+          let item = item
+        else
+          let item .= '="'
+        endif
+        let final_menu += [item]
+      endfor
+      return final_menu
+
+    endif
+    return final_menu
+
+  endif
+  " }}}
+  " Close tag {{{
+  let b:unaryTagsStack = "area base br col command embed hr img input keygen link meta param source track wbr"
+  if context =~ '^\/'
+    if context =~ '^\/.'
+      return []
+    else
+      let opentag = xmlcomplete#GetLastOpenTag("b:unaryTagsStack")
+      return [opentag.">"]
+    endif
+  endif
+  " }}}
+  " Load data {{{
+  if !exists("b:html_omni")
+    call htmlcomplete#CheckDoctype()
+    call htmlcomplete#LoadData()
+  endif
   if g:aria_attributes_complete == 1 && !exists("b:aria_omni")
     call htmlcomplete#LoadAria()
   endif
-	" }}}
-	" Tag completion {{{
-	" Deal with tag completion.
-	let opentag = tolower(xmlcomplete#GetLastOpenTag("b:unaryTagsStack"))
-	" MM: TODO: GLOT works always the same but with some weird situation it
-	" behaves as intended in HTML but screws in PHP
-	if opentag == '' || &filetype == 'php' && !has_key(b:html_omni, opentag)
-		" Hack for sometimes failing GetLastOpenTag.
-		" As far as I tested fail isn't GLOT fault but problem
-		" of invalid document - not properly closed tags and other mish-mash.
-		" Also when document is empty. Return list of *all* tags.
-	    let tags = keys(b:html_omni)
-		call filter(tags, 'v:val !~ "^vimxml"')
-	else
-		if has_key(b:html_omni, opentag)
-			let tags = b:html_omni[opentag][0]
-		else
-			return []
-		endif
-	endif
-	" }}}
-
-	if exists("uppercase_tag") && uppercase_tag == 1
-		let context = tolower(context)
-	endif
-	" Handle XML keywords: DOCTYPE
-	if opentag == ''
-		let tags = [
-				\ '!DOCTYPE html>',
-				\ '!DOCTYPE html PUBLIC "-//W3C//DTD HTML 3.2 Final//EN">',
-				\ '!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.0//EN" "http://www.w3.org/TR/REC-html40/strict.dtd">',
-				\ '!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN" "http://www.w3.org/TR/REC-html40/loose.dtd">',
-				\ '!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.0 Frameset//EN" "http://www.w3.org/TR/REC-html40/frameset.dtd">',
-				\ '!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">',
-				\ '!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">',
-				\ '!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Frameset//EN" "http://www.w3.org/TR/html4/frameset.dtd">',
-				\ '!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">',
-				\ '!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">',
-				\ '!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Frameset//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-frameset.dtd">',
-				\ '!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN" "http://www.w3.org/1999/xhtml">'
-				\ ] + sort(tags)
-	endif
-
-	"for m in sort(tags)
-	for m in tags
-		if m =~ '^'.context
-			call add(res, m)
-		elseif m =~ context
-			call add(res2, m)
-		endif
-	endfor
-	let menu = res + res2
-	if has_key(b:html_omni, 'vimxmltaginfo')
-		let final_menu = []
-		for i in range(len(menu))
-			let item = menu[i]
-			if has_key(b:html_omni['vimxmltaginfo'], item)
-				let m_menu = b:html_omni['vimxmltaginfo'][item][0]
-				let m_info = b:html_omni['vimxmltaginfo'][item][1]
-			else
-				let m_menu = ''
-				let m_info = ''
-			endif
-			if &filetype == 'html' && exists("uppercase_tag") && uppercase_tag == 1 && item !~ 'DOCTYPE'
-				let item = toupper(item)
-			endif
-			if item =~ 'DOCTYPE'
+  " }}}
+  " Tag completion {{{
+  " Deal with tag completion.
+  let opentag = tolower(xmlcomplete#GetLastOpenTag("b:unaryTagsStack"))
+  " MM: TODO: GLOT works always the same but with some weird situation it
+  " behaves as intended in HTML but screws in PHP
+  if opentag == '' || &filetype == 'php' && !has_key(b:html_omni, opentag)
+    " Hack for sometimes failing GetLastOpenTag.
+    " As far as I tested fail isn't GLOT fault but problem
+    " of invalid document - not properly closed tags and other mish-mash.
+    " Also when document is empty. Return list of *all* tags.
+      let tags = keys(b:html_omni)
+    call filter(tags, 'v:val !~ "^vimxml"')
+  else
+    if has_key(b:html_omni, opentag)
+      let tags = b:html_omni[opentag][0]
+    else
+      return []
+    endif
+  endif
+  " }}}
+
+  if exists("uppercase_tag") && uppercase_tag == 1
+    let context = tolower(context)
+  endif
+  " Handle XML keywords: DOCTYPE
+  if opentag == ''
+    let tags = [
+        \ '!DOCTYPE html>',
+        \ '!DOCTYPE html PUBLIC "-//W3C//DTD HTML 3.2 Final//EN">',
+        \ '!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.0//EN" "http://www.w3.org/TR/REC-html40/strict.dtd">',
+        \ '!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN" "http://www.w3.org/TR/REC-html40/loose.dtd">',
+        \ '!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.0 Frameset//EN" "http://www.w3.org/TR/REC-html40/frameset.dtd">',
+        \ '!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">',
+        \ '!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">',
+        \ '!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Frameset//EN" "http://www.w3.org/TR/html4/frameset.dtd">',
+        \ '!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">',
+        \ '!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">',
+        \ '!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Frameset//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-frameset.dtd">',
+        \ '!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN" "http://www.w3.org/1999/xhtml">'
+        \ ] + sort(tags)
+  endif
+
+  "for m in sort(tags)
+  for m in tags
+    if m =~ '^'.context
+      call add(res, m)
+    elseif m =~ context
+      call add(res2, m)
+    endif
+  endfor
+  let menu = res + res2
+  if has_key(b:html_omni, 'vimxmltaginfo')
+    let final_menu = []
+    for i in range(len(menu))
+      let item = menu[i]
+      if has_key(b:html_omni['vimxmltaginfo'], item)
+        let m_menu = b:html_omni['vimxmltaginfo'][item][0]
+        let m_info = b:html_omni['vimxmltaginfo'][item][1]
+      else
+        let m_menu = ''
+        let m_info = ''
+      endif
+      if &filetype == 'html' && exists("uppercase_tag") && uppercase_tag == 1 && item !~ 'DOCTYPE'
+        let item = toupper(item)
+      endif
+      if item =~ 'DOCTYPE'
                 if item =~ 'DTD'
                     let abbr = 'DOCTYPE '.matchstr(item, 'DTD \zsX\?HTML .\{-}\ze\/\/')
                 else
                     let abbr = 'DOCTYPE HTML 5'
                 endif
-			else
-				let abbr = item
-			endif
-			let final_menu += [{'abbr':abbr, 'word':item, 'menu':m_menu, 'info':m_info}]
-		endfor
-	else
-		let final_menu = menu
-	endif
-	return final_menu
-
-	" }}}
+      else
+        let abbr = item
+      endif
+      let final_menu += [{'abbr':abbr, 'word':item, 'menu':m_menu, 'info':m_info}]
+    endfor
+  else
+    let final_menu = menu
+  endif
+  return final_menu
+
+  " }}}
   endif
 endfunction
 
@@ -794,48 +796,48 @@ function! htmlcomplete#LoadAria() " {{{
 endfunction
 " }}}
 function! htmlcomplete#LoadData() " {{{
-	if !exists("b:html_omni_flavor")
-		if &filetype == 'html'
-			let b:html_omni_flavor = 'html5'
-		else
-			let b:html_omni_flavor = 'html5'
-		endif
-	endif
-	" With that if we still have bloated memory but create new buffer
-	" variables only by linking to existing g:variable, not sourcing whole
-	" file.
-	if exists('g:xmldata_'.b:html_omni_flavor)
-		exe 'let b:html_omni = g:xmldata_'.b:html_omni_flavor
-	else
-		exe 'runtime! autoload/xml/'.b:html_omni_flavor.'.vim'
-		exe 'let b:html_omni = g:xmldata_'.b:html_omni_flavor
-	endif
+  if !exists("b:html_omni_flavor")
+    if &filetype == 'html'
+      let b:html_omni_flavor = 'html5'
+    else
+      let b:html_omni_flavor = 'html5'
+    endif
+  endif
+  " With that if we still have bloated memory but create new buffer
+  " variables only by linking to existing g:variable, not sourcing whole
+  " file.
+  if exists('g:xmldata_'.b:html_omni_flavor)
+    exe 'let b:html_omni = g:xmldata_'.b:html_omni_flavor
+  else
+    exe 'runtime! autoload/xml/'.b:html_omni_flavor.'.vim'
+    exe 'let b:html_omni = g:xmldata_'.b:html_omni_flavor
+  endif
 endfunction
 " }}}
 function! htmlcomplete#CheckDoctype() " {{{
-	if exists('b:html_omni_flavor')
-		let old_flavor = b:html_omni_flavor
-	else
-		let old_flavor = ''
-	endif
-	call htmlcomplete#DetectOmniFlavor()
-	if !exists('b:html_omni_flavor')
-		return
-	else
-		" Tie g:xmldata with b:html_omni this way we need to sourca data file only
-		" once, not every time per buffer.
-		if old_flavor == b:html_omni_flavor
-			return
-		else
-			if exists('g:xmldata_'.b:html_omni_flavor)
-				exe 'let b:html_omni = g:xmldata_'.b:html_omni_flavor
-			else
-				exe 'runtime! autoload/xml/'.b:html_omni_flavor.'.vim'
-				exe 'let b:html_omni = g:xmldata_'.b:html_omni_flavor
-			endif
-			return
-		endif
-	endif
+  if exists('b:html_omni_flavor')
+    let old_flavor = b:html_omni_flavor
+  else
+    let old_flavor = ''
+  endif
+  call htmlcomplete#DetectOmniFlavor()
+  if !exists('b:html_omni_flavor')
+    return
+  else
+    " Tie g:xmldata with b:html_omni this way we need to sourca data file only
+    " once, not every time per buffer.
+    if old_flavor == b:html_omni_flavor
+      return
+    else
+      if exists('g:xmldata_'.b:html_omni_flavor)
+        exe 'let b:html_omni = g:xmldata_'.b:html_omni_flavor
+      else
+        exe 'runtime! autoload/xml/'.b:html_omni_flavor.'.vim'
+        exe 'let b:html_omni = g:xmldata_'.b:html_omni_flavor
+      endif
+      return
+    endif
+  endif
 endfunction
 " }}}
 " vim:set foldmethod=marker: