" Vimball Archiver by Charles E. Campbell, Jr., Ph.D.
UseVimball
finish
doc/tComment.txt	[[[1
208
*tComment.txt*  tComment -- An easily extensible & universal comment plugin

Author: Thomas Link, micathom AT gmail com?subject=vim

tComment provides easy to use, file-type sensible comments for Vim. It 
can handle embedded syntax.


                                                    *tComment-Installation*
Installation~
Edit the vba file and type:

    :so %

See :help vimball for details. If you use vim 7.0, you may need to 
update your vimball installation first.


                                                    *tComment-Usage*
Usage~
TComment works like a toggle, i.e., it will comment out text that 
contains uncommented lines, and it will remove comment markup for 
already commented text (i.e. text that contains no uncommented lines).

If the file-type is properly defined, TComment will figure out which 
comment string to use. Otherwise you use |TCommentDefineType()| to 
override the default choice.

TComment can properly handle an embedded syntax, e.g., ruby/python/perl 
regions in vim scripts, HTML or JavaScript in php code etc.


                                                    *tComment-Key-Bindings*
Key bindings~

Most of the time the default toggle keys will do what you want (or to be 
more precise: what I think you want it to do ;-).

                                                    *g:tcommentMapLeaderOp1*
                                                    *g:tcommentMapLeaderOp2*
As operator (the prefix can be customized via g:tcommentMapLeaderOp1 
and g:tcommentMapLeaderOp2):

    gc{motion}   :: Toggle comments (for small comments within one line 
                    the &filetype_inline style will be used, if 
                    defined)
    gcc          :: Toggle comment for the current line
    gC{motion}   :: Comment region
    gCc          :: Comment the current line

                                                    *g:tcommentOpModeExtra*
By default the cursor stays put. If you want the cursor to the end of 
the commented text, set g:tcommentOpModeExtra to '>' (but this may not 
work properly with exclusive motions).

Primary key maps:

    <c-_><c-_>   :: :TComment
    <c-_><space> :: :TComment <QUERY COMMENT-BEGIN ?COMMENT-END>
    <c-_>b       :: :TCommentBlock
    <c-_>a       :: :TCommentAs <QUERY COMMENT TYPE>
    <c-_>n       :: :TCommentAs &filetype <QUERY COUNT>
    <c-_>s       :: :TCommentAs &filetype_<QUERY COMMENT SUBTYPE>
    <c-_>i       :: :TCommentInline
    <c-_>r       :: :TCommentRight
    <c-_>p       :: Comment the current inner paragraph

A secondary set of key maps is defined for normal mode.

    <Leader>__       :: :TComment
    <Leader>_p       :: Comment the current inner paragraph
    <Leader>_<space> :: :TComment <QUERY COMMENT-BEGIN ?COMMENT-END>
    <Leader>_i       :: :TCommentInline
    <Leader>_r       :: :TCommentRight
    <Leader>_b       :: :TCommentBlock
    <Leader>_a       :: :TCommentAs <QUERY COMMENT TYPE>
    <Leader>_n       :: :TCommentAs &filetype <QUERY COUNT>
    <Leader>_s       :: :TCommentAs &filetype_<QUERY COMMENT SUBTYPE>

Keymaps are configurable via the following variables:

                                                    *g:tcommentMapLeader1*
g:tcommentMapLeader1    string (default: <c-_>)
        Prefix for the keymaps. Set to '' to disable keymaps with this 
        prefix.
                                                    *g:tcommentMapLeader2*
g:tcommentMapLeader2    string (default: <Leader>_)
        Secondary prefix. (The reason for why there are two prefixes is 
        that <c-_> appears preferable with gvim but can be difficult to 
        type on the terminal. The secondary prefix isn't used for insert 
        mode maps. Set to '' to disable keymaps with this prefix.

                                                    *tComment-commands*
Alternatively, you can type (? meaning "optional argument"):

                                                    *:TComment*
    :?<range> TComment ?commentBegin ?commentEnd
    :?<range> TComment! ?commentBegin ?commentEnd
    NOTE: If there is a visual selection that begins and ends in the same 
    line, then TCommentInline is used instead.

    NOTE: The range is optional and defaults to the current line.

                                                    *:TCommentInline*
    :?<range> TCommentInline ?commentBegin ?commentEnd
    :?<range> TCommentInline! ?commentBegin ?commentEnd
    Use the {&ft}_inline comment style.

                                                    *:TCommentBlock*
    :?<range> TCommentBlock ?commentBegin ?commentEnd
    :?<range> TCommentBlock! ?commentBegin ?commentEnd
    Comment as "block", e.g. use the {&ft}_block comment style.
    NOTE: This command is kind of crude. It doesn't indent or reformat 
    the text.

                                                    *:TCommentAs*
    :?<range> TCommentAs filetype
    :?<range> TCommentAs! filetype
    NOTE: TCommentAs requires g:tcomment_{filetype} to be defined.
    NOTE: This command supports command line completion. See 'wildmode' 
    and 'wildmenu' for how to get the most out of it.

                                                    *:TCommentRight*
    :?<range> TCommentRight
    :?<range> TCommentRight!
    NOTE: This command comments out the text to the right of the cursor. 
    If a visual selection was made (be it block-wise or not), all lines 
    are commented out at from the current cursor position downwards.

    The bang (!) variants always comment out the selected text and don't 
    work as toggles.

                                                    *TCommentDefineType()*
    Using this command you can also use different comment styles with 
    the TCommentDefineType(name, commentstring) function. This function 
    takes two arguments:
        name :: The name is either &filetype or {&filetype}_{style}. 
            I.e., For block comments the {&filetype}_block and for 
            inline comments the {&filetype}_inline styles are used.
        comment string :: a string mostly as described in 
            'commentstring'.
    
    If you want to define, e.g., a fancy block comment style for html 
    you put something like this into ~/.vim/after/plugin/tComment.vim:>

        call TCommentDefineType("html_fancy_block", "<!--%s  -->\n  -- ")

<   The part after the newline character is used for marking "middle" 
    lines.

    This comment style could then be accessed via (this command has 
    command line completion): >

        '<,'>TCommentAs html_fancy_block

<   If you're editing a html file, this could best be done by the <c-_>s     
    key map.


Goals~
- Maintain indentation of selected text; the comment markers are left 
  aligned but the text on the right (i.e., the comment) is indented 
  like the original text

- Handle embedded syntax like php+html or html+javaScript+css; you 
  have to set g:tcommentGuessFileType_{&filetype} to 1 or to the 
  fall-back file-type in order to activate this feature for other file 
  types than php or html
  
  tComment deduces the correct file type from the syntax name, similar 
  to the way EnhancedCommentify.vim does it. In opposition to 
  EnhancedCommentify.vim, it matches the syntax name against a list the 
  known file types, so that it can deal with, e.g., embedded javaScript

- Easy to customize/adapt for an yet unknown syntax by setting buffer 
  local variables (b:commentStart, b:commentEnd, or b:commentstring), 
  global variables (g:tcomment_{&ft} and g:tcomment_{&ft}_block), or the 
  buffer local &commentstring option (which can be set on a vim 
  |modeline|)

- Use 'commentstring' or 'comments' as a fallback (i.e., if a file-type 
  is properly defined, TComment will automatically support it)

- Same short-cut for commenting text and for removing comment markup

- The decision whether text should be commented or uncommented is made 
  on the basis of the whole selection (not line by line); comments in 
  code that should be commented aren't uncommented as it is the case 
  with some other plug-ins

As of version 1.5, the following file types are explicitly defined 
(other file-types are most likely supported through the 'commentstring' 
or 'comments' variables):

    ada, apache, autoit, catalog, cpp, css, c, cfg, conf, desktop, 
    docbk, dosbatch, dosini, dsl, dylan, eiffel, gtkrc, haskell, html, 
    io, javaScript, java, lisp, m4, nroff, objc, ocaml, pascal, perl, 
    php, prolog, ruby, r, scheme, sgml, sh, sql, spec, sps, tcl, tex, 
    tpl, viki, vim, websec, xml, xslt, yaml


Credits~
The way we check for embedded syntax was originally adapted 
from/inspired by Meikel Brandmeyer's EnhancedCommentify.vim
(vimscript #23) but has evolved since.


vim: tw=72
plugin/tComment.vim	[[[1
376
" tComment.vim -- An easily extensible & universal comment plugin 
" @Author:      Thomas Link (micathom AT gmail com)
" @License:     GPL (see http://www.gnu.org/licenses/gpl.txt)
" @Created:     27-Dez-2004.
" @Last Change: 2008-05-01.
" @Revision:    1.8.654
" 
" GetLatestVimScripts: 1173 1 tComment.vim

if &cp || exists('loaded_tcomment')
    finish
endif
let loaded_tcomment = 108

" If true, comment blank lines too
if !exists("g:tcommentBlankLines")
    let g:tcommentBlankLines = 1
endif

if !exists("g:tcommentMapLeader1")
    let g:tcommentMapLeader1 = '<c-_>'
endif
if !exists("g:tcommentMapLeader2")
    let g:tcommentMapLeader2 = '<Leader>_'
endif
if !exists("g:tcommentMapLeaderOp1")
    let g:tcommentMapLeaderOp1 = 'gc'
endif
if !exists("g:tcommentMapLeaderOp2")
    let g:tcommentMapLeaderOp2 = 'gC'
endif
if !exists("g:tcommentOpModeExtra")
    let g:tcommentOpModeExtra = ''
endif

" Guess the file type based on syntax names always or for some fileformat only
if !exists("g:tcommentGuessFileType")
    let g:tcommentGuessFileType = 0
endif
" In php documents, the php part is usually marked as phpRegion. We thus 
" assume that the buffers default comment style isn't php but html
if !exists("g:tcommentGuessFileType_dsl")
    let g:tcommentGuessFileType_dsl = 'xml'
endif
if !exists("g:tcommentGuessFileType_php")
    let g:tcommentGuessFileType_php = 'html'
endif
if !exists("g:tcommentGuessFileType_html")
    let g:tcommentGuessFileType_html = 1
endif
if !exists("g:tcommentGuessFileType_tskeleton")
    let g:tcommentGuessFileType_tskeleton = 1
endif
if !exists("g:tcommentGuessFileType_vim")
    let g:tcommentGuessFileType_vim = 1
endif

if !exists("g:tcommentIgnoreTypes_php")
    let g:tcommentIgnoreTypes_php = 'sql'
endif

if !exists('g:tcommentSyntaxMap') "{{{2
    let g:tcommentSyntaxMap = {
            \ 'vimMzSchemeRegion': 'scheme',
            \ 'vimPerlRegion':     'perl',
            \ 'vimPythonRegion':   'python',
            \ 'vimRubyRegion':     'ruby',
            \ 'vimTclRegion':      'tcl',
            \ }
endif

" If you don't define these variables, TComment will use &commentstring 
" instead. We override the default values here in order to have a blank after 
" the comment marker. Block comments work only if we explicitly define the 
" markup.
" The format for block comments is similar to normal commentstrings with the 
" exception that the format strings for blocks can contain a second line that 
" defines how "middle lines" (see :h format-comments) should be displayed.

" I personally find this style rather irritating but here is an alternative 
" definition that does this left-handed bar thing
if !exists("g:tcommentBlockC")
    let g:tcommentBlockC = "/*%s */\n * "
endif
if !exists("g:tcommentBlockC2")
    let g:tcommentBlockC2 = "/**%s */\n * "
endif
if !exists("g:tcommentInlineC")
    let g:tcommentInlineC = "/* %s */"
endif

if !exists("g:tcommentBlockXML")
    let g:tcommentBlockXML = "<!--%s-->\n  "
endif
if !exists("g:tcommentInlineXML")
    let g:tcommentInlineXML = "<!-- %s -->"
endif

let g:tcommentFileTypesDirty = 1

" Currently this function just sets a variable
function! TCommentDefineType(name, commentstring)
    if !exists('g:tcomment_'. a:name)
        let g:tcomment_{a:name} = a:commentstring
    endif
    let g:tcommentFileTypesDirty = 1
endf

function! TCommentTypeExists(name)
    return exists('g:tcomment_'. a:name)
endf

call TCommentDefineType('aap',              '# %s'             )
call TCommentDefineType('ada',              '-- %s'            )
call TCommentDefineType('apache',           '# %s'             )
call TCommentDefineType('autoit',           '; %s'             )
call TCommentDefineType('asm',              '; %s'             )
call TCommentDefineType('awk',              '# %s'             )
call TCommentDefineType('catalog',          '-- %s --'         )
call TCommentDefineType('catalog_block',    "--%s--\n  "       )
call TCommentDefineType('cpp',              '// %s'            )
call TCommentDefineType('cpp_inline',       g:tcommentInlineC  )
call TCommentDefineType('cpp_block',        g:tcommentBlockC   )
call TCommentDefineType('css',              '/* %s */'         )
call TCommentDefineType('css_inline',       g:tcommentInlineC  )
call TCommentDefineType('css_block',        g:tcommentBlockC   )
call TCommentDefineType('c',                '/* %s */'         )
call TCommentDefineType('c_inline',         g:tcommentInlineC  )
call TCommentDefineType('c_block',          g:tcommentBlockC   )
call TCommentDefineType('cfg',              '# %s'             )
call TCommentDefineType('conf',             '# %s'             )
call TCommentDefineType('desktop',          '# %s'             )
call TCommentDefineType('docbk',            '<!-- %s -->'      )
call TCommentDefineType('docbk_inline',     g:tcommentInlineXML)
call TCommentDefineType('docbk_block',      g:tcommentBlockXML )
call TCommentDefineType('dosbatch',         'rem %s'           )
call TCommentDefineType('dosini',           '; %s'             )
call TCommentDefineType('dsl',              '; %s'             )
call TCommentDefineType('dylan',            '// %s'            )
call TCommentDefineType('eiffel',           '-- %s'            )
call TCommentDefineType('eruby',            '<%%# %s%%>'       )
call TCommentDefineType('gtkrc',            '# %s'             )
call TCommentDefineType('gitcommit',        '# %s'             )
call TCommentDefineType('haskell',          '-- %s'            )
call TCommentDefineType('haskell_block',    "{-%s-}\n   "      )
call TCommentDefineType('haskell_inline',   '{- %s -}'         )
call TCommentDefineType('html',             '<!-- %s -->'      )
call TCommentDefineType('html_inline',      g:tcommentInlineXML)
call TCommentDefineType('html_block',       g:tcommentBlockXML )
call TCommentDefineType('io',               '// %s'            )
call TCommentDefineType('javaScript',       '// %s'            )
call TCommentDefineType('javaScript_inline', g:tcommentInlineC )
call TCommentDefineType('javaScript_block', g:tcommentBlockC   )
call TCommentDefineType('javascript',       '// %s'            )
call TCommentDefineType('javascript_inline', g:tcommentInlineC )
call TCommentDefineType('javascript_block', g:tcommentBlockC   )
call TCommentDefineType('java',             '/* %s */'         )
call TCommentDefineType('java_inline',      g:tcommentInlineC  )
call TCommentDefineType('java_block',       g:tcommentBlockC   )
call TCommentDefineType('java_doc_block',   g:tcommentBlockC2  )
call TCommentDefineType('lisp',             '; %s'             )
call TCommentDefineType('m4',               'dnl %s'           )
call TCommentDefineType('mail',             '> %s'             )
call TCommentDefineType('msidl',            '// %s'            )
call TCommentDefineType('msidl_block',      g:tcommentBlockC   )
call TCommentDefineType('nroff',            '.\\" %s'          )
call TCommentDefineType('nsis',             '# %s'             )
call TCommentDefineType('objc',             '/* %s */'         )
call TCommentDefineType('objc_inline',      g:tcommentInlineC  )
call TCommentDefineType('objc_block',       g:tcommentBlockC   )
call TCommentDefineType('ocaml',            '(* %s *)'         )
call TCommentDefineType('ocaml_inline',     '(* %s *)'         )
call TCommentDefineType('ocaml_block',      "(*%s*)\n   "      )
call TCommentDefineType('pascal',           '(* %s *)'         )
call TCommentDefineType('pascal_inline',    '(* %s *)'         )
call TCommentDefineType('pascal_block',     "(*%s*)\n   "      )
call TCommentDefineType('perl',             '# %s'             )
call TCommentDefineType('perl_block',       "=cut%s=cut"       )
call TCommentDefineType('php',              '// %s'            )
call TCommentDefineType('php_inline',       g:tcommentInlineC  )
call TCommentDefineType('php_block',        g:tcommentBlockC   )
call TCommentDefineType('php_2_block',      g:tcommentBlockC2  )
call TCommentDefineType('po',               '# %s'             )
call TCommentDefineType('prolog',           '%% %s'            )
call TCommentDefineType('rc',               '// %s'            )
call TCommentDefineType('readline',         '# %s'             )
call TCommentDefineType('ruby',             '# %s'             )
call TCommentDefineType('ruby_3',           '### %s'           )
call TCommentDefineType('ruby_block',       "=begin rdoc%s=end")
call TCommentDefineType('ruby_nodoc_block', "=begin%s=end"     )
call TCommentDefineType('r',                '# %s'             )
call TCommentDefineType('sbs',              "' %s"             )
call TCommentDefineType('scheme',           '; %s'             )
call TCommentDefineType('sed',              '# %s'             )
call TCommentDefineType('sgml',             '<!-- %s -->'      )
call TCommentDefineType('sgml_inline',      g:tcommentInlineXML)
call TCommentDefineType('sgml_block',       g:tcommentBlockXML )
call TCommentDefineType('sh',               '# %s'             )
call TCommentDefineType('sql',              '-- %s'            )
call TCommentDefineType('spec',             '# %s'             )
call TCommentDefineType('sps',              '* %s.'            )
call TCommentDefineType('sps_block',        "* %s."            )
call TCommentDefineType('spss',             '* %s.'            )
call TCommentDefineType('spss_block',       "* %s."            )
call TCommentDefineType('tcl',              '# %s'             )
call TCommentDefineType('tex',              '%% %s'            )
call TCommentDefineType('tpl',              '<!-- %s -->'      )
call TCommentDefineType('viki',             '%% %s'            )
call TCommentDefineType('viki_3',           '%%%%%% %s'        )
call TCommentDefineType('viki_inline',      '{cmt: %s}'        )
call TCommentDefineType('vim',              '" %s'             )
call TCommentDefineType('vim_3',            '""" %s'           )
call TCommentDefineType('websec',           '# %s'             )
call TCommentDefineType('xml',              '<!-- %s -->'      )
call TCommentDefineType('xml_inline',       g:tcommentInlineXML)
call TCommentDefineType('xml_block',        g:tcommentBlockXML )
call TCommentDefineType('xs',               '// %s'            )
call TCommentDefineType('xs_block',         g:tcommentBlockC   )
call TCommentDefineType('xslt',             '<!-- %s -->'      )
call TCommentDefineType('xslt_inline',      g:tcommentInlineXML)
call TCommentDefineType('xslt_block',       g:tcommentBlockXML )
call TCommentDefineType('yaml',             '# %s'             )


" :line1,line2 TCommentAs commenttype
command! -bang -complete=customlist,tcomment#FileTypes -range -nargs=+ TCommentAs 
            \ call tcomment#CommentAs(<line1>, <line2>, "<bang>", <f-args>)

" :line1,line2 TComment ?commentBegin ?commentEnd
command! -bang -range -nargs=* TComment keepjumps call tcomment#Comment(<line1>, <line2>, 'G', "<bang>", <f-args>)

" :line1,line2 TCommentRight ?commentBegin ?commentEnd
command! -bang -range -nargs=* TCommentRight keepjumps call tcomment#Comment(<line1>, <line2>, 'R', "<bang>", <f-args>)

" :line1,line2 TCommentBlock ?commentBegin ?commentEnd
command! -bang -range -nargs=* TCommentBlock keepjumps call tcomment#Comment(<line1>, <line2>, 'B', "<bang>", <f-args>)

" :line1,line2 TCommentInline ?commentBegin ?commentEnd
command! -bang -range -nargs=* TCommentInline keepjumps call tcomment#Comment(<line1>, <line2>, 'I', "<bang>", <f-args>)

" :line1,line2 TCommentMaybeInline ?commentBegin ?commentEnd
command! -bang -range -nargs=* TCommentMaybeInline keepjumps call tcomment#Comment(<line1>, <line2>, 'i', "<bang>", <f-args>)


if (g:tcommentMapLeader1 != '')
    exec 'noremap <silent> '. g:tcommentMapLeader1 .'<c-_> :TComment<cr>'
    exec 'vnoremap <silent> '. g:tcommentMapLeader1 .'<c-_> :TCommentMaybeInline<cr>'
    exec 'inoremap <silent> '. g:tcommentMapLeader1 .'<c-_> <c-o>:TComment<cr>'
    exec 'noremap <silent> '. g:tcommentMapLeader1 .'p m`vip:TComment<cr>``'
    exec 'inoremap <silent> '. g:tcommentMapLeader1 .'p <c-o>:norm! m`vip<cr>:TComment<cr><c-o>``'
    exec 'noremap '. g:tcommentMapLeader1 .'<space> :TComment '
    exec 'inoremap '. g:tcommentMapLeader1 .'<space> <c-o>:TComment '
    exec 'inoremap <silent> '. g:tcommentMapLeader1 .'r <c-o>:TCommentRight<cr>'
    exec 'noremap <silent> '. g:tcommentMapLeader1 .'r :TCommentRight<cr>'
    exec 'vnoremap <silent> '. g:tcommentMapLeader1 .'i :TCommentInline<cr>'
    exec 'vnoremap <silent> '. g:tcommentMapLeader1 .'r :TCommentRight<cr>'
    exec 'noremap '. g:tcommentMapLeader1 .'b :TCommentBlock<cr>'
    exec 'inoremap '. g:tcommentMapLeader1 .'b <c-o>:TCommentBlock<cr>'
    exec 'noremap '. g:tcommentMapLeader1 .'a :TCommentAs '
    exec 'inoremap '. g:tcommentMapLeader1 .'a'b <c-o>:TCommentMapMapLeader1 .'a :TCommentAs '
    exec 'inorwAType('x', }\1mentRommentAs '
    exec 'inoremap '. g:tcommentMapLender1 .'a'b <c-o>:T'x', }\1mentRommentAs '
   exec 'inoremap '. g:tcommentMapLes 'inorwAType('x', }\1mentR_mmentAs '
    exec 'inoremap '. g:tcommentMapLesder1 .'a'b <c-o>:T'x', }\1mentR<Leader>_'
e(    let g:tcommentMapLeader1 != '')
    exec 'noremap <silent> '. g:tcommentM2pLe_ .'<c-_> :TComment<cr>'
    exec 'vnoremap <silent> '. g:tcommentM2pLe_ .'<c-_> :TCommentMaybeInline<cr>'
   exec 'vnoremap <silent> '. g:tcommentM2pLeSee p_> <c-o>:TComment<cr>'
    exec 'silent> '. g:tcommentM2pLeader1 .'<space> :TComment '
    exec 'vnoremap <silent> '. g:tcommentM2pLeader1 .'i :TCommentInline<cr>'
   exec 'vnoremap <silent> '. g:tcommentM2pLeader1 .'r :TCommentRight<cr>'
    exec 'vnoremap <silent> '. g:tcommentM2pLeader1 .'r :TCommentRight<cr>'
    exec 'noremap '. g:tcommentM2pLeader1 .'b :TCommentBlock<cr>'
    exec 'noremap '. g:tcommentM2pLeader1 .'a :TCommentAs '
    exec 'noremap '. g:tcommentM2pLec 'inorwAType('x', }\1mentRommentAs '
    exec 'noremap '. g:tcommentM2pLes 'inorwAType('x', }\1mentR_mmader>_'
e(    let g:tcommentMapLeLeader1 != '')
    exec 'noremap <silent> '. g:tcommentMapLe.'rgset wnt> '. g:Polankgetpos(".") \|h can p1
en=ps call tOp2*
As entRg@'1 != '')
    exec 'noremap <silent> '. g:tcommentMapLe.'crgset wnt> '. g:Polankgetpos(".") \|h can p1
en=ps call tOp2*
As LmmentIng@$ight<cr>'
    exec 'vnoremap <silent> '. g:tcommentMapLe.'rg'<c-_> :TCommentMaybeInline<cr>'
  v  exec 'noremap <silent> '. g:tcommentMapLe.'crg'<c-_> :TCommentMaybeInliader> _'
e(    let g:tcommentMap2eLeader1 != '')
    exec 'noremap <silent> '. g:tcommentMap2e.'rgset wnt> '. g:Polankgetpos(".") \|h can p1
en=ps call tOp2*
As AnywayentRg@'1 != '')
    exec 'noremap <silent> '. g:tcommentMap2e.'crgset wnt> '. g:Polankgetpos(".") \|h can p1
en=ps call tOp2*
As LmmeAnywayentRg@$ight<cr>'
    exec 'vnoremap <silent> '. g:tcommentMap2e.'rg'<c-_> :TCommentMaybeInline<cr>'
  v  exec 'noremap <silent> '. g:tcommentMap2e.'crg'<c-_> :TCommentMaybeInliader> _eVimball

-----------------------------------------------------------------------
HisAs y

0.1
- I 
" ad itlease

0.2
- Fixedd aren't ummentf non-left 
  me} = a:
- imCommes commande format for block c(strines how "middd lineintain ind)
- u)*
  nargs=* TComme forllowing filinitionf yorder mat for block ccxt)
"s 
)*
 ow "mid me} = a:
- it wildith 
    the Asmarker. Bl lin(inorwAType(Comment pitntly this lefty)
- it wildi    let g:tetCMS
- verride the kdings*
Key order slCommly newband

1.3
- slCommly imCommes recog 
" deftf eck for embedde
- if nope(name, commekey maps is inpreciell Away, recon coucts witle ty
&me} = a:
- Th 
    the ...r. Bl li conworder ma followine comitionf yoact    work as 
itatariants always comment out the selec
- fixeddComblemtstrin normal commentcks can irriackslashe:
- cnd
    Com   If amat fo(a, ths-cut for commentihe text to the rightmcan 
mmente right ( via (this ude. It ommentss of th"middditat   type ontihe text
 to the right of th)
- en' to mthei     vimbas 
   mmmentAs! :
- afor ey if we  commande for
  with somllowing filIOTE:ike t

1.4
- FixeddComblemts couill use &commen syninvlefin(blocklua)
- neType('peinspKyosuk 
 akayama.
-  by themt <c may 'inorwAType('x', }\1mentR

1.5
- "entMay"m   If ar block c(usit matc    the &filetype_inlinr> _avail' to; ude. It  way wines).

If he fiactuutomaticallythat domand is 
 format-c;tml
  
  tca It  = 1

" CuCommen e {&ft}_inline commestle ty
&me} = a:s alill use &commen(yed.

" I perhard An ll A", e.g.mc;tide the 
mt :YPE>
   orYPE>
 I
- I m   If a    :wines).
e whole sederns
e ll alommentedned for norprefiout the ;wines).
e whole secead.snts woa the pis  within , e {&ft} norp
 finut the 
- FixeddComblemtstrin"midddcks can irr^M orY^@ newline cs.
- It' contlobanr neen be se
- EkXML )
call Colt thcomment#F() a blanktive 
re ednew

If he ficces       *TCommentDefi
- D '' tos evo ow ader1 mt <mmen
- Rent_'ds       *V  If marker
- <range> TComme- FIX:   Igo:TCx' inpntOpMcml
  
  sPhe () (  tyk defaFredrik Acosta)

1.6
- Icommegml,ts cougcomm*
    e
        commentaScript
If s;tml
  
  t
you piyntachoosit matcwror removing commentbeca", e.g. ", entatl,tased on
aracter tontloosily iScript
If s;ti  
    If you emoving eck for eml,t
s in 
    you 
  ", einorwATypeeline|)eInline keinr. Bl li .

Goapight
   & <L <Le
  e p_> <c-o>:TCom

Goadey set of kaps are configuraemap '. g:tcommentMaphis Leader2*
g:tcommentMa

1.7

G):

    gc{ lineent> '. g:tcommentMapLntstring) sommentemoving default
Op2*
As op rightyou put somethigcl...rComme,a strinc;tine
    gC{ line
p1 
and g:tcommentMapLeTCommennain ihis lelytemoving dt 
    th--nargs=+ TCoon 
  anrange is ontain akes two operatemoving l llli
- New
"nne tp    NOTE: TCo either &f[ <QUE]
- Daps is hom AT g 
  s/ciin indeeli    let g:tcommentS:Goapiased on synta
  mentAs! :e format the  stylemixeddased ongroup comitionf yovim, es).

If he fEck for ased onneTypen(block 
      \ 'vimRub,gure oude that should be coms prolembedded ectiCom  ty
mbedde)e- FIX: Cline); comm  t*'vimRuh--nargs=+   name", entadt 
 e fiaes two o23) slCommly newbandn(yG -> i, 
new: >)

1.8
- Daps e expmmentAsm  t7

GSif g dt 
commentke thneTydif
 & commen.eli  nargs=+ comment#Fif thee=cu
- Fixedd
  wia fancy block cormmen
- Re wildietOpMnuousfter the ent
  wia fancy block .

Goap:e for   for norp(  tyk dKrzysztntaGoj)

neTydif
2
plugin/tComment.v550k afc173 1 tCommplugin 
" @Author:      Thomasom to:s Link, micathom AT gmail com?[Com]/gpl.Websit @LicenPL (see httCom/www.account/Com
If .rip?", r_id=4037ail com)
" @License:     GPL (see http://www.gnu.org/licenses/gpl.txt)
" @Create007-09-17Dez-2004.
" @Last Cha7-12-2708-05-01.
" @Revis0.0.33ment.vim

if &cp ||"dif
let loaded__neTydif
"comment')
    finish
endif
let loaded__neTydif
pesDir 1
endf

fus:Dde theVefau(ange ir1 != '')
  h
encommetstring.'r= &commetstrin1 != '')
  s
encommetstring.'&'1 != '')
  h
enide the = &commetstrin1 != '')
  h
en&commetstring.'r= commetstrin1 != me)
   ide the a:nameh
ens:ide theCline); cccccc=us:Dde theVefau(ng' 
or 'c)eh
ens:ide theCline);Somment=us:Dde theVefau(ng' 
or 'commen)eh
ens:nullCline);Sommentccc=u'%s'
k afc173 1 tcomment#s>)

