PageRenderTime 246ms CodeModel.GetById 6ms RepoModel.GetById 0ms app.codeStats 1ms

/vim/ftplugin/latex-suite/envmacros.vim

https://bitbucket.org/vertespain/config
Vim Script | 1166 lines | 841 code | 100 blank | 225 comment | 193 complexity | df19e946e497c9738b2adb4892a461d2 MD5 | raw file
    

  1. "=============================================================================
    2. 

  2. " 	     File: envmacros.vim
    3. 

  3. "      Author: Mikolaj Machowski
    4. 

  4. "     Created: Tue Apr 23 08:00 PM 2002 PST
    5. 

  5. "  CVS Header: $Id: envmacros.vim 1051 2009-06-02 18:33:54Z tmaas $
    6. 

  6. "  Description: mappings/menus for environments. 
    7. 

  7. "=============================================================================
    8. 

    9. 

  9. if !g:Tex_EnvironmentMaps && !g:Tex_EnvironmentMenus
    10. 

  10. 	finish
    11. 

  11. endif
    12. 

  12. 

  13. exe 'so '.fnameescape(expand('<sfile>:p:h').'/wizardfuncs.vim')
    14. 

  14. 

  15. nmap <silent> <script> <plug> i
    16. 

  16. imap <silent> <script> <C-o><plug> <Nop>
    17. 

  17. 

  18. " Define environments for IMAP evaluation " {{{
    19. 

  19. let s:figure =     "\\begin{figure}[<+htpb+>]\<cr>\\begin{center}\<cr>\\psfig{figure=<+eps file+>}\<cr>\\end{center}\<cr>\\caption{<+caption text+>}\<cr>\\label{fig:<+label+>}\<cr>\\end{figure}<++>"
    20. 

  20. let s:figure_graphicx =    "\\begin{figure}[<+htpb+>]\<cr>\\begin{center}\<cr>\\includegraphics{<+file+>}\<cr>\\end{center}\<cr>\\caption{<+caption text+>}\<cr>\\label{fig:<+label+>}\<cr>\\end{figure}<++>"
    21. 

  21. let s:minipage =   "\\begin{minipage}[<+tb+>]{<+width+>}\<cr><++>\<cr>\\end{minipage}<++>"
    22. 

  22. let s:picture =    "\\begin{picture}(<+width+>, <+height+>)(<+xoff+>,<+yoff+>)\<cr>\\put(<+xoff+>,<+yoff+>){\\framebox(<++>,<++>){<++>}}\<cr>\\end{picture}<++>"
    23. 

  23. let s:list =       "\\begin{list}{<+label+>}{<+spacing+>}\<cr>\\item <++>\<cr>\\end{list}<++>"
    24. 

  24. let s:table =      "\\begin{table}\<cr>\\centering\<cr>\\begin{tabular}{<+dimensions+>}\<cr><++>\<cr>\\end{tabular}\<cr>\\caption{<+Caption text+>}\<cr>\\label{tab:<+label+>}\<cr>\\end{table}<++>"
    25. 

  25. let s:array =      "\\left<++>\<cr>\\begin{array}{<+dimension+>}\<cr><+elements+>\<cr>\\end{array}\<cr>\\right<++>"
    26. 

  26. let s:description ="\\begin{description}\<cr>\\item[<+label+>]<++>\<cr>\\end{description}<++>"
    27. 

  27. let s:document =   "\\documentclass[<+options+>]{<+class+>}\<cr>\<cr>\\begin{document}\<cr><++>\<cr>\\end{document}"
    28. 

  28. let s:tabular = "\\begin{tabular}[<+hbtp+>]{<+format+>}\<cr><++>\<cr>\\end{tabular}"
    29. 

  29. let s:tabular_star = "\\begin{tabular*}[<+hbtp+>]{<+format+>}\<cr><++>\<cr>\\end{tabular*}"
    30. 

  30. 

  31. " }}}
    32. 

  32. " define environments with special behavior in line wise selection. {{{
    33. 

  33. if !exists('s:vis_center_left')
    34. 

  34. 	let s:vis_center_left = '\centerline{'
    35. 

  35. 	let s:vis_center_right = '}'
    36. 

  36. 

  37. 	let s:vis_verbatim_left = '\verb\|'
    38. 

  38. 	let s:vis_verbatim_right = '\|'
    39. 

  39. 

  40. 	let s:vis_flushright_left =  '{\raggedright '
    41. 

  41. 	let s:vis_flushright_right = '}'
    42. 

  42. 

  43. 	let s:vis_fushleft_left = '{\raggedleft '
    44. 

  44. 	let s:vis_fushleft_right = '}'
    45. 

  45. 

  46. 	let s:vis_lrbox_left = '\sbox{'
    47. 

  47. 	let s:vis_lrbox_right = '}'
    48. 

  48. endif
    49. 

  49. " }}}
    50. 

  50. " Tex_EnvMacros: sets up maps and menus for environments {{{
    51. 

  51. " Description: 
    52. 

  52. function! <SID>Tex_EnvMacros(lhs, submenu, name)
    53. 

  53. 

  54. 	let extra = ''
    55. 

  55. 	if a:submenu =~ 'Lists'
    56. 

  56. 		let extra = '\item '
    57. 

  57. 	endif
    58. 

  58. 

  59. 	let vright = ''
    60. 

  60. 	let vleft = ''
    61. 

  61. 	if exists('s:vis_'.a:name.'_right')
    62. 

  62. 		let vright = s:vis_{a:name}_right
    63. 

  63. 		let vleft = s:vis_{a:name}_left
    64. 

  64. 	endif
    65. 

  65. 	let vrhs = "\<C-\\>\<C-N>:call VEnclose('".vleft."', '".vright."', '\\begin{".a:name."}', '\\end{".a:name."}')\<CR>"
    66. 

  66. 	let location = g:Tex_EnvMenuLocation.a:submenu.a:name.'<tab>'
    67. 

  67. 

  68. 	if a:lhs != '' 
    69. 

  69. 

  70. 		let vlhs = g:Tex_Leader2.substitute(tolower(a:lhs), '^.', '', '')
    71. 

  71. 		let location = location.a:lhs.'\ ('.vlhs.')'
    72. 

  72. 

  73. 		if g:Tex_EnvironmentMaps && !exists('s:doneOnce')
    74. 

  74. 			call IMAP(a:lhs, "\<C-r>=Tex_PutEnvironment('".a:name."')\<CR>", 'tex')
    75. 

  75. 			exec 'vnoremap <silent> '.vlhs.' '.vrhs
    76. 

  76. 		endif
    77. 

  77. 

  78. 	endif
    79. 

  79. 

  80. 	if g:Tex_Menus && g:Tex_EnvironmentMenus && has("gui_running")
    81. 

  81. 		exe 'amenu '.location.' <plug><C-r>=Tex_DoEnvironment("'.a:name.'")<CR>'
    82. 

  82. 		exe 'vmenu '.location.' '.vrhs
    83. 

  83. 	endif
    84. 

  84. 

  85. endfunction 
    86. 

  86. 

  87. " }}}
    88. 

  88. " Tex_SpecialMacros: macros with special right hand sides {{{
    89. 

  89. " Description: 
    90. 

  90. function! <SID>Tex_SpecialMacros(lhs, submenu, name, irhs, ...)
    91. 

  91. 

  92. 	let wiz = 1
    93. 

  93. 	if a:0 > 0 && a:1 == 0
    94. 

  94. 		let wiz = 0
    95. 

  95. 	endif
    96. 

  96. 

  97. 	let location = g:Tex_EnvMenuLocation.a:submenu.a:name
    98. 

  98. 

  99. 	let vright = ''
    100. 

  100. 	let vleft = ''
    101. 

  101. 	if exists('s:vis_'.a:name.'_right')
    102. 

  102. 		let vright = s:vis_{a:name}_right
    103. 

  103. 		let vleft = s:vis_{a:name}_left
    104. 

  104. 	endif
    105. 

  105. 	let vrhs = "\<C-\\>\<C-N>:call VEnclose('".vleft."', '".vright."', '\\begin{".a:name."}', '\\end{".a:name."}')\<CR>"
    106. 

  106. 

  107. 	if a:lhs != ''
    108. 

  108. 

  109. 		let vlhs = g:Tex_Leader2.substitute(tolower(a:lhs), '^.', '', '')
    110. 

  110. 		let location = location.'<tab>'.a:lhs.'\ ('.vlhs.')'
    111. 

  111. 

  112. 		if g:Tex_EnvironmentMaps && !exists('s:doneOnce')
    113. 

  113. 			call IMAP(a:lhs, a:irhs, 'tex')
    114. 

  114. 			exec 'vnoremap '.vlhs.' '.vrhs
    115. 

  115. 		endif
    116. 

  116. 

  117. 	endif
    118. 

  118. 

  119. 	if g:Tex_Menus && g:Tex_EnvironmentMenus
    120. 

  120. 		if wiz
    121. 

  121. 			exe 'amenu '.location.' <plug><C-r>=Tex_DoEnvironment("'.a:name.'")<CR>'
    122. 

  122. 		else
    123. 

  123. 			exe 'amenu '.location." <plug><C-r>=IMAP_PutTextWithMovement('".a:irhs."')<CR>"
    124. 

  124. 		endif
    125. 

  125. 		exe 'vmenu '.location.' '.vrhs
    126. 

  126. 	endif
    127. 

  127. 

  128. endfunction " }}}
    129. 

  129. " Tex_SectionMacros: creates section maps and menus {{{
    130. 

  130. " Description: 
    131. 

  131. function! <SID>Tex_SectionMacros(lhs, name)
    132. 

  132. 

  133. 	let vlhs = g:Tex_Leader2.substitute(tolower(a:lhs), '^.', '', '')
    134. 

  134. 	let vrhs = "\<C-\\>\<C-N>:call VEnclose('\\".a:name."{', '}', '', '')<CR>"
    135. 

  135. 

  136. 	if g:Tex_SectionMaps && !exists('s:doneOnce')
    137. 

  137. 		exe 'vnoremap '.vlhs.' '.vrhs
    138. 

  138. 		call IMAP (a:lhs, "\\".a:name.'{<++>}<++>', 'tex')
    139. 

  139. 	endif
    140. 

  140. 

  141. 	if g:Tex_Menus && g:Tex_SectionMenus
    142. 

  142. 		let location = g:Tex_EnvMenuLocation.'Sections.'.a:name.'<tab>'.a:lhs.'\ ('.vlhs.')'
    143. 

  143. 		let advlocation = g:Tex_EnvMenuLocation.'Sections.Advanced.'.a:name
    144. 

  144. 

  145. 		let irhs = "\<C-r>=IMAP_PutTextWithMovement('\\".a:name."{<++>}<++>')\<CR>"
    146. 

  146. 

  147. 		let advirhs = "\<C-r>=Tex_InsSecAdv('".a:name."')\<CR>"
    148. 

  148. 		let advvrhs = "\<C-\\>\<C-N>:call Tex_VisSecAdv('".a:name."')\<CR>"
    149. 

  149. 

  150. 		exe 'amenu '.advlocation.' <plug>'.advirhs
    151. 

  151. 		exe 'vnoremenu '.advlocation." ".advvrhs
    152. 

  152. 

  153. 		exe 'amenu '.location.' <plug>'.irhs
    154. 

  154. 		exe 'vnoremenu '.location." ".vrhs
    155. 

  155. 	endif
    156. 

  156. endfunction " }}}
    157. 

    158. 

  158. " NewEnvironments {{{
    159. 

  159. call s:Tex_SpecialMacros('', '', 'newenvironment',     '\newenvironment{<++>}[<++>][<++>]{<++>}{<++>}<++>', 0)
    160. 

  160. call s:Tex_SpecialMacros('', '', 'newenvironment*',    '\newenvironment*{<++>}[<++>][<++>]{<++>}{<++>}<++>', 0)
    161. 

  161. call s:Tex_SpecialMacros('', '', 'renewenvironment',   '\renewenvironment{<++>}[<++>][<++>]{<++>}{<++>}<++>', 0)
    162. 

  162. call s:Tex_SpecialMacros('', '', 'renewenvironment*',  '\renewenvironment*{<++>}[<++>][<++>]{<++>}{<++>}<++>', 0)
    163. 

  163. call s:Tex_SpecialMacros('', '', '-sepenv0-', ' :', 0)
    164. 

  164. " }}}
    165. 

  165. " Environments specific commands {{{
    166. 

  166. call s:Tex_SpecialMacros('', 'Env&Commands.&Lists.', '&item',     '\item', 0)
    167. 

  167. call s:Tex_SpecialMacros('', 'Env&Commands.&Lists.', 'i&tem[]',    '\item[<++>]<++>', 0)
    168. 

  168. call s:Tex_SpecialMacros('', 'Env&Commands.&Lists.', '&bibitem{}', '\bibitem{<++>}<++>', 0)
    169. 

  169. call s:Tex_SpecialMacros('', 'Env&Commands.&Tabbing.', '\\&=', '\=', 0)
    170. 

  170. call s:Tex_SpecialMacros('', 'Env&Commands.&Tabbing.', '\\&>', '\>', 0)
    171. 

  171. call s:Tex_SpecialMacros('', 'Env&Commands.&Tabbing.', '&\\\\', '\\', 0)
    172. 

  172. call s:Tex_SpecialMacros('', 'Env&Commands.&Tabbing.', '\\&+', '\+', 0)
    173. 

  173. call s:Tex_SpecialMacros('', 'Env&Commands.&Tabbing.', '\\&-', '\-', 0)
    174. 

  174. call s:Tex_SpecialMacros('', 'Env&Commands.&Tabbing.', "\\\'", "\\\'", 0)
    175. 

  175. call s:Tex_SpecialMacros('', 'Env&Commands.&Tabbing.', '\\&`', '\`', 0)
    176. 

  176. call s:Tex_SpecialMacros('', 'Env&Commands.&Tabbing.', '\\&kill', '\kill', 0)
    177. 

  177. call s:Tex_SpecialMacros('', 'Env&Commands.&Tabbing.', '&makron\ \\CHAR=', '\<++>=<++>', 0)
    178. 

  178. call s:Tex_SpecialMacros('', 'Env&Commands.&Tabbing.', "&aigu\ \\CHAR\'", "\\<++>\'<++>", 0)
    179. 

  179. call s:Tex_SpecialMacros('', 'Env&Commands.&Tabbing.', '&grave\ \\CHAR`', '\<++>`<++>', 0)
    180. 

  180. call s:Tex_SpecialMacros('', 'Env&Commands.&Tabbing.', 'p&ushtabs', '\pushtabs', 0)
    181. 

  181. call s:Tex_SpecialMacros('', 'Env&Commands.&Tabbing.', 'p&optabs', '\poptabs', 0)
    182. 

  182. call s:Tex_SpecialMacros('', 'EnvCommands.&Tabular.', '&hline', '\hline', 0)
    183. 

  183. call s:Tex_SpecialMacros('', 'EnvCommands.&Tabular.', '&cline', '\cline', 0) 
    184. 

  184. call s:Tex_SpecialMacros('', 'EnvCommands.&Tabular.', '&\&', '&', 0) 
    185. 

  185. call s:Tex_SpecialMacros('', 'EnvCommands.&Tabular.', '&\\\\', '\\', 0) 
    186. 

  186. call s:Tex_SpecialMacros('', 'EnvCommands.&Tabular.', '&multicolumn{}{}{}', '\multicolumn{<++>}{<++>}{<++>}<++>', 0)
    187. 

  187. call s:Tex_SpecialMacros('', 'EnvCommands.Le&tter.', '&makelabels', '\makelabels', 0)
    188. 

  188. call s:Tex_SpecialMacros('', 'EnvCommands.Le&tter.', '&address', '\address', 0)
    189. 

  189. call s:Tex_SpecialMacros('', 'EnvCommands.Le&tter.', '&signature', '\signature', 0)
    190. 

  190. call s:Tex_SpecialMacros('', 'EnvCommands.Le&tter.', '&date', '\date', 0)
    191. 

  191. call s:Tex_SpecialMacros('', 'EnvCommands.Le&tter.', '-sepenva4-', ' :', 0)
    192. 

  192. call s:Tex_SpecialMacros('', 'EnvCommands.Le&tter.', '&opening{}', '\opening{<++>}<++>', 0)
    193. 

  193. call s:Tex_SpecialMacros('', 'EnvCommands.Le&tter.', '&closing{}', '\closing{<++>}<++>', 0)
    194. 

  194. call s:Tex_SpecialMacros('', 'EnvCommands.Le&tter.', '&ps{}', '\ps{<++>}<++>', 0)
    195. 

  195. call s:Tex_SpecialMacros('', 'EnvCommands.Le&tter.', 'cc&{}', '\cc{<++>}<++>', 0)
    196. 

  196. call s:Tex_SpecialMacros('', 'EnvCommands.&Slides.', '&onlyslides{}', '\onlyslides{<++>}<++>', 0)
    197. 

  197. call s:Tex_SpecialMacros('', 'EnvCommands.&Slides.', '&onlynotes{}', '\onlynotes{<++>}<++>', 0)
    198. 

  198. call s:Tex_SpecialMacros('', 'EnvCommands.&Slides.', '-sepenva5-', ' :', 0)
    199. 

  199. call s:Tex_SpecialMacros('', 'EnvCommands.&Slides.', '&invisible', '\invisible', 0)
    200. 

  200. call s:Tex_SpecialMacros('', 'EnvCommands.&Slides.', '&visible', '\visible', 0)
    201. 

  201. call s:Tex_SpecialMacros('', 'EnvCommands.&Slides.', '&settime', '\settime', 0)
    202. 

  202. call s:Tex_SpecialMacros('', 'EnvCommands.&Slides.', '&addtime', '\addtime', 0)
    203. 

  203. call s:Tex_SpecialMacros('', '', '-sepenv0-', ' :', 0)
    204. 

  204. " }}}
    205. 

  205. " Lists {{{
    206. 

  206. call s:Tex_SpecialMacros('ELI', '&Lists.',  'list', s:list)
    207. 

  207. call s:Tex_SpecialMacros('EDE', '&Lists.',  'description', s:description)
    208. 

  208. call s:Tex_EnvMacros('EEN', '&Lists.', 'enumerate')
    209. 

  209. call s:Tex_EnvMacros('EIT', '&Lists.', 'itemize')
    210. 

  210. call s:Tex_EnvMacros('ETI', '&Lists.', 'theindex')
    211. 

  211. call s:Tex_EnvMacros('ETL', '&Lists.', 'trivlist')
    212. 

  212. " }}}
    213. 

  213. " Tables {{{
    214. 

  214. call s:Tex_SpecialMacros('ETE', '&Tables.', 'table', s:table)
    215. 

  215. call s:Tex_EnvMacros('ETG', '&Tables.', 'tabbing')
    216. 

  216. call s:Tex_EnvMacros('',    '&Tables.', 'table*')
    217. 

  217. call s:Tex_EnvMacros('',    '&Tables.', 'table2')
    218. 

  218. call s:Tex_SpecialMacros('ETR', '&Tables.', 'tabular', s:tabular)
    219. 

  219. call s:Tex_SpecialMacros('', '&Tables.', 'tabular*', s:tabular_star)
    220. 

  220. " }}}
    221. 

  221. " Math {{{
    222. 

  222. call s:Tex_EnvMacros('EAR', '&Math.', 'array')
    223. 

  223. call s:Tex_EnvMacros('EDM', '&Math.', 'displaymath')
    224. 

  224. call s:Tex_EnvMacros('EEA', '&Math.', 'eqnarray')
    225. 

  225. call s:Tex_EnvMacros('',    '&Math.', 'eqnarray*')
    226. 

  226. call s:Tex_EnvMacros('EEQ', '&Math.', 'equation')
    227. 

  227. call s:Tex_EnvMacros('EMA', '&Math.', 'math')
    228. 

  228. " }}}
    229. 

  229. " Structure {{{
    230. 

  230. call s:Tex_SpecialMacros('EAR', 'Math.', 'array', s:array)
    231. 

  231. call s:Tex_EnvMacros('EAB', '&Structure.', 'abstract')
    232. 

  232. call s:Tex_EnvMacros('EAP', '&Structure.', 'appendix')
    233. 

  233. call s:Tex_EnvMacros('ECE', '&Structure.', 'center')
    234. 

  234. call s:Tex_EnvMacros('EDO', '&Structure.', 'document')
    235. 

  235. call s:Tex_EnvMacros('EFC', '&Structure.', 'filecontents')
    236. 

  236. call s:Tex_EnvMacros('',    '&Structure.', 'filecontents*')
    237. 

  237. call s:Tex_EnvMacros('EFL', '&Structure.', 'flushleft')
    238. 

  238. call s:Tex_EnvMacros('EFR', '&Structure.', 'flushright')
    239. 

  239. call s:Tex_EnvMacros('EQN', '&Structure.', 'quotation')
    240. 

  240. call s:Tex_EnvMacros('EQE', '&Structure.', 'quote')
    241. 

  241. call s:Tex_EnvMacros('ESP', '&Structure.', 'sloppypar')
    242. 

  242. call s:Tex_EnvMacros('ETI', '&Structure.', 'theindex')
    243. 

  243. call s:Tex_EnvMacros('ETP', '&Structure.', 'titlepage')
    244. 

  244. call s:Tex_EnvMacros('EVM', '&Structure.', 'verbatim')
    245. 

  245. call s:Tex_EnvMacros('',    '&Structure.', 'verbatim*')
    246. 

  246. call s:Tex_EnvMacros('EVE', '&Structure.', 'verse')
    247. 

  247. call s:Tex_EnvMacros('ETB', '&Structure.', 'thebibliography')
    248. 

  248. call s:Tex_SpecialMacros('', '&Structure.', '-sepstruct0-', ':', 0)
    249. 

  249. call s:Tex_EnvMacros('ENO', '&Structure.', 'note')
    250. 

  250. call s:Tex_EnvMacros('EOV', '&Structure.', 'overlay')
    251. 

  251. call s:Tex_EnvMacros('ESL', '&Structure.', 'slide')
    252. 

  252. " }}}
    253. 

  253. " Sections {{{
    254. 

  254. call s:Tex_SectionMacros('SPA', 'part')
    255. 

  255. call s:Tex_SectionMacros('SCH', 'chapter')
    256. 

  256. call s:Tex_SectionMacros('SSE', 'section')
    257. 

  257. call s:Tex_SectionMacros('SSS', 'subsection')
    258. 

  258. call s:Tex_SectionMacros('SS2', 'subsubsection')
    259. 

  259. call s:Tex_SectionMacros('SPG', 'paragraph')
    260. 

  260. call s:Tex_SectionMacros('SSP', 'subparagraph')
    261. 

  261. " }}}
    262. 

  262. " Miscellaneous {{{
    263. 

  263. call s:Tex_SpecialMacros('', '', '-sepenv1-', ' :', 0)
    264. 

  264. call s:Tex_SpecialMacros('EFI', '', 'figure', "\<C-r>=Tex_PutEnvironment('figure')\<CR>")
    265. 

  265. call s:Tex_EnvMacros('', '', 'figure*')
    266. 

  266. call s:Tex_EnvMacros('ELR', '', 'lrbox')
    267. 

  267. call s:Tex_SpecialMacros('EMP', '', 'minipage', s:minipage)
    268. 

  268. call s:Tex_SpecialMacros('EPI', '', 'picture', s:picture)
    269. 

  269. " }}}
    270. 

    271. 

  271. if g:Tex_CatchVisMapErrors
    272. 

  272. 	exe 'vnoremap '.g:Tex_Leader2."   :\<C-u>call ExecMap('".g:Tex_Leader2."', 'v')\<CR>"
    273. 

  273. endif
    274. 

  274. 

  275. " ==============================================================================
    276. 

  276. " Specialized functions for various environments
    277. 

  277. "
    278. 

  278. " All these functions are to be used as:
    279. 

  279. "
    280. 

  280. "   inoremap <lhs> <C-r>=Tex_itemize('enumerate')<CR>
    281. 

  281. "   nnoremap <lhs> i<C-r>=Tex_itemize('enumerate')<CR>
    282. 

  282. "
    283. 

  283. " and so on...
    284. 

  284. " ============================================================================== 
    285. 

  285. " Tex_itemize: {{{
    286. 

  286. function! Tex_itemize(env)
    287. 

  287. 	return IMAP_PutTextWithMovement('\begin{'.a:env."}\<cr>\\item <++>\<cr>\\end{".a:env."}<++>")
    288. 

  288. endfunction
    289. 

  289. " }}} 
    290. 

  290. " Tex_description: {{{
    291. 

  291. function! Tex_description(env)
    292. 

  292. 	if g:Tex_UseMenuWizard == 1
    293. 

  293. 		let itlabel = input('(Optional) Item label? ')
    294. 

  294. 		if itlabel != ''
    295. 

  295. 			let itlabel = '['.itlabel.']'
    296. 

  296. 		endif
    297. 

  297. 		return IMAP_PutTextWithMovement("\\begin{description}\<cr>\\item".itlabel." <++>\<cr>\\end{description}<++>")
    298. 

  298. 	else
    299. 

  299. 		return IMAP_PutTextWithMovement(s:description)
    300. 

  300. 	endif
    301. 

  301. endfunction
    302. 

  302. " }}} 
    303. 

  303. " Tex_figure: {{{
    304. 

  304. function! Tex_figure(env)
    305. 

  305. 	if g:Tex_UseMenuWizard == 1
    306. 

  306. 		let flto    = input('Float to (htbp)? ')
    307. 

  307. 		let caption = input('Caption? ')
    308. 

  308. 		let center  = input('Center ([y]/n)? ')
    309. 

  309. 		let label   = input('Label (for use with \ref)? ')
    310. 

  310. 		" additional to AUC Tex since my pics are usually external files
    311. 

  311. 		let pic = input('Name of Pic-File? ')
    312. 

  312. 		if flto != ''
    313. 

  313. 			let flto = '['.flto."]\<cr>"
    314. 

  314. 		else
    315. 

  315. 			let flto = "\<cr>"
    316. 

  316. 		endif
    317. 

  317. 		if pic != ''
    318. 

  318. 			let pic = '\input{'.pic."}\<cr>"
    319. 

  319. 		else
    320. 

  320. 			let pic = "<++>\<cr>"
    321. 

  321. 		endif
    322. 

  322. 		if caption != ''
    323. 

  323. 			let caption = '\caption{'.caption."}\<cr>"
    324. 

  324. 		endif
    325. 

  325. 		if label != ''
    326. 

  326. 			let label = '\label{fig:'.label."}\<cr>"
    327. 

  327. 		endif
    328. 

  328. 		if center == 'y'
    329. 

  329. 		  let centr = '\begin{center}' . "\<cr>"
    330. 

  330. 		  let centr = centr . pic 
    331. 

  331. 		  let centr = centr . caption
    332. 

  332. 		  let centr = centr . label
    333. 

  333. 		  let centr = centr . '\end{center}' . "\<cr>"
    334. 

  334. 		else
    335. 

  335. 		  let centr = pic
    336. 

  336. 		  let centr = centr . caption
    337. 

  337. 		  let centr = centr . label
    338. 

  338. 		endif
    339. 

  339. 		let figure = '\begin{'.a:env.'}'.flto
    340. 

  340. 		let figure = figure . centr
    341. 

  341. 		let figure = figure . '\end{'.a:env.'}'
    342. 

  342. 		return IMAP_PutTextWithMovement(figure)
    343. 

  343. 	else
    344. 

  344. 		if g:Tex_package_detected =~ '\<graphicx\>'
    345. 

  345. 			return IMAP_PutTextWithMovement(s:figure_graphicx)
    346. 

  346. 		else
    347. 

  347. 			return IMAP_PutTextWithMovement(s:figure)
    348. 

  348. 		endif
    349. 

  349. 	endif
    350. 

  350. endfunction
    351. 

  351. " }}} 
    352. 

  352. " Tex_table: {{{
    353. 

  353. function! Tex_table(env)
    354. 

  354. 	if g:Tex_UseMenuWizard == 1
    355. 

  355. 		let flto    = input('Float to (htbp)? ')
    356. 

  356. 		let caption = input('Caption? ')
    357. 

  357. 		let center  = input('Center (y/n)? ')
    358. 

  358. 		let label   = input('Label? ')
    359. 

  359. 		if flto != ''
    360. 

  360. 			let flto ='['.flto."]\<cr>"
    361. 

  361. 		else
    362. 

  362. 			let flto = ''
    363. 

  363. 		endif
    364. 

  364. 		let ret='\begin{table}'.flto
    365. 

  365. 		if center == 'y'
    366. 

  366. 			let ret=ret."\\begin{center}\<cr>"
    367. 

  367. 		endif
    368. 

  368. 		let foo = '\begin{tabular}'
    369. 

  369. 		let pos = input('(Optional) Position (t b)? ')
    370. 

  370. 		if pos != ''
    371. 

  371. 			let foo = foo.'['.pos.']'
    372. 

  372. 		else
    373. 

  373. 			let foo = foo."\<cr>"
    374. 

  374. 		endif
    375. 

  375. 		let format = input("Format  ( l r c p{width} | @{text} )? ")
    376. 

  376. 		if format == ''
    377. 

  377. 			let format = '<++>'
    378. 

  378. 		endif
    379. 

  379. 		let ret = ret.foo.'{'.format."}\<cr><++>\<cr>\\end{tabular}<++>\<cr>"
    380. 

  380. 		if center == 'y'
    381. 

  381. 			let ret=ret."\\end{center}\<cr>"
    382. 

  382. 		endif
    383. 

  383. 		if caption != ''
    384. 

  384. 			let ret=ret.'\caption{'.caption."}\<cr>"
    385. 

  385. 		endif
    386. 

  386. 		if label != ''
    387. 

  387. 			let ret=ret.'\label{tab:'.label."}\<cr>"
    388. 

  388. 		endif
    389. 

  389. 		let ret=ret.'\end{table}<++>'
    390. 

  390. 		return IMAP_PutTextWithMovement(ret)
    391. 

  391. 	else
    392. 

  392. 		return IMAP_PutTextWithMovement(s:table)
    393. 

  393. 	endif
    394. 

  394. endfunction
    395. 

  395. " }}} 
    396. 

  396. " Tex_tabular: {{{
    397. 

  397. function! Tex_tabular(env)
    398. 

  398. 	if g:Tex_UseMenuWizard == 1
    399. 

  399. 		let pos    = input('(Optional) Position (t b)? ')
    400. 

  400. 		let format = input("Format  ( l r c p{width} | @{text} )? ")
    401. 

  401. 		if pos != ''
    402. 

  402. 		  let pos = '['.pos.']'
    403. 

  403. 		endif
    404. 

  404. 		if format != ''
    405. 

  405. 		  let format = '{'.format.'}'
    406. 

  406. 		endif
    407. 

  407. 		return IMAP_PutTextWithMovement('\begin{'.a:env.'}'.pos.format."\<cr> \<cr>\\end{".a:env.'}<++>')
    408. 

  408. 	else
    409. 

  409. 		return IMAP_PutTextWithMovement('\begin{'.a:env.'}[<+position+>]{<+format+>}'."\<cr><++>\<cr>\\end{".a:env.'}<++>')
    410. 

  410. 	endif
    411. 

  411. endfunction
    412. 

  412. " }}} 
    413. 

  413. " Tex_eqnarray: {{{
    414. 

  414. function! Tex_eqnarray(env)
    415. 

  415. 	if g:Tex_UseMenuWizard == 1
    416. 

  416. 		if a:env !~ '\*'
    417. 

  417. 			let label = input('Label?  ')
    418. 

  418. 			if label != ''
    419. 

  419. 				let arrlabel = '\label{'.label."}\<cr>"
    420. 

  420. 			  else
    421. 

  421. 				let arrlabel = ''
    422. 

  422. 			endif
    423. 

  423. 		else
    424. 

  424. 			let arrlabel = ''
    425. 

  425. 		endif
    426. 

  426. 	else
    427. 

  427. 		if a:env !~ '\*'
    428. 

  428. 			let arrlabel = "\\label{<++>}\<cr>"
    429. 

  429. 		else
    430. 

  430. 			let arrlabel = ""
    431. 

  431. 		endif
    432. 

  432. 	endif
    433. 

  433. 	return IMAP_PutTextWithMovement('\begin{'.a:env."}\<cr><++>\<cr>".arrlabel."\\end{".a:env."}<++>")
    434. 

  434. endfunction
    435. 

  435. " }}} 
    436. 

  436. " Tex_list: {{{
    437. 

  437. function! Tex_list(env)
    438. 

  438. 	if g:Tex_UseMenuWizard == 1
    439. 

  439. 		let label = input('Label (for \item)? ')
    440. 

  440. 		if label != ''
    441. 

  441. 			let label = '{'.label.'}'
    442. 

  442. 			let addcmd = input('Additional commands? ')
    443. 

  443. 			if addcmd != ''
    444. 

  444. 				let label = label . '{'.addcmd.'}'
    445. 

  445. 			endif
    446. 

  446. 		else
    447. 

  447. 			let label = ''
    448. 

  448. 		endif
    449. 

  449. 		return IMAP_PutTextWithMovement('\begin{list}'.label."\<cr>\\item \<cr>\\end{list}<++>")
    450. 

  450. 	else
    451. 

  451. 		return IMAP_PutTextWithMovement(s:list)
    452. 

  452. 	endif
    453. 

  453. endfunction
    454. 

  454. " }}} 
    455. 

  455. " Tex_document: {{{
    456. 

  456. function! Tex_document(env)
    457. 

  457. 	if g:Tex_UseMenuWizard == 1
    458. 

  458. 		let dstyle = input('Document style? ')
    459. 

  459. 		let opts = input('(Optional) Options? ')
    460. 

  460. 		let foo = '\documentclass'
    461. 

  461. 		if opts == ''
    462. 

  462. 			let foo = foo.'{'.dstyle.'}'
    463. 

  463. 		else
    464. 

  464. 			let foo = foo.'['.opts.']'.'{'.dstyle.'}'
    465. 

  465. 		endif
    466. 

  466. 		return IMAP_PutTextWithMovement(foo."\<cr>\<cr>\\begin{document}\<cr><++>\<cr>\\end{document}")
    467. 

  467. 	else
    468. 

  468. 		return IMAP_PutTextWithMovement(s:document)
    469. 

  469. 	endif
    470. 

  470. endfunction
    471. 

  471. " }}} 
    472. 

  472. " Tex_minipage: {{{
    473. 

  473. function! Tex_minipage(env)
    474. 

  474. 	if g:Tex_UseMenuWizard == 1
    475. 

  475. 		let foo = '\begin{minipage}'
    476. 

  476. 		let pos = input('(Optional) Position (t b)? ')
    477. 

  477. 		let width = input('Width? ')
    478. 

  478. 		if pos == ''
    479. 

  479. 			let foo = foo.'{'.width.'}'
    480. 

  480. 		else
    481. 

  481. 			let  foo = foo.'['.pos.']{'.width.'}'
    482. 

  482. 		endif
    483. 

  483. 		return IMAP_PutTextWithMovement(foo."\<cr><++>\<cr>\\end{minipage}<++>")
    484. 

  484. 	else
    485. 

  485. 		return IMAP_PutTextWithMovement(s:minipage)
    486. 

  486. 	endif
    487. 

  487. endfunction
    488. 

  488. " }}} 
    489. 

  489. " Tex_thebibliography: {{{
    490. 

  490. function! Tex_thebibliography(env)
    491. 

  491. 	if g:Tex_UseMenuWizard == 1
    492. 

  492. 		" AUC Tex: "Label for BibItem: 99"
    493. 

  493. 		let indent = input('Indent for BibItem? ')
    494. 

  494. 		let foo = '{'.indent.'}'
    495. 

  495. 		let biblabel = input('(Optional) Bibitem label? ')
    496. 

  496. 		let key = input('Add key? ')
    497. 

  497. 		let bar = '\bibitem'
    498. 

  498. 		if biblabel != ''
    499. 

  499. 			let bar = bar.'['.biblabel.']'
    500. 

  500. 		endif
    501. 

  501. 		let bar = bar.'{'.key.'}'
    502. 

  502. 		return IMAP_PutTextWithMovement('\begin{thebibliography}'.foo."\<cr>".bar." \<cr>\\end{thebibliography}<++>\<Up>")
    503. 

  503. 	else
    504. 

  504. 		return IMAP_PutTextWithMovement(
    505. 

  505. 			\ "\\begin{thebibliography}\<CR>".
    506. 

  506. 			\ "\\bibitem[<+biblabel+>]{<+bibkey+>} <++>\<CR>".
    507. 

  507. 			\ "<++>\<CR>".
    508. 

  508. 			\ "\\end{thebibliography}<++>")
    509. 

  509. 	endif
    510. 

  510. endfunction
    511. 

  511. " }}} 
    512. 

    513. 

  513. " ==============================================================================
    514. 

  514. " Contributions / suggestions from Carl Mueller (auctex.vim)
    515. 

  515. " ============================================================================== 
    516. 

  516. " PromptForEnvironment: prompts for an environment {{{
    517. 

  517. " Description: 
    518. 

  518. function! PromptForEnvironment(ask)
    519. 

  519. 	return Tex_ChooseFromPrompt(
    520. 

  520. 		\ a:ask."\n" . 
    521. 

  521. 		\ Tex_CreatePrompt(g:Tex_PromptedEnvironments, 2, ",") .
    522. 

  522. 		\ "\nEnter name or number of environment :", 
    523. 

  523. 		\ g:Tex_PromptedEnvironments, ",")
    524. 

  524. endfunction " }}}
    525. 

  525. " Tex_DoEnvironment: fast insertion of environments {{{
    526. 

  526. " Description:
    527. 

  527. "   The menus call this function with an argument (the name of the environment
    528. 

  528. "   to insert). The maps call this without any arguments. In this case, it
    529. 

  529. "   prompts for an environment to enter if the current line is empty. If
    530. 

  530. "   called without arguments and there is a word on the current line, then use
    531. 

  531. "   that as the name of a new environment.
    532. 

  532. function! Tex_DoEnvironment(...)
    533. 

  533. 	if a:0 < 1
    534. 

  534. 		let env = matchstr(getline('.'), '^\s*\zs\w*\*\=\ze\s*$')
    535. 

  535. 		" If in current line is more than one word or in visual mode
    536. 

  536. 		" ignore contents of line and prompt for environment
    537. 

  537. 		if env == '' || (exists('s:isvisual') && s:isvisual == 'yes')
    538. 

  538. 			let env = PromptForEnvironment('Choose which environment to insert: ')
    539. 

  539. 			if env != ''
    540. 

  540. 				return Tex_PutEnvironment(env)
    541. 

  541. 			else
    542. 

  542. 				return ''
    543. 

  543. 			endif
    544. 

  544. 		else
    545. 

  545. 			" delete the word on the line into the blackhole register.
    546. 

  546. 			normal! 0"_D
    547. 

  547. 			return Tex_PutEnvironment(env)
    548. 

  548. 		endif
    549. 

  549. 	else
    550. 

  550. 		return Tex_PutEnvironment(a:1)
    551. 

  551. 	endif
    552. 

  552. endfunction " }}}
    553. 

  553. " Tex_PutEnvironment: calls various specialized functions {{{
    554. 

  554. " Description: 
    555. 

  555. "   Based on input argument, it calls various specialized functions.
    556. 

  556. function! Tex_PutEnvironment(env)
    557. 

  557. 	if exists("s:isvisual") && s:isvisual == "yes"
    558. 

  558. 		let s:isvisual = 'no'
    559. 

  559. 		if a:env == '\['
    560. 

  560. 			return VEnclose('', '', '\[', '\]')
    561. 

  561. 		elseif a:env == '$$'
    562. 

  562. 			return VEnclose('', '', '$$', '$$')
    563. 

  563. 		endif
    564. 

  564. 		return VEnclose('\begin{'.a:env.'}', '\end{'.a:env.'}', '\begin{'.a:env.'}', '\end{'.a:env.'}')
    565. 

  565. 	else
    566. 

  566. 		" The user can define something like 
    567. 

  567. 		" let g:Tex_Env_theorem = "\\begin{theorem}\<CR><++>\<CR>\\end{theorem}"
    568. 

  568. 		" This will effectively over-write the default definition of the
    569. 

  569. 		" theorem environment which uses a \label.
    570. 

  570. 		if exists("b:Tex_Env_{'".a:env."'}")
    571. 

  571. 			return IMAP_PutTextWithMovement(b:Tex_Env_{a:env})
    572. 

  572. 		elseif exists("g:Tex_Env_{'".a:env."'}")
    573. 

  573. 			return IMAP_PutTextWithMovement(g:Tex_Env_{a:env})
    574. 

  574. 		elseif a:env =~ 'equation*\|eqnarray*\|theorem\|lemma\|equation\|eqnarray\|align\*\|align\>\|multline'
    575. 

  575. 			let g:aa = a:env
    576. 

  576. 			return Tex_eqnarray(a:env)
    577. 

  577. 		elseif a:env =~ "enumerate\\|itemize\\|theindex\\|trivlist"
    578. 

  578. 			return Tex_itemize(a:env)
    579. 

  579. 		elseif a:env =~ "table\\|table*"
    580. 

  580. 			return Tex_table(a:env)
    581. 

  581. 		elseif a:env =~ "tabular\\|tabular*\\|array\\|array*"
    582. 

  582. 			return Tex_tabular(a:env)
    583. 

  583. 		elseif exists('*Tex_'.a:env)
    584. 

  584. 			exe 'return Tex_'.a:env.'(a:env)'
    585. 

  585. 		elseif a:env == '$$'
    586. 

  586. 			return IMAP_PutTextWithMovement('$$<++>$$')
    587. 

  587. 		elseif a:env == '\['
    588. 

  588. 			return IMAP_PutTextWithMovement("\\[\<CR><++>\<CR>\\]<++>")
    589. 

  589. 		else
    590. 

  590. 			" Look in supported packages if exists template for environment
    591. 

  591. 			" given in the line
    592. 

  592. 			if exists('g:Tex_package_supported') && g:Tex_package_supported != ''
    593. 

  593. 				let i = 1
    594. 

  594. 				while Tex_Strntok(g:Tex_package_supported, ',', i) != ''
    595. 

  595. 					let checkpack = Tex_Strntok(g:Tex_package_supported, ',', i)
    596. 

  596. 					if g:TeX_package_{checkpack} =~ 'e..:'.a:env
    597. 

  597. 						if a:env =~ '*'
    598. 

  598. 							" Don't allow * to be treated as wildcard
    599. 

  599. 							let aenv = substitute(a:env, '*', '\\*', '')
    600. 

  600. 						else
    601. 

  601. 							let aenv = a:env
    602. 

  602. 						endif
    603. 

  603. 						let envcommand = matchstr(g:TeX_package_{checkpack}, '\zse..:'.aenv.'[^,]\{-}\ze,')
    604. 

  604. 						return Tex_ProcessPackageCommand(envcommand)
    605. 

  605. 					endif
    606. 

  606. 					let i = i + 1
    607. 

  607. 				endwhile
    608. 

  608. 			endif
    609. 

  609. 		endif
    610. 

  610. 		" If nothing before us managed to create an environment, then just
    611. 

  611. 		" create a bare-bones environment from the name.
    612. 

  612. 		return IMAP_PutTextWithMovement('\begin{'.a:env."}\<cr><++>\<cr>\\end{".a:env."}<++>")
    613. 

  613. 	endif
    614. 

  614. endfunction " }}}
    615. 

  615. " Mapping the <F5> key to insert/prompt for an environment/package {{{
    616. 

  616. " and <S-F5> to prompt/replace an environment
    617. 

  617. "
    618. 

  618. " g:Tex_PromptedEnvironments is a variable containing a comma seperated list
    619. 

  619. " of environments. This list defines the prompt which latex-suite sets up when
    620. 

  620. " the user presses <F5> on an empty line.
    621. 

  621. "
    622. 

  622. " Leaving this empty is equivalent to disabling the feature.
    623. 

  623. if g:Tex_PromptedEnvironments != ''
    624. 

  624. 

  625. 	let b:DoubleDollars = 0
    626. 

  626. 

  627. 	" Provide only <plug>s here. main.vim will create the actual maps.
    628. 

  628. 	inoremap <silent> <Plug>Tex_FastEnvironmentInsert  <C-r>=Tex_FastEnvironmentInsert("no")<cr>
    629. 

  629. 	nnoremap <silent> <Plug>Tex_FastEnvironmentInsert  i<C-r>=Tex_FastEnvironmentInsert("no")<cr>
    630. 

  630. 	vnoremap <silent> <Plug>Tex_FastEnvironmentInsert  <C-\><C-N>:call Tex_FastEnvironmentInsert("yes")<CR>
    631. 

  631. 	inoremap <silent> <Plug>Tex_FastEnvironmentChange  <C-O>:call Tex_ChangeEnvironments()<CR>
    632. 

  632. 	nnoremap <silent> <Plug>Tex_FastEnvironmentChange  :call Tex_ChangeEnvironments()<CR>
    633. 

  633. 

  634. 	" Tex_FastEnvironmentInsert: maps <F5> to prompt for env and insert it " {{{
    635. 

  635. 	" Description:
    636. 

  636. 	"   This function calculates whether we are in the preamble. If we are
    637. 

  637. 	"   then inserts a \usepackage line by either reading in a word from the
    638. 

  638. 	"   current line or prompting to type in one. If not in the preamble, then
    639. 

  639. 	"   inserts a environment template either by reading in a word from the
    640. 

  640. 	"   current line or prompting the user to choose one.
    641. 

  641. 	"
    642. 

  642. 	function! Tex_FastEnvironmentInsert(isvisual)
    643. 

  643. 

  644. 		let start_line = line('.')
    645. 

  645. 		let pos = Tex_GetPos()
    646. 

  646. 		let s:isvisual = a:isvisual
    647. 

  647. 

  648. 		" decide if we are in the preamble of the document. If we are then
    649. 

  649. 		" insert a package, otherwise insert an environment.
    650. 

  650. 		"
    651. 

  651. 		if search('\\documentclass', 'bW') && search('\\begin{document}')
    652. 

  652. 

  653. 			" If there is a \documentclass line and a \begin{document} line in
    654. 

  654. 			" the file, then a part of the file is the preamble.
    655. 

    656. 

  656. 			" search for where the document begins.
    657. 

  657. 			let begin_line = search('\\begin{document}')
    658. 

  658. 			" if the document begins after where we are presently, then we are
    659. 

  659. 			" in the preamble.
    660. 

  660. 			if start_line < begin_line
    661. 

  661. 				" return to our original location and insert a package
    662. 

  662. 				" statement.
    663. 

  663. 				call Tex_SetPos(pos)
    664. 

  664. 				return Tex_package_from_line()
    665. 

  665. 			else
    666. 

  666. 				" we are after the preamble. insert an environment.
    667. 

  667. 				call Tex_SetPos(pos)
    668. 

  668. 				return Tex_DoEnvironment()
    669. 

  669. 			endif
    670. 

  670. 

  671. 		elseif search('\\documentclass')
    672. 

  672. 			" if there is only a \documentclass but no \begin{document}, then
    673. 

  673. 			" the entire file is a preamble. Put a package.
    674. 

    675. 

  675. 			call Tex_SetPos(pos)
    676. 

  676. 			return Tex_package_from_line()
    677. 

  677. 

  678. 		else
    679. 

  679. 			" no \documentclass, put an environment.
    680. 

    681. 

  681. 			call Tex_SetPos(pos)
    682. 

  682. 			return Tex_DoEnvironment()
    683. 

  683. 

  684. 		endif
    685. 

  685. 

  686. 	endfunction 
    687. 

  687. 

  688. 	" }}}
    689. 

  689. 	" Tex_package_from_line: puts a \usepackage line in the current line. " {{{
    690. 

  690. 	" Description:
    691. 

  691. 	"
    692. 

  692. 	function! Tex_package_from_line()
    693. 

  693. 		" Function Tex_PutPackage is defined in packages.vim
    694. 

  694. 		" Ignores <F5> in Visual mode 
    695. 

  695. 		if s:isvisual == "yes"
    696. 

  696. 			return 0
    697. 

  697. 		else	   
    698. 

  698. 			let l = getline(".")
    699. 

  699. 			let pack = matchstr(l, '^\s*\zs.*')
    700. 

  700. 			normal!  0"_D
    701. 

  701. 			return Tex_pack_one(pack)
    702. 

  702. 		endif
    703. 

  703. 	endfunction 
    704. 

  704. 	
    705. 

  705. 	" }}}
    706. 

  706. 	" Tex_ChangeEnvironments: calls Change() to change the environment {{{
    707. 

  707. 	" Description:
    708. 

  708. 	"   Finds out which environment the cursor is positioned in and changes
    709. 

  709. 	"   that to the chosen new environment. This function knows the changes
    710. 

  710. 	"   which need to be made to change one env to another and calls
    711. 

  711. 	"   Change() with the info.
    712. 

  712. 	"
    713. 

  713. 	function! Tex_ChangeEnvironments() 
    714. 

  714. 

  715. 		let env_line = searchpair('$$\|\\[\|begin{', '', '$$\|\\]\|end{', "bn")
    716. 

  716. 

  717. 		if env_line != 0
    718. 

  718. 			if getline(env_line) !~ 'begin{'
    719. 

  719. 				let env_name = '['
    720. 

  720. 			else
    721. 

  721. 				let env_name = matchstr(getline(env_line), 'begin{\zs.\{-}\ze}')
    722. 

  722. 			endif
    723. 

  723. 		endif
    724. 

  724. 		
    725. 

  725. 		if !exists('env_name')
    726. 

  726. 			echomsg "You are not inside environment"
    727. 

  727. 			return 0
    728. 

  728. 		endif
    729. 

  729. 

  730. 		exe 'echomsg "You are within a '.env_name.' environment."'
    731. 

  731. 		let change_env = PromptForEnvironment('What do you want to change it to? ')
    732. 

  732. 

  733. 		if change_env == 'eqnarray'
    734. 

  734. 			call <SID>Change('eqnarray', 1, '', env_name =~ '\*$')
    735. 

  735. 		elseif change_env == 'align'
    736. 

  736. 			call <SID>Change('align', 1, '', env_name =~ '\*$')
    737. 

  737. 		elseif change_env == 'eqnarray*'
    738. 

  738. 			call <SID>Change('eqnarray*', 0, '\\nonumber', 0)
    739. 

  739. 		elseif change_env == 'align*'
    740. 

  740. 			call <SID>Change('align*', 0, '\\nonumber', 0)
    741. 

  741. 		elseif change_env == 'equation*'
    742. 

  742. 			call <SID>Change('equation*', 0, '&\|\\lefteqn{\|\\nonumber\|\\\\', 0)
    743. 

  743. 		elseif change_env == ''
    744. 

  744. 			return 0
    745. 

  745. 		else
    746. 

  746. 			call <SID>Change(change_env, 0, '', '')
    747. 

  747. 			return 0
    748. 

  748. 		endif
    749. 

  749. 

  750. 	endfunction 
    751. 

  751. 	
    752. 

  752. 	" }}}
    753. 

  753. 	" Change: changes the current env to the new env {{{
    754. 

  754. 	" Description: 
    755. 

  755. 	"   This function needs to know the changes which need to be made while
    756. 

  756. 	"   going from an old environment to a new one. This info, it gets from
    757. 

  757. 	"   Tex_ChangeEnvironments
    758. 

  758. 	" 
    759. 

  759. 	"   env : name of the new environment.
    760. 

  760. 	"   label : if 1, then insert a \label at the end of the environment.
    761. 

  761. 	"           otherwise, delete any \label line found.
    762. 

  762. 	"   delete : a pattern which is to be deleted from the original environment.
    763. 

  763. 	"            for example, going to a eqnarray* environment means we need to
    764. 

  764. 	"            delete \label's.
    765. 

  765. 	"   putInNonumber : whether we need to put a \nonumber before the end of the
    766. 

  766. 	"                 environment.
    767. 

  767. 	function! s:Change(env, label, delete, putInNonumber)
    768. 

  768. 

  769. 		let start_line = line('.')
    770. 

  770. 		let start_col = virtcol('.')
    771. 

  771. 

  772. 		if a:env == '['
    773. 

  773. 			if b:DoubleDollars == 0
    774. 

  774. 				let first = '\\['
    775. 

  775. 				let second = '\\]'
    776. 

  776. 			else
    777. 

  777. 				let first = '$$'
    778. 

  778. 				let second = '$$'
    779. 

  779. 			endif
    780. 

  780. 		else
    781. 

  781. 			let first = '\\begin{' . a:env . '}'
    782. 

  782. 			let second = '\\end{' . a:env . '}'
    783. 

  783. 		endif
    784. 

  784. 

  785. 		if b:DoubleDollars == 0
    786. 

  786. 			let bottom = searchpair('\\\[\|\\begin{','','\\\]\|\\end{','')
    787. 

  787. 			s/\\\]\|\\end{.\{-}}/\=second/
    788. 

  788. 			let top = searchpair('\\\[\|\\begin{','','\\\]\|\\end{','b')
    789. 

  789. 			s/\\\[\|\\begin{.\{-}}/\=first/
    790. 

  790. 		else
    791. 

  791. 			let bottom = search('\$\$\|\\end{')
    792. 

  792. 			s/\$\$\|\\end{.\{-}}/\=second/
    793. 

  793. 			let top = search('\$\$\|\\begin{','b')
    794. 

  794. 			s/\$\$\|\\begin{.\{-}}/\=first/
    795. 

  795. 		end
    796. 

  796. 		if a:delete != ''
    797. 

  797. 			exe 'silent '. top . "," . bottom . 's/' . a:delete . '//e'
    798. 

  798. 		endif
    799. 

  799. 

  800. 		if a:putInNonumber == 1
    801. 

  801. 			exe top
    802. 

  802. 			call search('\\end\|\\\\')
    803. 

  803. 			if line('.') != bottom
    804. 

  804. 				exe '.+1,' . bottom . 's/\\\\/\\nonumber\\\\/e'
    805. 

  805. 				exe (bottom-1) . 's/\s*$/  \\nonumber/'
    806. 

  806. 			endif
    807. 

  807. 		endif
    808. 

  808. 

  809. 		if a:label == 1
    810. 

  810. 			exe top
    811. 

  811. 			if search("\\label", "W") > bottom
    812. 

  812. 				exe top
    813. 

  813. 				let local_label = input('Label? ')
    814. 

  814. 				if local_label != ''
    815. 

  815. 					put = '\label{'.local_label.'}'
    816. 

  816. 				endif
    817. 

  817. 				normal $
    818. 

  818. 			endif
    819. 

  819. 		else
    820. 

  820. 			exe 'silent '.top . ',' . bottom . ' g/\\label/delete'
    821. 

  821. 		endif
    822. 

  822. 

  823. 		if exists('local_label') && local_label != ''
    824. 

  824. 			exe start_line + 1.' | normal! '.start_col.'|'
    825. 

  825. 		else
    826. 

  826. 			exe start_line.' | normal! '.start_col.'|'
    827. 

  827. 		endif
    828. 

  828. 	endfunction " }}}
    829. 

    830. 

  830. endif
    831. 

  831. 

  832. " }}}
    833. 

  833. " Map <S-F1> through <S-F4> to insert environments {{{
    834. 

  834. if g:Tex_HotKeyMappings != ''
    835. 

  835. 

  836. 	" SetUpHotKeys: maps <F1> through <F4> to insert environments
    837. 

  837. 	" Description: 
    838. 

  838. 	function! <SID>SetUpHotKeys()
    839. 

  839. 		let i = 1
    840. 

  840. 		let envname = Tex_Strntok(g:Tex_HotKeyMappings, ',', i)
    841. 

  841. 		while  envname != ''
    842. 

  842. 

  843. 			exec 'inoremap <silent> <buffer> <S-F'.i.'> <C-r>=Tex_PutEnvironment("'.envname.'")<CR>'
    844. 

  844. 

  845. 			let i = i + 1
    846. 

  846. 			let envname = Tex_Strntok(g:Tex_HotKeyMappings, ',', i)
    847. 

  847. 			
    848. 

  848. 		endwhile
    849. 

  849. 

  850. 	endfunction
    851. 

  851. 

  852. endif
    853. 

  853. 

  854. " }}}
    855. 

  855. " Tex_SetFastEnvironmentMaps: function for setting up the <F5> and <S-F1>-<S-F4> keys {{{
    856. 

  856. " Description: This function is made public so it can be called by the
    857. 

  857. "              SetTeXOptions() function in main.vim
    858. 

  858. function! Tex_SetFastEnvironmentMaps()
    859. 

  859. 	if g:Tex_PromptedEnvironments != ''
    860. 

  860. 		call Tex_MakeMap("<F5>", "<Plug>Tex_FastEnvironmentInsert", 'i', '<silent> <buffer>')
    861. 

  861. 		call Tex_MakeMap("<F5>", "<Plug>Tex_FastEnvironmentInsert", 'n', '<silent> <buffer>')
    862. 

  862. 		call Tex_MakeMap("<F5>", "<Plug>Tex_FastEnvironmentInsert", 'v', '<silent> <buffer>')
    863. 

  863. 		call Tex_MakeMap("<S-F5>", "<Plug>Tex_FastEnvironmentChange", 'i', '<silent> <buffer>')
    864. 

  864. 		call Tex_MakeMap("<S-F5>", "<Plug>Tex_FastEnvironmentChange", 'n', '<silent> <buffer>')
    865. 

  865. 	endif
    866. 

  866. 	if g:Tex_HotKeyMappings != ''
    867. 

  867. 		call s:SetUpHotKeys()
    868. 

  868. 	endif
    869. 

  869. endfunction " }}}
    870. 

    871. 

  871. " ==============================================================================
    872. 

  872. " Contributions / Tex_InsertItem() from Johannes Tanzler
    873. 

  873. " ============================================================================== 
    874. 

  874. " Tex_GetCurrentEnv: gets the current environment in which the cursor lies {{{
    875. 

  875. " Description: handles cases such as:
    876. 

  876. " 	
    877. 

  877. " 	\begin{itemize}
    878. 

  878. " 		\item first item
    879. 

  879. " 		\item second item
    880. 

  880. " 			\begin{description}
    881. 

  881. " 			\item first desc
    882. 

  882. " 			\item second
    883. 

  883. " 			% Tex_GetCurrentEnv will return "description" when called from here
    884. 

  884. " 			\end{description}
    885. 

  885. " 		\item third item
    886. 

  886. " 		% Tex_GetCurrentEnv will return "itemize" when called from here
    887. 

  887. " 	\end{itemize}
    888. 

  888. " 	% Tex_GetCurrentEnv will return "" when called from here 
    889. 

  889. "
    890. 

  890. " Author: Alan Schmitt
    891. 

  891. function! Tex_GetCurrentEnv()
    892. 

  892. 	let pos = Tex_GetPos()
    893. 

  893. 	let i = 0
    894. 

  894. 	while 1
    895. 

  895. 		let env_line = search('^[^%]*\\\%(begin\|end\){', 'bW')
    896. 

  896. 		if env_line == 0
    897. 

  897. 			" we reached the beginning of the file, so we return the empty string
    898. 

  898. 			call Tex_SetPos(pos)
    899. 

  899. 			return ''
    900. 

  900. 		endif
    901. 

  901. 		if match(getline(env_line), '^[^%]*\\begin{') == -1
    902. 

  902. 			" we found a \\end, so we keep searching
    903. 

  903. 			let i = i + 1
    904. 

  904. 			continue
    905. 

  905. 		else
    906. 

  906. 			" we found a \\begin which has not been \\end'ed. we are done.
    907. 

  907. 			if i == 0
    908. 

  908. 				let env = matchstr(getline(env_line), '\\begin{\zs.\{-}\ze}')
    909. 

  909. 				call Tex_SetPos(pos)
    910. 

  910. 				return env
    911. 

  911. 			else
    912. 

  912. 				" this \\begin closes a \\end, continue searching.
    913. 

  913. 				let i = i - 1
    914. 

  914. 				continue
    915. 

  915. 			endif
    916. 

  916. 		endif
    917. 

  917. 	endwhile
    918. 

  918. endfunction
    919. 

  919. " }}}
    920. 

  920. " Tex_InsertItem: insert \item into a list   {{{
    921. 

  921. "    Description: Find last \begin line, extract env name, return to the start
    922. 

  922. "    			  position and insert proper \item, depending on env name.
    923. 

  923. "    			  Env names are stored in g: variables it can be used by
    924. 

  924. "    			  package files. 
    925. 

    926. 

  926. TexLet g:Tex_ItemStyle_itemize = '\item '
    927. 

  927. TexLet g:Tex_ItemStyle_enumerate = '\item '
    928. 

  928. TexLet g:Tex_ItemStyle_theindex = '\item '
    929. 

  929. TexLet g:Tex_ItemStyle_thebibliography = '\bibitem[<+biblabel+>]{<+bibkey+>} <++>'
    930. 

  930. TexLet g:Tex_ItemStyle_description = '\item[<+label+>] <++>'
    931. 

  931. 

  932. function! Tex_InsertItem()
    933. 

  933.     " Get current enclosing environment
    934. 

  934. 	let env = Tex_GetCurrentEnv()
    935. 

  935. 

  936. 	if exists('g:Tex_ItemStyle_'.env)
    937. 

  937. 		return IMAP_PutTextWithMovement(g:Tex_ItemStyle_{env})
    938. 

  938. 	else
    939. 

  939. 		return ''
    940. 

  940. 	endif
    941. 

  941. endfunction
    942. 

  942. " }}}
    943. 

  943. " Tex_SetItemMaps: sets the \item inserting maps for current buffer {{{
    944. 

    945. 

  945. inoremap <script> <silent> <Plug>Tex_InsertItemOnThisLine <C-r>=Tex_InsertItem()<CR>
    946. 

  946. inoremap <script> <silent> <Plug>Tex_InsertItemOnNextLine <ESC>o<C-R>=Tex_InsertItem()<CR>
    947. 

  947. 

  948. function! Tex_SetItemMaps()
    949. 

  949. 	if !hasmapto("<Plug>Tex_InsertItem", "i")
    950. 

  950. 		imap <buffer> <M-i> <Plug>Tex_InsertItemOnThisLine
    951. 

  951. 	endif
    952. 

  952. 	if !hasmapto("<Plug>Tex_InsertItemOnNextLine", "i")
    953. 

  953. 		imap <buffer> <C-CR> <Plug>Tex_InsertItemOnNextLine
    954. 

  954. 	endif
    955. 

  955. endfunction " }}}
    956. 

    957. 

  957. " ==============================================================================
    958. 

  958. " Implementation of Fast Environment commands for LaTeX commands 
    959. 

  959. " ==============================================================================
    960. 

  960. " Define certain commonly used command definitions {{{
    961. 

    962. 

  962. TexLet g:Tex_Com_{'newtheorem'} = '\newtheorem{<+name+>}{<+caption+>}[<+within+>]'
    963. 

  963. TexLet g:Tex_Com_{'frac'} = '\frac{<+n+>}{<+d+>}<++>'
    964. 

  964. 

  965. " }}}
    966. 

  966. " PromptForCommand: prompts for a command {{{
    967. 

  967. " Description: 
    968. 

  968. function! PromptForCommand(ask)
    969. 

  969. 	let common_com_prompt = 
    970. 

  970. 				\ Tex_CreatePrompt(g:Tex_PromptedCommands, 2, ',') . "\n" .
    971. 

  971. 				\ "Enter number or command name :"
    972. 

  972. 

  973. 	let inp = input(a:ask."\n".common_com_prompt)
    974. 

  974. 	if inp =~ '^[0-9]\+$'
    975. 

  975. 		let com = Tex_Strntok(g:Tex_PromptedCommands, ',', inp)
    976. 

  976. 	else
    977. 

  977. 		let com = inp
    978. 

  978. 	endif
    979. 

  979. 

  980. 	return com
    981. 

  981. endfunction " }}}
    982. 

  982. " Tex_DoCommand: fast insertion of commands {{{
    983. 

  983. " Description:
    984. 

  984. "
    985. 

  985. function! Tex_DoCommand(isvisual)
    986. 

  986. 	" If the current line is empty or if a visual selection has been made,
    987. 

  987. 	" prompt for a new environment.
    988. 

  988. 	if getline('.') == '' || a:isvisual == 'yes'
    989. 

  989. 		let com = PromptForCommand('Choose a command to insert: ')
    990. 

  990. 		if com != ''
    991. 

  991. 			return Tex_PutCommand(com, a:isvisual)
    992. 

  992. 		else
    993. 

  993. 			return ''
    994. 

  994. 		endif
    995. 

  995. 	else
    996. 

  996. 		" We want to find out the word under the cursor without issuing
    997. 

  997. 		" any movement commands.
    998. 

  998. 		let presline = getline('.')
    999. 

  999. 		let c = col('.')
    1000. 

  1000. 

  1001. 		let wordbef = matchstr(strpart(presline, 0, c-1), '\k\+\*\?$')
    1002. 

  1002. 		let wordaft = matchstr(strpart(presline, c-1), '^\k\+\*\?')
    1003. 

  1003. 

  1004. 		let word = wordbef . wordaft
    1005. 

  1005. 		call Tex_Debug("Tex_DoCommand: wordbef = [".wordbef."], wordaft = [".wordaft."], word = [".word."]", 'env')
    1006. 

  1006. 

  1007. 		" We use \<Del> instead of \<Bs> because \<Bs> does not work
    1008. 

  1008. 		" unless bs=2
    1009. 

  1009. 		if word != ''
    1010. 

  1010. 			return substitute(wordbef, '.', "\<Left>", 'g')
    1011. 

  1011. 				\ . substitute(word, '.', "\<Del>", 'g')
    1012. 

  1012. 				\ . Tex_PutCommand(word, a:isvisual)
    1013. 

  1013. 		else
    1014. 

  1014. 			let cmd = PromptForCommand('Choose a command to insert: ')
    1015. 

  1015. 			if cmd != ''
    1016. 

  1016. 				return Tex_PutCommand(cmd, a:isvisual)
    1017. 

  1017. 			else
    1018. 

  1018. 				return ''
    1019. 

  1019. 			endif
    1020. 

  1020. 		endif
    1021. 

  1021. 	endif
    1022. 

  1022. endfunction " }}}
    1023. 

  1023. " Tex_PutCommand: calls various specialized functions {{{
    1024. 

  1024. " Description: 
    1025. 

  1025. "   Based on input argument, it calls various specialized functions.
    1026. 

  1026. function! Tex_PutCommand(com, isvisual)
    1027. 

  1027. 	if a:isvisual == "yes"
    1028. 

  1028. 		if a:com == '$'
    1029. 

  1029. 			return VEnclose('$', '$', '$', '$')
    1030. 

  1030. 		elseif a:com == '\\('
    1031. 

  1031. 			return VEnclose('\\(', '\\)', '\\(', '\\)')
    1032. 

  1032. 		else
    1033. 

  1033. 			return VEnclose("\\".a:com.'{', '}', "\\".a:com.'{', '}')
    1034. 

  1034. 		endif
    1035. 

  1035. 	else
    1036. 

  1036. 		if exists('b:Tex_Com_{"'.a:com.'"}')
    1037. 

  1037. 			return IMAP_PutTextWithMovement(b:Tex_Com_{a:com})
    1038. 

  1038. 		elseif exists('g:Tex_Com_{"'.a:com.'"}')
    1039. 

  1039. 			return IMAP_PutTextWithMovement(g:Tex_Com_{a:com})
    1040. 

  1040. 		elseif a:com == '$'
    1041. 

  1041. 			return IMAP_PutTextWithMovement('$<++>$')
    1042. 

  1042. 		else
    1043. 

  1043. 			return IMAP_PutTextWithMovement("\\".a:com.'{<++>}<++>')
    1044. 

  1044. 		endif
    1045. 

  1045. 	endif
    1046. 

  1046. endfunction " }}}
    1047. 

  1047. " Mapping the <F7> key to prompt/insert for command {{{
    1048. 

  1048. " and <S-F7> to prompt/replace command
    1049. 

  1049. "
    1050. 

  1050. " g:Tex_PromptedCommands is a variable containing a comma seperated list
    1051. 

  1051. " of commands. 
    1052. 

  1052. "
    1053. 

  1053. " Leaving this empty is equivalent to disabling the feature.
    1054. 

  1054. if g:Tex_PromptedCommands != ''
    1055. 

  1055. 

  1056. 	let b:DoubleDollars = 0
    1057. 

  1057. 

  1058. 	inoremap <silent> <Plug>Tex_FastCommandInsert  <C-r>=Tex_DoCommand('no')<cr>
    1059. 

  1059. 	nnoremap <silent> <Plug>Tex_FastCommandInsert  i<C-r>=Tex_DoCommand('no')<cr>
    1060. 

  1060. 	vnoremap <silent> <Plug>Tex_FastCommandInsert  <C-\><C-N>:call Tex_DoCommand('yes')<CR>
    1061. 

  1061. 

  1062. 	inoremap <silent> <Plug>Tex_FastCommandChange  <C-O>:call Tex_ChangeCommand('no')<CR>
    1063. 

  1063. 	nnoremap <silent> <Plug>Tex_FastCommandChange  :call Tex_ChangeCommand('no')<CR>
    1064. 

  1064. 

  1065. 	" Tex_ChangeCommand: calls ChangeCommand() to change the environment {{{
    1066. 

  1066. 	" Description:
    1067. 

  1067. 	"   Finds out which environment the cursor is positioned in and changes
    1068. 

  1068. 	"   that to the chosen new environment. This function knows the changes
    1069. 

  1069. 	"   which need to be made to change one env to another and calls
    1070. 

  1070. 	"   ChangeCommand() with the info.
    1071. 

  1071. 	"
    1072. 

  1072. 	function! Tex_ChangeCommand(isvisual) 
    1073. 

  1073. 

  1074. 		let pos_com = Tex_GetPos()
    1075. 

  1075. 

  1076. 		let com_line = searchpair('\\\k\{-}{', '', '}', 'b')
    1077. 

  1077. 

  1078. 		if com_line != 0
    1079. 

  1079. 			normal l
    1080. 

  1080. 			let com_name = expand('<cword>')
    1081. 

  1081. 		endif
    1082. 

  1082. 		
    1083. 

  1083. 		if !exists('com_name')
    1084. 

  1084. 			echomsg "You are not inside command"
    1085. 

  1085. 			call Tex_SetPos(pos_com)
    1086. 

  1086. 			return 0
    1087. 

  1087. 		endif
    1088. 

  1088. 

  1089. 		exe 'echomsg "You are within a '.com_name.' command."'
    1090. 

  1090. 		let change_com = PromptForCommand('Do you want to change it to (number or name)? ')
    1091. 

  1091. 

  1092. 		if change_com == ''
    1093. 

  1093. 			call Tex_SetPos(pos_com)
    1094. 

  1094. 			return 0
    1095. 

  1095. 		else
    1096. 

  1096. 			call <SID>ChangeCommand(change_com)
    1097. 

  1097. 			call Tex_SetPos(pos_com)
    1098. 

  1098. 			return 0
    1099. 

  1099. 		endif
    1100. 

  1100. 

  1101. 	endfunction 
    1102. 

  1102. 

  1103. 	" }}}
    1104. 

  1104. 	" ChangeCommand: Changes current command according to prompt menu {{{
    1105. 

  1105. 	" Description:
    1106. 

  1106. 	"
    1107. 

  1107. 	function! s:ChangeCommand(newcom)
    1108. 

  1108. 

  1109. 		exe 'normal! ct{'.a:newcom."\<Esc>"
    1110. 

  1110. 		
    1111. 

  1111. 	endfunction
    1112. 

  1112. 	" }}}
    1113. 

    1114. 

  1114. endif
    1115. 

  1115. 

  1116. " }}}
    1117. 

  1117. " Tex_SetFastCommandMaps: function for setting up the <F7> keys {{{
    1118. 

  1118. " Description: This function is made public so it can be called by the
    1119. 

  1119. "              SetTeXOptions() function in main.vim
    1120. 

  1120. function! Tex_SetFastCommandMaps()
    1121. 

  1121. 	if g:Tex_PromptedCommands != ''
    1122. 

  1122. 		if !hasmapto('<Plug>Tex_FastCommandInsert', 'i')
    1123. 

  1123. 			imap <silent> <buffer> <F7> <Plug>Tex_FastCommandInsert
    1124. 

  1124. 		endif
    1125. 

  1125. 		if !hasmapto('<Plug>Tex_FastCommandInsert', 'n')
    1126. 

  1126. 			nmap <silent> <buffer> <F7> <Plug>Tex_FastCommandInsert
    1127. 

  1127. 		endif
    1128. 

  1128. 		if !hasmapto('<Plug>Tex_FastCommandChange', 'i')
    1129. 

  1129. 			imap <silent> <buffer> <S-F7> <Plug>Tex_FastCommandChange
    1130. 

  1130. 		endif
    1131. 

  1131. 		if !hasmapto('<Plug>Tex_FastCommandChange', 'n')
    1132. 

  1132. 			nmap <silent> <buffer> <S-F7> <Plug>Tex_FastCommandChange
    1133. 

  1133. 		endif
    1134. 

  1134. 		if !hasmapto('<Plug>Tex_FastCommandInsert', 'v')
    1135. 

  1135. 			vmap <silent> <buffer> <F7> <Plug>Tex_FastCommandInsert
    1136. 

  1136. 		endif
    1137. 

  1137. 	endif
    1138. 

  1138. endfunction " }}}
    1139. 

    1140. 

  1140. " SetEnvMacrosOptions: sets mappings for buffers {{{
    1141. 

  1141. " " Description: 
    1142. 

  1142. function! <SID>SetEnvMacrosOptions()
    1143. 

  1143. 	if exists('b:doneTexEnvMaps')
    1144. 

  1144. 		return
    1145. 

  1145. 	endif
    1146. 

  1146. 	let b:doneTexEnvMaps = 1
    1147. 

  1147. 	if g:Tex_PromptedEnvironments != '' || g:Tex_HotKeyMappings != ''
    1148. 

  1148. 		call Tex_SetFastEnvironmentMaps()
    1149. 

  1149. 	endif
    1150. 

  1150. 	if g:Tex_PromptedCommands != ''
    1151. 

  1151. 		call Tex_SetFastCommandMaps()
    1152. 

  1152. 	endif
    1153. 

  1153. 	call Tex_SetItemMaps()
    1154. 

  1154. endfunction " }}}
    1155. 

  1155. " Catch the Filetype event so we set maps for each buffer {{{
    1156. 

  1156. augroup LatexSuite
    1157. 

  1157. 	au LatexSuite User LatexSuiteFileType 
    1158. 

  1158. 		\ call Tex_Debug('envmacros.vim: Catching LatexSuiteFileType event', 'env') |
    1159. 

  1159. 		\ call s:SetEnvMacrosOptions()
    1160. 

  1160. augroup END
    1161. 

  1161. " }}}
    1162. 

    1163. 

  1163. " this statement has to be at the end.
    1164. 

  1164. let s:doneOnce = 1
    1165. 

  1165. 

  1166. " vim:fdm=marker:nowrap:noet:ff=unix
    1167. 

    1168.