mv zencoding/xxx.vim to zencoding/lang/xxx.vim

autoload/zencoding/lang/haml.vim

@@ -0,0 +1,73 @@
+function! zencoding#lang#haml#findTokens(str)
+  return zencoding#html#findTokens(a:str)
+endfunction
+
+function! zencoding#lang#haml#parseIntoTree(abbr, type)
+  return zencoding#lang#html#parseIntoTree(a:abbr, a:type)
+endfunction
+
+function! zencoding#lang#haml#toString(settings, current, type, inline, filters, itemno, indent)
+  let settings = a:settings
+  let current = a:current
+  let type = a:type
+  let inline = a:inline
+  let filters = a:filters
+  let itemno = a:itemno
+  let indent = a:indent
+  let str = ""
+
+  let comment_indent = ''
+  let comment = ''
+  let current_name = current.name
+  let current_name = substitute(current.name, '\$$', itemno+1, '')
+  if len(current.name) > 0
+    let str .= '%' . current_name
+    let tmp = ''
+    for attr in keys(current.attr)
+      let val = current.attr[attr]
+      while val =~ '\$\([^#{]\|$\)'
+        let val = substitute(val, '\(\$\+\)\([^{]\|$\)', '\=printf("%0".len(submatch(1))."d", itemno+1).submatch(2)', 'g')
+      endwhile
+      let attr = substitute(attr, '\$$', itemno+1, '')
+      if attr == 'id'
+        let str .= '#' . val
+      elseif attr == 'class'
+        let str .= '.' . substitute(val, ' ', '.', 'g')
+      else
+        if len(tmp) > 0 | let tmp .= ',' | endif
+        let tmp .= ' :' . attr . ' => "' . val . '"'
+      endif
+    endfor
+    if len(tmp)
+      let str .= '{' . tmp . ' }'
+    endif
+    if stridx(','.settings.html.empty_elements.',', ','.current_name.',') != -1 && len(current.value) == 0
+      let str .= "/"
+    endif
+
+    let inner = ''
+    if len(current.value) > 0
+      let lines = split(current.value[1:-2], "\n")
+      let str .= " " . lines[0]
+      for line in lines[1:]
+        let str .= " |\n" . line
+      endfor
+    endif
+    if len(current.child) == 1 && len(current.child[0].name) == 0
+      let lines = split(current.child[0].value[1:-2], "\n")
+      let str .= " " . lines[0]
+      for line in lines[1:]
+        let str .= " |\n" . line
+      endfor
+    elseif len(current.child) > 0
+      for child in current.child
+        let inner .= zencoding#toString(child, type, inline, filters)
+      endfor
+      let inner = substitute(inner, "\n", "\n  ", 'g')
+      let inner = substitute(inner, "\n  $", "", 'g')
+      let str .= "\n  " . inner
+    endif
+  endif
+  let str .= "\n"
+  return str
+endfunction