"n"mid2,entBegin omme,entBegin Anyway,beInline ?comm,entBegin ?co/gpltBegin omme:
  "*G ...rgcomm
  "*B ...rl_fanc  "*I ...re {&ftc  "*R ...r to t 1
endf

fufc173 1 tcomment#beg,ring, ...r1 != " syou 
u want thet. In op   endif
coc=ucol('.'lineXML")
lic=u{&ft('.'lineXML")
s:t. _ to nkgetpos("'>nlineXML")
tBegin ommeccc=ua:0 >esD ?ua:1 :<linineXML")
tBegin Anywayc=ua:0 >es2 ?u(a:2 ==u'!') :<0tstring)tBegin ommec=~#<lin a:name)
    tBegin ommec=atibstitute(tBegin omme,e'\Cine2{&ft("'<") ==u{&ft("'>nl ?u'I' :<lin,e'ger1 != 'ng
    enng)tBegin ommec=~#<lR'

iftBegin ommec=~#<lIn a:name)
    tscommc=ucol("'<") a:name)
ng)tscommc==<0tstria:name)
    tscommc=ucol('.'lineXM != 'ng
    en  enng)tBegin ommec=~#<lR'tstria:name)
    tBegin ommec=atibstitute(tBegin omme,e'\Cine2lin,e'ger1 != a:name)
    t to nk0tstria:naelse1 != a:name)
    t to nkcol("'>"lineXM != 'ng
    enelse1 != a:na    tscommc=u0
a:name)
    t to  c=u0
