aboutsummaryrefslogtreecommitdiff
path: root/dot_vim/ftplugin/latex-suite/main.vim
diff options
context:
space:
mode:
authorRyan Kavanagh <rak@rak.ac>2021-12-14 11:42:41 -0500
committerRyan Kavanagh <rak@rak.ac>2021-12-14 11:42:41 -0500
commitfd2001cd614dfa0d55ec820b7c358a1795d3ea27 (patch)
tree932b5f91ad3c70f9cfa4455a0ccfb27a7b259bf1 /dot_vim/ftplugin/latex-suite/main.vim
parentadded symlink to cclub afs (diff)
Simplify vim configuration
Diffstat (limited to 'dot_vim/ftplugin/latex-suite/main.vim')
-rw-r--r--dot_vim/ftplugin/latex-suite/main.vim1024
1 files changed, 0 insertions, 1024 deletions
diff --git a/dot_vim/ftplugin/latex-suite/main.vim b/dot_vim/ftplugin/latex-suite/main.vim
deleted file mode 100644
index 063c6f6..0000000
--- a/dot_vim/ftplugin/latex-suite/main.vim
+++ /dev/null
@@ -1,1024 +0,0 @@
-" LaTeX filetype
-" Language: LaTeX (ft=tex)
-" Maintainer: Srinath Avadhanula
-" CVS: $Id: main.vim 999 2006-03-21 05:32:37Z srinathava $
-" URL:
-
-" line continuation used here.
-let s:save_cpo = &cpo
-set cpo&vim
-
-" avoiding re-inclusion {{{
-" the avoiding re-inclusion statement is not provided here because the files
-" which call this file should in the normal course of events handle the
-" re-inclusion stuff.
-
-" we definitely dont want to run through the entire file each and every time.
-" only once to define the functions. for successive latex files, just set up
-" the folding and mappings and quit.
-if exists('s:doneFunctionDefinitions') && !exists('b:forceRedoLocalTex')
- call s:SetTeXOptions()
- finish
-endif
-
-let s:doneFunctionDefinitions = 1
-
-" get the place where this plugin resides for setting cpt and dict options.
-" these lines need to be outside the function.
-let s:path = expand('<sfile>:p:h')
-" set up personal defaults.
-runtime ftplugin/tex/texrc
-" set up global defaults.
-exe "so ".s:path.'/texrc'
-
-" }}}
-
-nmap <silent> <script> <plug> i
-imap <silent> <script> <C-o><plug> <Nop>
-
-" ==============================================================================
-" mappings
-" ==============================================================================
-" {{{
-" calculate the mapleader character.
-let s:ml = exists('g:mapleader') ? g:mapleader : '\'
-
-if !exists('s:doneMappings')
- let s:doneMappings = 1
- " short forms for latex formatting and math elements. {{{
- " taken from auctex.vim or miktexmacros.vim
- call IMAP ('__', '_{<++>}<++>', "tex")
- call IMAP ('()', '(<++>)<++>', "tex")
- call IMAP ('[]', '[<++>]<++>', "tex")
- call IMAP ('{}', '{<++>}<++>', "tex")
- call IMAP ('^^', '^{<++>}<++>', "tex")
- call IMAP ('$$', '$<++>$<++>', "tex")
- call IMAP ('==', '&=& ', "tex")
- call IMAP ('~~', '&\approx& ', "tex")
- call IMAP ('=~', '\approx', "tex")
- call IMAP ('::', '\dots', "tex")
- call IMAP ('((', '\left( <++> \right)<++>', "tex")
- call IMAP ('[[', '\left[ <++> \right]<++>', "tex")
- call IMAP ('{{', '\left\{ <++> \right\}<++>', "tex")
- call IMAP (g:Tex_Leader.'^', '\hat{<++>}<++>', "tex")
- call IMAP (g:Tex_Leader.'_', '\bar{<++>}<++>', "tex")
- call IMAP (g:Tex_Leader.'6', '\partial', "tex")
- call IMAP (g:Tex_Leader.'8', '\infty', "tex")
- call IMAP (g:Tex_Leader.'/', '\frac{<++>}{<++>}<++>', "tex")
- call IMAP (g:Tex_Leader.'%', '\frac{<++>}{<++>}<++>', "tex")
- call IMAP (g:Tex_Leader.'@', '\circ', "tex")
- call IMAP (g:Tex_Leader.'0', '^\circ', "tex")
- call IMAP (g:Tex_Leader.'=', '\equiv', "tex")
- call IMAP (g:Tex_Leader."\\",'\setminus', "tex")
- call IMAP (g:Tex_Leader.'.', '\cdot', "tex")
- call IMAP (g:Tex_Leader.'*', '\times', "tex")
- call IMAP (g:Tex_Leader.'&', '\wedge', "tex")
- call IMAP (g:Tex_Leader.'-', '\bigcap', "tex")
- call IMAP (g:Tex_Leader.'+', '\bigcup', "tex")
- call IMAP (g:Tex_Leader.'M', '\sum_{<++>}^{<++>}<++>', 'tex')
- call IMAP (g:Tex_Leader.'S', '\sum_{<++>}^{<++>}<++>', 'tex')
- call IMAP (g:Tex_Leader.'(', '\subset', "tex")
- call IMAP (g:Tex_Leader.')', '\supset', "tex")
- call IMAP (g:Tex_Leader.'<', '\le', "tex")
- call IMAP (g:Tex_Leader.'>', '\ge', "tex")
- call IMAP (g:Tex_Leader.',', '\nonumber', "tex")
- call IMAP (g:Tex_Leader.'~', '\tilde{<++>}<++>', "tex")
- call IMAP (g:Tex_Leader.';', '\dot{<++>}<++>', "tex")
- call IMAP (g:Tex_Leader.':', '\ddot{<++>}<++>', "tex")
- call IMAP (g:Tex_Leader.'2', '\sqrt{<++>}<++>', "tex")
- call IMAP (g:Tex_Leader.'|', '\Big|', "tex")
- call IMAP (g:Tex_Leader.'I', "\\int_{<++>}^{<++>}<++>", 'tex')
- " }}}
- " Greek Letters {{{
- call IMAP(g:Tex_Leader.'a', '\alpha', 'tex')
- call IMAP(g:Tex_Leader.'b', '\beta', 'tex')
- call IMAP(g:Tex_Leader.'c', '\chi', 'tex')
- call IMAP(g:Tex_Leader.'d', '\delta', 'tex')
- call IMAP(g:Tex_Leader.'e', '\varepsilon', 'tex')
- call IMAP(g:Tex_Leader.'f', '\varphi', 'tex')
- call IMAP(g:Tex_Leader.'g', '\gamma', 'tex')
- call IMAP(g:Tex_Leader.'h', '\eta', 'tex')
- call IMAP(g:Tex_Leader.'k', '\kappa', 'tex')
- call IMAP(g:Tex_Leader.'l', '\lambda', 'tex')
- call IMAP(g:Tex_Leader.'m', '\mu', 'tex')
- call IMAP(g:Tex_Leader.'n', '\nu', 'tex')
- call IMAP(g:Tex_Leader.'p', '\pi', 'tex')
- call IMAP(g:Tex_Leader.'q', '\theta', 'tex')
- call IMAP(g:Tex_Leader.'r', '\rho', 'tex')
- call IMAP(g:Tex_Leader.'s', '\sigma', 'tex')
- call IMAP(g:Tex_Leader.'t', '\tau', 'tex')
- call IMAP(g:Tex_Leader.'u', '\upsilon', 'tex')
- call IMAP(g:Tex_Leader.'v', '\varsigma', 'tex')
- call IMAP(g:Tex_Leader.'w', '\omega', 'tex')
- call IMAP(g:Tex_Leader.'w', '\wedge', 'tex') " AUCTEX style
- call IMAP(g:Tex_Leader.'x', '\xi', 'tex')
- call IMAP(g:Tex_Leader.'y', '\psi', 'tex')
- call IMAP(g:Tex_Leader.'z', '\zeta', 'tex')
- " not all capital greek letters exist in LaTeX!
- " reference: http://www.giss.nasa.gov/latex/ltx-405.html
- call IMAP(g:Tex_Leader.'D', '\Delta', 'tex')
- call IMAP(g:Tex_Leader.'F', '\Phi', 'tex')
- call IMAP(g:Tex_Leader.'G', '\Gamma', 'tex')
- call IMAP(g:Tex_Leader.'Q', '\Theta', 'tex')
- call IMAP(g:Tex_Leader.'L', '\Lambda', 'tex')
- call IMAP(g:Tex_Leader.'X', '\Xi', 'tex')
- call IMAP(g:Tex_Leader.'Y', '\Psi', 'tex')
- call IMAP(g:Tex_Leader.'S', '\Sigma', 'tex')
- call IMAP(g:Tex_Leader.'U', '\Upsilon', 'tex')
- call IMAP(g:Tex_Leader.'W', '\Omega', 'tex')
- " }}}
- " ProtectLetters: sets up indentity maps for things like ``a {{{
- " " Description: If we simply do
- " call IMAP('`a', '\alpha', 'tex')
- " then we will never be able to type 'a' after a tex-quotation. Since
- " IMAP() always uses the longest map ending in the letter, this problem
- " can be avoided by creating a fake map for ``a -> ``a.
- " This function sets up fake maps of the following forms:
- " ``[aA] -> ``[aA] (for writing in quotations)
- " \`[aA] -> \`[aA] (for writing diacritics)
- " "`[aA] -> "`[aA] (for writing german quotations)
- " It does this for all printable lower ascii characters just to make sure
- " we dont let anything slip by.
- function! s:ProtectLetters(first, last)
- let i = a:first
- while i <= a:last
- if nr2char(i) =~ '[[:print:]]'
- call IMAP('``'.nr2char(i), '``'.nr2char(i), 'tex')
- call IMAP('\`'.nr2char(i), '\`'.nr2char(i), 'tex')
- call IMAP('"`'.nr2char(i), '"`'.nr2char(i), 'tex')
- endif
- let i = i + 1
- endwhile
- endfunction
- call s:ProtectLetters(32, 127)
- " }}}
- " vmaps: enclose selected region in brackets, environments {{{
- " The action changes depending on whether the selection is character-wise
- " or line wise. for example, selecting linewise and pressing \v will
- " result in the region being enclosed in \begin{verbatim}, \end{verbatim},
- " whereas in characterise visual mode, the thingie is enclosed in \verb|
- " and |.
- exec 'vnoremap <silent> '.g:Tex_Leader."( \<C-\\>\<C-N>:call VEnclose('\\left( ', ' \\right)', '\\left(', '\\right)')\<CR>"
- exec 'vnoremap <silent> '.g:Tex_Leader."[ \<C-\\>\<C-N>:call VEnclose('\\left[ ', ' \\right]', '\\left[', '\\right]')\<CR>"
- exec 'vnoremap <silent> '.g:Tex_Leader."{ \<C-\\>\<C-N>:call VEnclose('\\left\\{ ', ' \\right\\}', '\\left\\{', '\\right\\}')\<CR>"
- exec 'vnoremap <silent> '.g:Tex_Leader."$ \<C-\\>\<C-N>:call VEnclose('$', '$', '\\[', '\\]')\<CR>"
- " }}}
-end
-
-" }}}
-
-" ==============================================================================
-" Helper functions for debugging
-" ==============================================================================
-" Tex_Debug: appends the argument into s:debugString {{{
-" Description:
-"
-" Do not want a memory leak! Set this to zero so that latex-suite always
-" starts out in a non-debugging mode.
-if !exists('g:Tex_Debug')
- let g:Tex_Debug = 0
-endif
-function! Tex_Debug(str, ...)
- if !g:Tex_Debug
- return
- endif
- if a:0 > 0
- let pattern = a:1
- else
- let pattern = ''
- endif
- if !exists('s:debugString_'.pattern)
- let s:debugString_{pattern} = ''
- endif
- let s:debugString_{pattern} = s:debugString_{pattern}.a:str."\n"
-
- let s:debugString_ = (exists('s:debugString_') ? s:debugString_ : '')
- \ . pattern.' : '.a:str."\n"
-
- if Tex_GetVarValue('Tex_DebugLog') != ''
- exec 'redir! >> '.Tex_GetVarValue('Tex_DebugLog')
- silent! echo pattern.' : '.a:str
- redir END
- endif
-endfunction " }}}
-" Tex_PrintDebug: prings s:debugString {{{
-" Description:
-"
-function! Tex_PrintDebug(...)
- if a:0 > 0
- let pattern = a:1
- else
- let pattern = ''
- endif
- if exists('s:debugString_'.pattern)
- echo s:debugString_{pattern}
- endif
-endfunction " }}}
-" Tex_ClearDebug: clears the s:debugString string {{{
-" Description:
-"
-function! Tex_ClearDebug(...)
- if a:0 > 0
- let pattern = a:1
- else
- let pattern = ''
- endif
- if exists('s:debugString_'.pattern)
- let s:debugString_{pattern} = ''
- endif
-endfunction " }}}
-" Tex_ShowVariableValue: debugging help {{{
-" provides a way to examine script local variables from outside the script.
-" very handy for debugging.
-function! Tex_ShowVariableValue(...)
- let i = 1
- while i <= a:0
- exe 'let arg = a:'.i
- if exists('s:'.arg) ||
- \ exists('*s:'.arg)
- exe 'let val = s:'.arg
- echomsg 's:'.arg.' = '.val
- end
- let i = i + 1
- endwhile
-endfunction
-
-" }}}
-
-" ==============================================================================
-" Helper functions for grepping
-" ==============================================================================
-" Tex_Grep: shorthand for :grep or :vimgrep {{{
-function! Tex_Grep(string, where)
- if v:version >= 700
- exec 'silent! vimgrep! /'.a:string.'/ '.a:where
- else
- exec 'silent! grep! '.Tex_EscapeForGrep(a:string).' '.a:where
- endif
-endfunction
-
-" }}}
-" Tex_Grepadd: shorthand for :grepadd or :vimgrepadd {{{
-function! Tex_Grepadd(string, where)
- if v:version >= 700
- exec 'silent! vimgrepadd! /'.a:string.'/ '.a:where
- else
- exec "silent! grepadd! ".Tex_EscapeForGrep(a:string).' '.a:where
- endif
-endfunction
-
-" }}}
-" Tex_EscapeForGrep: escapes back-slashes and doublequotes the correct number of times {{{
-" Description: This command escapes the backslash and double quotes in a
-" search pattern the correct number of times so it can be used in the ``:grep``
-" command. This command is meant to be used as::
-"
-" exec "silent! grep ".Tex_EscapeForGrep(pattern)." file"
-"
-" The input argument to this function should be the string which you want
-" the external command to finally see. For example, to search for a string
-" ``'\bibitem'``, the grep command needs to be passed a string like
-" ``'\\bibitem'``. Examples::
-"
-" Tex_EscapeForGrep('\\bibitem') " correct
-" Tex_EscapeForGrep('\bibitem') " wrong
-" Tex_EscapeForGrep("\\bibitem") " wrong
-" Tex_EscapeForGrep('\<word\>') " correct
-"
-function! Tex_EscapeForGrep(string)
- let retVal = a:string
-
- " The shell halves the backslashes.
- if &shell =~ 'sh'
- let retVal = escape(retVal, "\\")
-
- " If shellxquote is set, then the backslashes are halved yet again.
- if &shellxquote == '"'
- let retVal = escape(retVal, "\"\\")
- endif
-
- endif
- " escape special characters which bash/cmd.exe might interpret
- let retVal = escape(retVal, "<>")
-
- return retVal
-endfunction " }}}
-
-" ==============================================================================
-" Uncategorized helper functions
-" ==============================================================================
-" Tex_Strntok: extract the n^th token from a list {{{
-" example: Strntok('1,23,3', ',', 2) = 23
-fun! Tex_Strntok(s, tok, n)
- return matchstr( a:s.a:tok[0], '\v(\zs([^'.a:tok.']*)\ze['.a:tok.']){'.a:n.'}')
-endfun
-
-" }}}
-" Tex_CreatePrompt: creates a prompt string {{{
-" Description:
-" Arguments:
-" promptList: This is a string of the form:
-" 'item1,item2,item3,item4'
-" cols: the number of columns in the resultant prompt
-" sep: the list seperator token
-"
-" Example:
-" Tex_CreatePrompt('item1,item2,item3,item4', 2, ',')
-" returns
-" "(1) item1\t(2)item2\n(3)item3\t(4)item4"
-"
-" This string can be used in the input() function.
-function! Tex_CreatePrompt(promptList, cols, sep)
-
- let g:listSep = a:sep
- let num_common = GetListCount(a:promptList)
-
- let i = 1
- let promptStr = ""
-
- while i <= num_common
-
- let j = 0
- while j < a:cols && i + j <= num_common
- let com = Tex_Strntok(a:promptList, a:sep, i+j)
- let promptStr = promptStr.'('.(i+j).') '.
- \ com."\t".( strlen(com) < 4 ? "\t" : '' )
-
- let j = j + 1
- endwhile
-
- let promptStr = promptStr."\n"
-
- let i = i + a:cols
- endwhile
- return promptStr
-endfunction
-
-" }}}
-" Tex_CleanSearchHistory: removes last search item from search history {{{
-" Description: This function needs to be globally visible because its
-" called from outside the script during expansion.
-function! Tex_CleanSearchHistory()
- call histdel("/", -1)
- let @/ = histget("/", -1)
-endfunction
-nmap <silent> <script> <plug>cleanHistory :call Tex_CleanSearchHistory()<CR>
-
-" }}}
-" Tex_GetVarValue: gets the value of the variable {{{
-" Description:
-" See if a window-local, buffer-local or global variable with the given name
-" exists and if so, returns the corresponding value. If none exist, return
-" an empty string.
-function! Tex_GetVarValue(varname, ...)
- if exists('w:'.a:varname)
- return w:{a:varname}
- elseif exists('b:'.a:varname)
- return b:{a:varname}
- elseif exists('g:'.a:varname)
- return g:{a:varname}
- elseif a:0 > 0
- return a:1
- else
- return ''
- endif
-endfunction " }}}
-" Tex_GetMainFileName: gets the name of the main file being compiled. {{{
-" Description: returns the full path name of the main file.
-" This function checks for the existence of a .latexmain file
-" which might point to the location of a "main" latex file.
-" If .latexmain exists, then return the full path name of the
-" file being pointed to by it.
-"
-" Otherwise, return the full path name of the current buffer.
-"
-" You can supply an optional "modifier" argument to the
-" function, which will optionally modify the file name before
-" returning.
-" NOTE: From version 1.6 onwards, this function always trims
-" away the .latexmain part of the file name before applying the
-" modifier argument.
-function! Tex_GetMainFileName(...)
- if a:0 > 0
- let modifier = a:1
- else
- let modifier = ':p'
- endif
-
- " If the user wants to use his own way to specify the main file name, then
- " use it straight away.
- if Tex_GetVarValue('Tex_MainFileExpression') != ''
- exec 'let retval = '.Tex_GetVarValue('Tex_MainFileExpression')
- return retval
- endif
-
- let curd = getcwd()
-
- let dirmodifier = '%:p:h'
- let dirLast = expand(dirmodifier)
- call Tex_CD(dirLast)
-
- " move up the directory tree until we find a .latexmain file.
- " TODO: Should we be doing this recursion by default, or should there be a
- " setting?
- while glob('*.latexmain') == ''
- let dirmodifier = dirmodifier.':h'
- " break from the loop if we cannot go up any further.
- if expand(dirmodifier) == dirLast
- break
- endif
- let dirLast = expand(dirmodifier)
- call Tex_CD(dirLast)
- endwhile
-
- let lheadfile = glob('*.latexmain')
- if lheadfile != ''
- " Remove the trailing .latexmain part of the filename... We never want
- " that.
- let lheadfile = fnamemodify(substitute(lheadfile, '\.latexmain$', '', ''), modifier)
- else
- " If we cannot find any main file, just modify the filename of the
- " current buffer.
- let lheadfile = expand('%'.modifier)
- endif
-
- call Tex_CD(curd)
-
- " NOTE: The caller of this function needs to escape spaces in the
- " file name as appropriate. The reason its not done here is that
- " escaping spaces is not safe if this file is to be used as part of
- " an external command on certain platforms.
- return lheadfile
-endfunction
-
-" }}}
-" Tex_ChooseFromPrompt: process a user input to a prompt string {{{
-" " Description:
-function! Tex_ChooseFromPrompt(dialog, list, sep)
- let g:Tex_ASDF = a:dialog
- let inp = input(a:dialog)
- if inp =~ '\d\+'
- return Tex_Strntok(a:list, a:sep, inp)
- else
- return inp
- endif
-endfunction " }}}
-" Tex_ChooseFile: produces a file list and prompts for choice {{{
-" Description:
-function! Tex_ChooseFile(dialog)
- let files = glob('*')
- if files == ''
- return ''
- endif
- let s:incnum = 0
- echo a:dialog
- let filenames = substitute(files, "\\v(^|\n)", "\\=submatch(0).Tex_IncrementNumber(1).' : '", 'g')
- echo filenames
- let choice = input('Enter Choice : ')
- let g:choice = choice
- if choice == ''
- return ''
- endif
- if choice =~ '^\s*\d\+\s*$'
- let retval = Tex_Strntok(files, "\n", choice)
- else
- let filescomma = substitute(files, "\n", ",", "g")
- let retval = GetListMatchItem(filescomma, choice)
- endif
- if retval == ''
- return ''
- endif
- return retval
-endfunction
-
-" }}}
-" Tex_IncrementNumber: returns an incremented number each time {{{
-" Description:
-let s:incnum = 0
-function! Tex_IncrementNumber(increm)
- let s:incnum = s:incnum + a:increm
- return s:incnum
-endfunction
-
-" }}}
-" Tex_ResetIncrementNumber: increments s:incnum to zero {{{
-" Description:
-function! Tex_ResetIncrementNumber(val)
- let s:incnum = a:val
-endfunction " }}}
-" Tex_FindInRtp: check if file exists in &rtp {{{
-" Description: Checks if file exists in globpath(&rtp, ...) and cuts off the
-" rest of returned names. This guarantees that sourced file is
-" from $HOME.
-" If an optional argument is given, it specifies how to expand
-" each filename found. For example, '%:p' will return a list of
-" the complete paths to the files. By default returns trailing
-" path-names without extenions.
-" NOTE: This function is very slow when a large number of
-" matches are found because of a while loop which modifies
-" each filename found. Some speedup was acheived by using
-" a tokenizer approach rather than using Tex_Strntok which
-" would have been more obvious.
-function! Tex_FindInRtp(filename, directory, ...)
- " how to expand each filename. ':p:t:r' modifies each filename to its
- " trailing part without extension.
- let expand = (a:0 > 0 ? a:1 : ':p:t:r')
- " The pattern used... An empty filename should be regarded as '*'
- let pattern = (a:filename != '' ? a:filename : '*')
-
- let filelist = globpath(&rtp, 'ftplugin/latex-suite/'.a:directory.'/'.pattern)."\n"
-
- if filelist == "\n"
- return ''
- endif
-
- if a:filename != ''
- return fnamemodify(Tex_Strntok(filelist, "\n", 1), expand)
- endif
-
- " Now cycle through the files modifying each filename in the desired
- " manner.
- let retfilelist = ''
- let i = 1
- while 1
- " Extract the portion till the next newline. Then shorten the filelist
- " by removing till the newline.
- let nextnewline = stridx(filelist, "\n")
- if nextnewline == -1
- break
- endif
- let filename = strpart(filelist, 0, nextnewline)
- let filelist = strpart(filelist, nextnewline+1)
-
- " The actual modification.
- if fnamemodify(filename, expand) != ''
- let retfilelist = retfilelist.fnamemodify(filename, expand).","
- endif
- let i = i + 1
- endwhile
-
- return substitute(retfilelist, ',$', '', '')
-endfunction
-
-" }}}
-" Tex_GetErrorList: returns vim's clist {{{
-" Description: returns the contents of the error list available via the :clist
-" command.
-function! Tex_GetErrorList()
- let _a = @a
- redir @a | silent! clist | redir END
- let errlist = @a
- let @a = _a
-
- if errlist =~ 'E42: '
- let errlist = ''
- endif
-
- return errlist
-endfunction " }}}
-" Tex_GetTempName: get the name of a temporary file in specified directory {{{
-" Description: Unlike vim's native tempname(), this function returns the name
-" of a temporary file in the directory specified. This enables
-" us to create temporary files in a specified directory.
-function! Tex_GetTempName(dirname)
- let prefix = 'latexSuiteTemp'
- let slash = (a:dirname =~ '\\\|/$' ? '' : '/')
- let i = 0
- while filereadable(a:dirname.slash.prefix.i.'.tex') && i < 1000
- let i = i + 1
- endwhile
- if filereadable(a:dirname.slash.prefix.i.'.tex')
- echoerr "Temporary file could not be created in ".a:dirname
- return ''
- endif
- return expand(a:dirname.slash.prefix.i.'.tex', ':p')
-endfunction
-" }}}
-" Tex_MakeMap: creates a mapping from lhs to rhs if rhs is not already mapped {{{
-" Description:
-function! Tex_MakeMap(lhs, rhs, mode, extraargs)
- if !hasmapto(a:rhs, a:mode)
- exec a:mode.'map '.a:extraargs.' '.a:lhs.' '.a:rhs
- endif
-endfunction " }}}
-" Tex_CD: cds to given directory escaping spaces if necessary {{{
-" " Description:
-function! Tex_CD(dirname)
- exec 'cd '.Tex_EscapeSpaces(a:dirname)
-endfunction " }}}
-" Tex_EscapeSpaces: escapes unescaped spaces from a path name {{{
-" Description:
-function! Tex_EscapeSpaces(path)
- return substitute(a:path, '[^\\]\(\\\\\)*\zs ', '\\ ', 'g')
-endfunction " }}}
-" Tex_FindFile: finds a file in the vim's 'path' {{{
-" Description: finds a file in vim's 'path'
-function! Tex_FindFile(fname, path, suffixesadd)
- if exists('*findfile')
- let _suffixesadd = &suffixesadd
- let &suffixesadd = a:suffixesadd
- let retval = findfile(a:fname, a:path)
- let &suffixesadd = _suffixesadd
- else
- " split a new window so we do not screw with the current buffer. We
- " want to use the same filename each time so that multiple scratch
- " buffers are not created.
- let retval = ''
- silent! split __HOPEFULLY_THIS_FILE_DOES_NOT_EXIST__
- let _suffixesadd = &suffixesadd
- let _path = &path
- let &suffixesadd = a:suffixesadd
- let &path = a:path
- exec 'silent! find '.a:fname
- if bufname('%') != '__HOPEFULLY_THIS_FILE_DOES_NOT_EXIST__'
- let retval = expand('%:p')
- end
- silent! bdelete!
- let &suffixesadd = _suffixesadd
- let &path = _path
- endif
- return retval
-endfunction " }}}
-
-" ==============================================================================
-" Smart key-mappings
-" ==============================================================================
-" TexQuotes: inserts `` or '' instead of " {{{
-if g:Tex_SmartKeyQuote
-
- " TexQuotes: inserts `` or '' instead of "
- " Taken from texmacro.vim by Benji Fisher <benji@e-math.AMS.org>
- " TODO: Deal with nested quotes.
- " The :imap that calls this function should insert a ", move the cursor to
- " the left of that character, then call this with <C-R>= .
- function! s:TexQuotes()
- let l = line(".")
- let c = col(".")
- let restore_cursor = l . "G" . virtcol(".") . "|"
- normal! H
- let restore_cursor = "normal!" . line(".") . "Gzt" . restore_cursor
- execute restore_cursor
- " In math mode, or when preceded by a \, just move the cursor past the
- " already-inserted " character.
- if synIDattr(synID(l, c, 1), "name") =~ "^texMath"
- \ || (c > 1 && getline(l)[c-2] == '\')
- return "\<Right>"
- endif
- " Find the appropriate open-quote and close-quote strings.
- if exists("b:Tex_SmartQuoteOpen")
- let open = b:Tex_SmartQuoteOpen
- elseif exists("g:Tex_SmartQuoteOpen")
- let open = g:Tex_SmartQuoteOpen
- else
- let open = "``"
- endif
- if exists("b:Tex_SmartQuoteClose")
- let close = b:Tex_SmartQuoteClose
- elseif exists("g:Tex_SmartQuoteClose")
- let close = g:Tex_SmartQuoteClose
- else
- let close = "''"
- endif
- let boundary = '\|'
- " This code seems to be obsolete, since this script variable is never
- " set. The idea is that some languages use ",," as an open- or
- " close-quote string, and we want to avoid confusing ordinary ","
- " with a quote boundary.
- if exists("s:TeX_strictquote")
- if( s:TeX_strictquote == "open" || s:TeX_strictquote == "both" )
- let boundary = '\<' . boundary
- endif
- if( s:TeX_strictquote == "close" || s:TeX_strictquote == "both" )
- let boundary = boundary . '\>'
- endif
- endif
-
- " Eventually return q; set it to the default value now.
- let q = open
- let pattern =
- \ escape(open, '\~') .
- \ boundary .
- \ escape(close, '\~') .
- \ '\|^$\|"'
-
- while 1 " Look for preceding quote (open or close), ignoring
- " math mode and '\"' .
- call search(pattern, "bw")
- if synIDattr(synID(line("."), col("."), 1), "name") !~ "^texMath"
- \ && strpart(getline('.'), col('.')-2, 2) != '\"'
- break
- endif
- endwhile
-
- " Now, test whether we actually found a _preceding_ quote; if so, is it
- " an open quote?
- if ( line(".") < l || line(".") == l && col(".") < c )
- if strpart(getline("."), col(".")-1) =~ '\V\^' . escape(open, '\')
- if line(".") == l && col(".") + strlen(open) == c
- " Insert "<++>''<++>" instead of just "''".
- let q = IMAP_PutTextWithMovement("<++>".close."<++>")
- else
- let q = close
- endif
- endif
- endif
-
- " Return to line l, column c:
- execute restore_cursor
- " Start with <Del> to remove the " put in by the :imap .
- return "\<Del>" . q
-
- endfunction
-
-endif
-" }}}
-" SmartBS: smart backspacing {{{
-if g:Tex_SmartKeyBS
-
- " SmartBS: smart backspacing
- " SmartBS lets you treat diacritic characters (those \'{a} thingies) as a
- " single character. This is useful for example in the following situation:
- "
- " \v{s}\v{t}astn\'{y} ('happy' in Slovak language :-) )
- " If you will delete this normally (without using smartBS() function), you
- " must press <BS> about 19x. With function smartBS() you must press <BS> only
- " 7x. Strings like "\v{s}", "\'{y}" are considered like one character and are
- " deleted with one <BS>.
- let s:smartBS_pat = Tex_GetVarValue('Tex_SmartBSPattern')
-
- fun! s:SmartBS_pat()
- return s:smartBS_pat
- endfun
-
- " This function comes from Benji Fisher <benji@e-math.AMS.org>
- " http://vim.sourceforge.net/scripts/download.php?src_id=409
- " (modified/patched by Lubomir Host 'rajo' <host8 AT keplerDOTfmphDOTuniba.sk>)
- function! s:SmartBS(pat)
- let init = strpart(getline("."), 0, col(".")-1)
- let matchtxt = matchstr(init, a:pat)
- if matchtxt != ''
- let bstxt = substitute(matchtxt, '.', "\<bs>", 'g')
- return bstxt
- else
- return "\<bs>"
- endif
- endfun
-
-endif " }}}
-" SmartDots: inserts \cdots instead of ... in math mode otherwise \ldots {{{
-" if amsmath package is detected then just use \dots and let amsmath take care
-" of it.
-if g:Tex_SmartKeyDot
-
- function! <SID>SmartDots()
- if strpart(getline('.'), col('.')-3, 2) == '..' &&
- \ g:Tex_package_detected =~ '\<amsmath\>'
- return "\<bs>\<bs>\\dots"
- elseif synIDattr(synID(line('.'),col('.')-1,0),"name") =~ '^texMath'
- \&& strpart(getline('.'), col('.')-3, 2) == '..'
- return "\<bs>\<bs>\\cdots"
- elseif strpart(getline('.'), col('.')-3, 2) == '..'
- return "\<bs>\<bs>\\ldots"
- else
- return '.'
- endif
- endfunction
-
-endif
-" }}}
-
-" source texproject.vim before other files
-exe 'source '.s:path.'/texproject.vim'
-
-" source all the relevant files.
-exe 'source '.s:path.'/texmenuconf.vim'
-exe 'source '.s:path.'/envmacros.vim'
-exe 'source '.s:path.'/elementmacros.vim'
-
-" source utf-8 or plain math menus
-if exists("g:Tex_UseUtfMenus") && g:Tex_UseUtfMenus != 0 && has("gui_running")
- exe 'source '.s:path.'/mathmacros-utf.vim'
-else
- exe 'source '.s:path.'/mathmacros.vim'
-endif
-
-exe 'source '.s:path.'/multicompile.vim'
-exe 'source '.s:path.'/compiler.vim'
-exe 'source '.s:path.'/folding.vim'
-exe 'source '.s:path.'/templates.vim'
-exe 'source '.s:path.'/custommacros.vim'
-exe 'source '.s:path.'/bibtex.vim'
-
-" source advanced math functions
-if g:Tex_AdvancedMath == 1
- exe 'source '.s:path.'/brackets.vim'
- exe 'source '.s:path.'/smartspace.vim'
-endif
-
-if g:Tex_Diacritics != 0
- exe 'source '.s:path.'/diacritics.vim'
-endif
-
-exe 'source '.s:path.'/texviewer.vim'
-exe 'source '.s:path.'/version.vim'
-
-" ==============================================================================
-" Finally set up the folding, options, mappings and quit.
-" ==============================================================================
-" SetTeXOptions: sets options/mappings for this file. {{{
-function! <SID>SetTeXOptions()
- " Avoid reinclusion.
- if exists('b:doneSetTeXOptions')
- return
- endif
- let b:doneSetTeXOptions = 1
-
- exe 'setlocal dict^='.s:path.'/dictionaries/dictionary'
-
- call Tex_Debug('SetTeXOptions: sourcing maps', 'main')
- " smart functions
- if g:Tex_SmartKeyQuote
- inoremap <buffer> <silent> " "<Left><C-R>=<SID>TexQuotes()<CR>
- endif
- if g:Tex_SmartKeyBS
- inoremap <buffer> <silent> <BS> <C-R>=<SID>SmartBS(<SID>SmartBS_pat())<CR>
- endif
- if g:Tex_SmartKeyDot
- inoremap <buffer> <silent> . <C-R>=<SID>SmartDots()<CR>
- endif
-
- " This line seems to be necessary to source our compiler/tex.vim file.
- " The docs are unclear why this needs to be done even though this file is
- " the first compiler plugin in 'runtimepath'.
- runtime compiler/tex.vim
-
-endfunction
-
-augroup LatexSuite
- au LatexSuite User LatexSuiteFileType
- \ call Tex_Debug('main.vim: Catching LatexSuiteFileType event', 'main') |
- \ call <SID>SetTeXOptions()
-augroup END
-
-" }}}
-
-" ==============================================================================
-" Settings for taglist.vim plugin
-" ==============================================================================
-" Sets Tlist_Ctags_Cmd for taglist.vim and regexps for ctags {{{
-if exists("g:Tex_TaglistSupport") && g:Tex_TaglistSupport == 1
- if !exists("g:tlist_tex_settings")
- let g:tlist_tex_settings = 'tex;s:section;c:chapter;l:label;r:ref'
- endif
-
- if exists("Tlist_Ctags_Cmd")
- let s:tex_ctags = Tlist_Ctags_Cmd
- else
- let s:tex_ctags = 'ctags' " Configurable in texrc?
- endif
-
- if exists("g:Tex_InternalTagsDefinitions") && g:Tex_InternalTagsDefinitions == 1
- let Tlist_Ctags_Cmd = s:tex_ctags ." --langdef=tex --langmap=tex:.tex.ltx.latex"
- \.' --regex-tex="/\\\\begin{abstract}/Abstract/s,abstract/"'
- \.' --regex-tex="/\\\\part[ \t]*\*?\{[ \t]*([^}]*)\}/\1/s,part/"'
- \.' --regex-tex="/\\\\chapter[ \t]*\*?\{[ \t]*([^}]*)\}/\1/s,chapter/"'
- \.' --regex-tex="/\\\\section[ \t]*\*?\{[ \t]*([^}]*)\}/\1/s,section/"'
- \.' --regex-tex="/\\\\subsection[ \t]*\*?\{[ \t]*([^}]*)\}/+ \1/s,subsection/"'
- \.' --regex-tex="/\\\\subsubsection[ \t]*\*?\{[ \t]*([^}]*)\}/+ \1/s,subsubsection/"'
- \.' --regex-tex="/\\\\paragraph[ \t]*\*?\{[ \t]*([^}]*)\}/+ \1/s,paragraph/"'
- \.' --regex-tex="/\\\\subparagraph[ \t]*\*?\{[ \t]*([^}]*)\}/+ \1/s,subparagraph/"'
- \.' --regex-tex="/\\\\begin{thebibliography}/BIBLIOGRAPHY/s,thebibliography/"'
- \.' --regex-tex="/\\\\tableofcontents/TABLE OF CONTENTS/s,tableofcontents/"'
- \.' --regex-tex="/\\\\frontmatter/FRONTMATTER/s,frontmatter/"'
- \.' --regex-tex="/\\\\mainmatter/MAINMATTER/s,mainmatter/"'
- \.' --regex-tex="/\\\\backmatter/BACKMATTER/s,backmatter/"'
- \.' --regex-tex="/\\\\appendix/APPENDIX/s,appendix/"'
- \.' --regex-tex="/\\\\label[ \t]*\*?\{[ \t]*([^}]*)\}/\1/l,label/"'
- \.' --regex-tex="/\\\\ref[ \t]*\*?\{[ \t]*([^}]*)\}/\1/r,ref/"'
- endif
-endif
-
-" }}}
-
-" commands to completion
-let g:Tex_completion_explorer = ','
-
-" Mappings defined in package files will overwrite all other
-exe 'source '.s:path.'/packages.vim'
-
-" ==============================================================================
-" These functions are used to immitate certain operating system type functions
-" (like reading the contents of a file), which are not available in vim. For
-" example, in Vim, its not possible to read the contents of a file without
-" opening a buffer on it, which means that over time, lots of buffers can open
-" up needlessly.
-"
-" If python is available (and allowed), then these functions utilize python
-" library functions without making calls to external programs.
-" ==============================================================================
-" Tex_GotoTempFile: open a temp file. reuse from next time on {{{
-function! Tex_GotoTempFile()
- if !exists('s:tempFileName')
- let s:tempFileName = tempname()
- endif
- exec 'silent! split '.s:tempFileName
-endfunction " }}}
-" Tex_IsPresentInFile: finds if a string str, is present in filename {{{
-if has('python') && g:Tex_UsePython
- function! Tex_IsPresentInFile(regexp, filename)
- exec 'python isPresentInFile(r"'.a:regexp.'", r"'.a:filename.'")'
-
- return retval
- endfunction
-else
- function! Tex_IsPresentInFile(regexp, filename)
- call Tex_GotoTempFile()
-
- silent! 1,$ d _
- let _report = &report
- let _sc = &sc
- set report=9999999 nosc
- exec 'silent! 0r! '.g:Tex_CatCmd.' '.a:filename
- set nomod
- let &report = _report
- let &sc = _sc
-
- if search(a:regexp, 'w')
- let retval = 1
- else
- let retval = 0
- endif
- silent! bd
- return retval
- endfunction
-endif " }}}
-" Tex_CatFile: returns the contents of a file in a <NL> seperated string {{{
-if has('*readfile')
- function! Tex_CatFile(filename)
- return join(readfile(filename), "\n")
- endfunction
-elseif has('python') && g:Tex_UsePython
- function! Tex_CatFile(filename)
- " catFile assigns a value to retval
- exec 'python catFile("'.a:filename.'")'
-
- return retval
- endfunction
-else
- function! Tex_CatFile(filename)
- if glob(a:filename) == ''
- return ''
- endif
-
- call Tex_GotoTempFile()
-
- silent! 1,$ d _
-
- let _report = &report
- let _sc = &sc
- set report=9999999 nosc
- exec 'silent! 0r! '.g:Tex_CatCmd.' '.a:filename
-
- set nomod
- let _a = @a
- silent! normal! ggVG"ay
- let retval = @a
- let @a = _a
-
- silent! bd
- let &report = _report
- let &sc = _sc
- return retval
- endfunction
-endif
-" }}}
-" Tex_DeleteFile: removes a file if present {{{
-" Description:
-if has('python') && g:Tex_UsePython
- function! Tex_DeleteFile(filename)
- exec 'python deleteFile(r"'.a:filename.'")'
-
- if exists('retval')
- return retval
- endif
- endfunction
-else
- function! Tex_DeleteFile(filename)
- if filereadable(a:filename)
- exec '! '.g:Tex_RmCmd.' '.a:filename
- endif
- endfunction
-endif
-" }}}
-
-
-let &cpo = s:save_cpo
-
-" Define the functions in python if available.
-if !has('python') || !g:Tex_UsePython
- finish
-endif
-
-exec 'pyfile '.expand('<sfile>:p:h').'/pytools.py'
-
-" vim:fdm=marker:ff=unix:noet:ts=4:sw=4:nowrap