a:na'ng
    en" TLogVAR tBegin omme,etscomm, t to   en"  how to ces the me} = a:commentstr (i.:0 >es3 &&i.:3eLeade
a:name)
    tmst=us:Ens incommentPhe (.:3)g.'%s'
  en  enng).:0 >es4 &&i.:4eLeade
a:name)
me)
    tmst=utmst.us:Ens incommentPhe (.:4lineXM != 'ng
    enelse1 != a:na    [tms, tBegin omme]t=us:GeeCline);Sommen(.:beg,ra:ing, tBegin omme)ntstring
    endif
tms0t=us:markeGeeCline);Sommen(tms)   endif
tms0t=uescaDeftms0,e'\'r1 != " mn 
gureteder1 range is ;t ( via nfgnul comme  inline comatpmmentAsm
  wi1 != " ureteder1    endif
tmtCway w=atibstitute(tms0,e'\([	 ]\)n,e'\1\\?n,e'ger1 !=  af
   e(name, commekee thnontar oupatis a   endif
tmtCway w=at:SPommtF(tmtCway ,e'\(\_.\{-}\)nr1 != " s   tBegin ommec lineintaiSom   endif
[eintaiSom,d aren't u]t=us:      *TCo(.:beg,ra:ing, tmtCway ,etBegin omme,etscomm, t to)   en" TLogVAR eintaiSom,d aren't u   enng)tBegin Anyway1 != a:na     aren't uc=u0
a:na'ng
    en" go   enng)tBegin ommec=~#<lBe
a:name)
"inst If yaIf true, coommentBl:>

     s:      *marke(.:beg,ra:ing,  aren't u, tmtCway ,etms, eintaiSom)   enelse1 != a:na"inst If yns no uncomment1 != a:na"ifiis ontar oupatis ae for aren't umme
a:name)
    tmtCway w t=uescaDef'\V\^\(\s\{-}\)n. tmtCway w.'\$n,e'"/\er1 != a:na"ifiis opatis ae forren't umme
a:name)
    tmtReplr1 r=uescaDeftms0,e'"/er1 != a:naoremap '')
 .:begw.',comme to .'s/\V'.used, if 
            \at:ScommRx(tscomm)g. eintaiSomw.'\zs\(\.\{-}\)n. s:EndRx(t to)w.'/'.sed, if 
            \a'\=s:Proen be L&ft('.  aren't uc.',atibvim, (0), "n. tmtCway w.'", "n. tmtReplr1 r.'")/ge'
a:na'ng
    en" ret. In oppant th   en" TLogVAR tBegin omme   enng)tBegin ommec=~ExtrentBl:>

     setpos('.',at:t. _ to)   enelse1 != a:na"iTLogVAR li,etBentBl:>

     ant th(li,etB)ntstring
  a:name 1
endf

fufc173 1 tOp2*
As ( e f, ...rtaxMa3
me)
    tBegin ommec=aa:0 >esD ?ua:1 :<lnineXML")
ma fo=ua:0 >es2 ?ua:2 :<lnineXML")
sel_syou = &e whole sineXML")
&e whole snlinin with e"ineXML")
reg_syou = @@   en" L")
polankgetpos('.'lineXM"iTLogVAR a:As! filettry
  en  enng).: e fi==u''xsltsed, if 
    oremap '') "ned fo! '[V']"tstria:name)
    tBegin ommeLeadeG'tstria:naelseng).: e fi==u'e('xslsed, if 
    oremap '') "ned fo! `[\<C-V>`]"tstria:name)
    tBegin ommeLeadeI'tstria:naelse1 != a:name)
oremap '') "ned fo! `[v`]"tstria:name)
    tBegin ommeLeadein a:name)
'ng
    en  enng)empty(tBegin omme)ntstra:name)
    tBegin ommec=atBegin ommeL a:name)
'ng
    en  enL")
meg =u{&ft("'[". a:name)
     to nk{&ft("']". a:name)
p <c-o a:name)
    tBegin ommec.=
    let g:tcommentOpMentBl:>

     fc173 1 tcomment#beg,ring, tBegin omme,ema fcomment')lely a:name)
    &e whole snlisel_syou a:name)
    @@nlireg_syou   en  enng)    let g:tcommentOpMo!~ExtrentBl:>

neXM"iTLogVAR posentBl:>

neXM"i     setpos('.',apos)ntstra:name)
     setpos('.',awnt> '. g:Pol)ntstra:name)
un   !awnt> '. g:PolineXM != 'ng
    enendtry
a:name 1
endf

fufc173 1 tOp2*
As L&ft( e frtaxMa3
me)
     fc173 1 tOp2*
As (.: e fe2lin)
a:name 1
endf

fufc173 1 tOp2*
As Anyway( e frtaxMa3
me)
     fc173 1 tOp2*
As (.: e fe2ln,e'!n)
a:name 1
endf

fufc173 1 tOp2*
As LmmeAnyway( e frtaxMa3
me)
     fc173 1 tOp2*
As (.: e fe2lin,e'!n)
a:name "temoving dentinsnng)es, ng bo(i.eneTyificmmentAs! f1
endf

fufc173 1 tcommentAs#beg,ring, tBegin Anyway,bmentAs! , ...r1 !=     tcountc=aa:0 >esD ?ua:1 :<1   en" TLogVAR tcountntstr (i.:either &f=~Expe('pe$n a:name)
    tBegin ommec=alBe
a:name)
    ftw=atibstitute(.:either &,Expe('pe$ne2ln,e'')   enelse (i.:either &f=~Expe {&ft$n a:name)
    tBegin ommec=alIe
a:name)
    ftw=atibstitute(.:either &,Expe {&ft$ne2ln,e'')   enelse  a:name)
    tBegin ommec=alGe
a:name)
    ftw=a.:either &ntstring
    endif
[tms, tBegin omme]t=us:GeeCline);Sommen(.:beg,ra:ing, tBegin omme,bmtr1 !=     pg bw=atibstitute(tms,u'%s.*$ne2ln,e'')   en    pg bw=atibstitute(pg ,u'%%n,e'%n,e'ger1 != L")
poltw=atibstitute(tms,u'^.\{-}%sne2ln,e'')   en    poltw=atibstitute(polt,u'%%n,e'%n,e'ger1 != ng)tcountc> 1
a:name)
    pg _Typevim, e=cu(pg ,u'^\(\S\+\)\(.*\)$er1 != a:na"iTLogVAR pg _T   en  enng)!empty(get(pg _T, 1))ntstra:name)
    pg bw=areteat(pg _T[1],)tcount)g. pg _T[2] a:name)
'ng
    en  enL")
polt_Typevim, e=cu(polt,u'^\(\s*\)\(.\+\)$er1 != a:na"iTLogVAR polt_T   en  enng)!empty(get(polt_T, 2))ntstra:name)
    poltw=apolt_T[1]g. reteat(polt_T[2],)tcount)ineXM != 'ng
    enend
    eneInline keepjumps call tcomment#.:beg,ra:ing, tBegin omme,bname} = aAnyway,bpg ,upolt)
a:name "t----------------------------------------------------------------
"temlt thor no global vavim,  irr^ loaded__f1
endf

fufc173 1 tcolt thcomment#F()
  enng)    let g:tcommentFileTyineXM != yamlr =>o gls1 != a:naoremap    ineXM != yamlr END a:name)
        let g:comment#Fi=atif g( gls,e'\ner1 != a:naepjumeitis (    let g:comment#F,e'v:vs o=~E" loaded__"er1 != a:naepjummap(    let g:comment#F,e'vim, str(v:vs ,e''t#F,e'v:veXML")
s:t. _ t.   naepjummap(    lB)ntg:comment#F,e'vim, s)        let g:comment#Fi=atif g(Rxname{-}\)nlr1joing:comment#F,e'vim, str(\|'d, i$er1\u. s)$er?\)
    tBegin om:tcommentFileTypesDirty = 10  a:name 1
endf

all tcomment#.:bent#F()
  enng)  
"de the a list tifie format the  that sa comment_{&ft} as inpreciefufc173 1 tcolt thco()
  enng)ArgeTCo, Cm aren,CurrB)na:name)
u a:As! filetArgeTCo, a:Cm aren,Ca:CrrB)na:n
fc173 1 tcomment#begent#F()
  enng)    len omtf g( glcopyg:comment#F,e'vim, s)      bo(.'\xg:comment#F,e'vim, strf[ <QUE]
)name-1"iTLogVAR polt_T   &tstring
    efc173 1 tnsert (tm, strf[ <QUE]
)    enng)tBegin om(polt_etArgeTCo)yamlr END athe afor ey != a:name)
orema athe a  let gtvs o=~E" loaded_'e{-''.etArgeTCo'
  a:name 1
endf

us:Dde theVementPhe (.:4lineXMtring)
    i athe ae(.:either &,tring)er1 != n% != ng)tcendf

"ne);Sommen(.:beg,ra: tBegin omme,ema fcomme?[ <QUE]
=")
pus:Dde theVe;Sommen(.:beg,ra: tBegin omme,ema fcomme    tcountc=aftsD ?ua:1 :<lnineXML")
ma fo omftsame)
    tmst=us:Egin omme]t=us:GeeCline);Somstomlmmen(.:beg,ra:ft aAnyway,bpring
    en:na    tscommc=u0.us:E'
    tBegin ommec=alIe
a:namAnyway,bpring    enng)tBegin om(polt_dif
tms0tegin om(ists('g:commentstring)name)
    t to nk0ts.us:Ebcommentstring
    ee)
orema athe ae);Somstomlmmen(.:beg,ra:&Expe {&ft$Anyway,bpringntaiS)elseng).: e fi==(ists('g:commentsscomm'd,&& :commentsscommname)
me)
    tmst=utmst.us:EVementPhe (.:4lineXM:commentsscommd, i  enng).:0 >eegin om(ists('g:commentsEnd'd,&& :commentsEndname)
me)
    tmst=mst=utmst.us:Ens in' '.EVementPhe (.:4lineXM:commentsEndame)
    t to n  enL")
polt_rema athe ae);Somstomlmmen(.:beg,ra:&Expe {&ft$Anyway,bpringntaiS)elseng).: e fi==:tcommentGuessFileType =|| (xists('g:tcomment_uessFileType_v'.Ef[ <QUE]
)n            \a'\=s:Proe&& :tcommentGuessFileType_{&filetype} ted_'[^0]name)
    t to i==:tcommentGuessFileType {&filetype} te=)
    pg _Tmst=mst=utmsalF,e'vpe {&fe)
me)
    tmst=a:name)
oremap ''mst=utmsalF,e'vpe {&fe:tcommentGuessFileType {&filetype} me)
    t to n  enL")
polt_rema athe ae);essFileType :ing, tBegin omAnyway,bpringnt&Expe {&ft$AlF,e'vpe {)else1 != a:name)
oremap '' athe ae);Somstomlmmen(.:beg,ra:&Expe {&ft$Anyway,bpringnte);essFurrentlmmen(.:beg,ra:inyway,bpring
 'ng
    enend
    eneInline k athe agin omme]t=us:GeeCcendf

"ne)mtCway ,ormat-tring)er?alues h    t" != tring
 us:Dde theVemtCway ,tring)er    tcountc=a = 1
eeg_syou =&fe)
me)
 you =namAntring
    ethale)
    pg _Typevi=cu(polt(ne2lnr1 ! naepjummap( bo(:1 :ame)
    tscommc=uxnams[i + 1]me)
    tscommc=u=&ferincotrpneXMt, 0, iame)
    t to nk0tus:EVtrpneXMt, i + 2ame)
    t to i==xslsed%
me)
    tmst=mst=utms=&fer.d%
me)
    tmst=a:name)
oremap ''mst=s4 &&i.:4en            \a'\=s:PrutmsvnamAn{n}            \a'\=s:Prutms = 1n + 1            \a'\=a:name)
oremap ''mst=a'\=achoerr 'Malormad for at strings (ly imanyarguments:
  wi1 !d):rin1 !tring
    ee)
orema to n  enL")
polt_rema to i==xsls# 's'            \a'\=s:Prutms=&fer.v            \a'\=a:nai==xsls# 'S'            \a'\=s:Prutms=&fer.'"'.v.'"'            \a'\=a:name)
oremap ''mst=a'\=achoerr 'Malormad for at strings:rin1 !tring
    ee)
orema to n  enL")
polt_reman  enL")
polt_a:name)
oremap '' athe ar. 'ng
    enendtry
a:namwh
endf

us:Dde theVescomm)g.a:name)
 s4 &&pos(' :ame)
    t athe a'\^'y != a:name)
orema athe a'\%in1 !pos(.'c'  a:name 1
endf

us:Dde theVemed)g.a:name)
 s4 &&pos(' :ame)
    t athe a'\$'y != a:name)
orema athe a'\%in1 !pos(.'c'  a:name 1
endf

us:Dde theVe;SoI.'\zs\(\,ra:&ft} neintaime)
 you =a:name) !tr:nam> 0lninetr:nam- 1ng)tBegin athe ae(.:either VtrpneXMget. a:naline1) neintai,me{-}\)ss)$. _ s)$')   en    pendf

us:Dde theVeo(.:beg,ra: tBegin omm "n.Rxomme,etscomm, t to)   en" TLogVARyou mdrxname{-'.EVescomm)g.inyeintaiSo')ss)in1 !m "n.RxSo')ss)in1Vemed)g.0
lic=u{&ft('ne('.'li. a:nal tBame)
 s4 &&0
a:namame0eade
a0
a:n!e)
    t to  c=u('ne('.VtrpneXM&ft} n0,e
a0
a:n- 1
    endif
tms0t=us:c=u0
a:na'ng(('ne('~ mdrx
lic=u{&ftitline);SoI.'\zs\(\,ra:ing, tBegceintaime)
 you ie=cuw.'\zsnal tBame)
 utms =me) !t("'+ 1     thale)n <=Begin ng)    let g:li. a:nn)ted_'\S
me)
    tmst=utmsje=cuw.'\zsnname)
    t to i==je=< ieme)
    tmst=mst=utmsitline);SoI.'\zs\(\,ra:ntBegceintaime)
    tmst=mst=utmsie=cujlme)
    t to n  enL")
polt_remas4 &&0ec=~#<lBe
a:nameG'L")
polt_rema to i==!(:li. a:nn)ted_mdrx
lic=ue)
    tmst=mst=utmsc=u0
a:na'ng
    ee)
orema to n  enL")
polt_reman  enL")
polt_a  enL")
polt_Type = 1n + 1     namwh
remas4 &&0ec=~#<lBe
a:name)
    ftw=atibsa'ng@ yamlr END enng).: e fp '')
 .:begw.',':name)in1 !t(".'G1|v'.etnam.'G$"ty
me)
    tmst=utmsc=u0
a:na'ng(@tted_mdrx
lic=ue)
 :name)
    &e wh@nlireg_sa'ngtL")
polt_a   enng).:neInline k athe agt, c]t=us:    pendf

us:Dde theVeL&ft('.  aren', tmtCway ,mtch, dm "n.Rxomr")/ge'
    if !enal

If hed_'\S
=|| :tcommentBlankLines )yamlr END athe aal

If     endif
tms0t=us:l = 1 .:nal

If ame)
 s4 &&   enng)tBegins:Prutms=vtute(.:either &,mtch, d !m "n.Rx,e'ger2enelse  a:name)Begins:Prutms=vtuteemtCway ,a:r")/ge', al

If ame)
 n" ret. In oyou md= 1 .:nrv)n- mls:t. _ to nkgetpos("'>nlineXL")
s:t. _ to nkgetpos[2] + 1 .:nrv)me)
u a:As! fil&ft$md,aal

If     eutms=vtuts0,e'"/rv,e'g
)
s:t. _ to=vtute(.:either rv,e'gnn,e'g\gnn,e')name)
  athe arvpendf

us:Dde theVeo(.:begeg,ra: tBegin om, tmtCway ,e "n.Rxomr")/ge'om)   enelse1 != tibsa'ng@ yamlr enng).: e f)
 .:begw.',':name)in1 !t(".'G1|v'.etnam.'G$"td
    ftw=atibs.us:EVeline);SoMddd l\(\,ra:inr")/ge'
    itw=atibs.xtuts0,e'"/-}%sn\naepjummap( bo&&   enng)tBegins:Pr@nlireg_sa'nge(.:either @t,me{-}\)ss)in1 !m "n.RxSo')$n,e'geenelse  a:npjummap( bo.usame)
me)
    tmst=mst=utmssa'nge(.:either @t,me{-}nin1 !w.'\zs\(\.\s.x,e'gnnn1 !w.'\zs\(\= a:name)
    t to n  enL")
polt_remautmssa'nge(.:either @t,me^gnn,e'enelse  a:npjummap(utmssa'nge(.:either @t,me{n\s'')   en    pg bw != a:name)
    t to nkcolseGeeCline);Sommen(tms)   eninr")/ge'
    itw=a to nkcolseGe !w.'\zs\(\.\se(tms,u'^.\{ne2ln,'e2ln,'n1 !w.'\zs\(\= ase  a:npjummap( bo.usame)
me)
    tmst=mst=utmsmseGe !w.'\zs\(\.\smsme)
    tmst=mst=utmsmxeGe !w.'\zs\(\.\smxme)
    tmst=mst=utmssa'nge(.:either @t,me^'n1 !w.'\zs\(\= as= a:name)
    t to mst=utmssa'ngs inco(.:either @t,me{n'n1 !w.'\zs\(\= a{n'n1.x,e':name)
    t to n  enL")
polt_remautmssa'ngetmtCway ,ene2"\n".ssa'."\n" 'ng
    en  enng)tBegin)
 .:be:name)"tPely a:name)
    &e whole sa'ngtL")
pname 1
endf

 instired by Meikel Brandmeyer's EnhancedCommentify.vim
("fgnul   wi1 !entAsm
asyntax names alret)
ablemtsbyhe fiactuutomaames 
"ne);essFileType : tBegin omme,ema fcommeExpe {&ft$?fme)e:
-,e'vpe {)eus:Dde theVe;essFileType : tBegin omme,ema fcommeExpe {&ft$    tcouns4 &&i.:4e1eade
a1same)
    tmst=us:Egin omme]t=us:GeeCline);Somstomlmmen(.:beg,ra:
a1 aAnyway,bpring
    eountc> 1ms(' :)
me)
    tmst=utmst.us:EVe;essFurrentlmmen(.:beg,ra:inyway,bpring
'ng
    enelse1 != a:na    tscommc=u0ec=atibstituteeo(.:begbsti(Anyway,bpringntme 1
   tmst=utmst.us:EVe;essFurrentlmmen(.:beg,ra:0
    endif
tms0t=us: =me) !t("     thale)n <=Begin ng)    leutmsm =cuw.'\zsnna + 1          c=u(e'lineXM :na"iTLogVARthale)m=< lame)
    t to nkcoyntax Nmes =oyntIDattr(yntID:ntBmra:nntmamesse  a:npjummap(utmsf {&fon s ("'>nl(:tcommentS:Goapiase,oyntax Nmese  a:npjummap( bot(polt_f {&fon ame)
    t to mst= athe ae);Somstomlmmen(.:beg,ra:f {&fon t$Anyway,bpringntaiS)elseng).:a'\=a:nai==yntax Nmes =~