mercurial-crew-with-dirclash: comparison contrib/vim/hgcommand.vim

equal deleted inserted replaced

-:c9359142cba3
+:19436facb073
 " vim600: set foldmethod=marker:
 "
 " Vim plugin to assist in working with HG-controlled files.
 "
 " Last Change:   2006/02/22
-" Version:       1.76
+" Version:       1.77
 " Maintainer:    Mathieu Clabaut <mathieu.clabaut@gmail.com>
 " License:       This file is placed in the public domain.
 " Credits:
 "                Bob Hiestand <bob.hiestand@gmail.com> for the fabulous
 "                cvscommand.vim from which this script was directly created by
 "                means of sed commands and minor tweaks.
 """""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
 "
 " Section: Documentation
 "----------------------------
 "
 " Documentation should be available by ":help hgcommand" command, once the
 " script has been copied in you .vim/plugin directory.
 "
 " You still can read the documentation at the end of this file. Locate it by
 " searching the "hgcommand-contents" string (and set ft=help to have
 " appropriate syntaxic coloration).
 " Section: Plugin header {{{1
 " loaded_hgcommand is set to 1 when the initialization begins, and 2 when it
 " completes.  This allows various actions to only be taken by functions after
 if exists("loaded_hgcommand")
 finish
 endif
 let loaded_hgcommand = 1
+" store 'compatible' settings
+let s:save_cpo = &cpo
+set cpo&vim
+" run checks
+let s:script_name = expand("<sfile>:t:r")
+function! s:HGCleanupOnFailure(err)
+echohl WarningMsg
+echomsg s:script_name . ":" a:err "Plugin not loaded"
+echohl None
+let loaded_hgcommand = "no"
+unlet s:save_cpo s:script_name
+endfunction
 if v:version < 602
-echohl WarningMsg|echomsg "HGCommand 1.69 or later requires VIM 6.2 or later"|echohl None
+call <SID>HGCleanupOnFailure("VIM 6.2 or later required.")
 finish
 endif
+if !exists("*system")
+call <SID>HGCleanupOnFailure("builtin system() function required.")
+finish
+endif
+let s:script_version = "v0.2"
 " Section: Event group setup {{{1
 augroup HGCommand
 augroup END
 " Fully resolve the given file name to remove shortcuts or symbolic links.
 function! s:HGResolveLink(fileName)
 let resolved = resolve(a:fileName)
 if resolved != a:fileName
-let resolved = s:HGResolveLink(resolved)
+let resolved = <SID>HGResolveLink(resolved)
 endif
 return resolved
 endfunction
 " Function: s:HGChangeToCurrentFileDir() {{{2
 " Go to the directory in which the current HG-controlled file is located.
 " If this is a HG command buffer, first switch to the original file.
 function! s:HGChangeToCurrentFileDir(fileName)
 let oldCwd=getcwd()
-let fileName=s:HGResolveLink(a:fileName)
+let fileName=<SID>HGResolveLink(a:fileName)
 let newCwd=fnamemodify(fileName, ':h')
 if strlen(newCwd) > 0
 execute 'cd' escape(newCwd, ' ')
 endif
 return oldCwd
 endfunction
-" Function: s:HGGetOption(name, default) {{{2
+" Function: <SID>HGGetOption(name, default) {{{2
 " Grab a user-specified option to override the default provided.  Options are
 " searched in the window, buffer, then global spaces.
 function! s:HGGetOption(name, default)
 if exists("s:" . a:name . "Override")
 function! s:HGEditFile(name, origBuffNR)
 "Name parameter will be pasted into expression.
 let name = escape(a:name, ' *?\')
-let editCommand = s:HGGetOption('HGCommandEdit', 'edit')
+let editCommand = <SID>HGGetOption('HGCommandEdit', 'edit')
 if editCommand != 'edit'
-if s:HGGetOption('HGCommandSplit', 'horizontal') == 'horizontal'
+if <SID>HGGetOption('HGCommandSplit', 'horizontal') == 'horizontal'
 if name == ""
 let editCommand = 'rightbelow new'
 else
 let editCommand = 'rightbelow split ' . name
 endif
 function! s:HGCreateCommandBuffer(cmd, cmdName, statusText, origBuffNR)
 let fileName=bufname(a:origBuffNR)
 let resultBufferName=''
-if s:HGGetOption("HGCommandNameResultBuffers", 0)
+if <SID>HGGetOption("HGCommandNameResultBuffers", 0)
-let nameMarker = s:HGGetOption("HGCommandNameMarker", '_')
+let nameMarker = <SID>HGGetOption("HGCommandNameMarker", '_')
 if strlen(a:statusText) > 0
 let bufName=a:cmdName . ' -- ' . a:statusText
 else
 let bufName=a:cmdName
 endif
 let counter=counter + 1
 let resultBufferName=bufName . ' (' . counter . ')'
 endwhile
 endif
-let hgCommand = s:HGGetOption("HGCommandHGExec", "hg") . " " . a:cmd
+let hgCommand = <SID>HGGetOption("HGCommandHGExec", "hg") . " " . a:cmd
 "echomsg "DBG :".hgCommand
 let hgOut = system(hgCommand)
 " HACK:  diff command does not return proper error codes
 if v:shell_error && a:cmdName != 'hgdiff'
 if strlen(hgOut) == 0
 echomsg "No output from HG command"
 checktime
 return -1
 endif
-if s:HGEditFile(resultBufferName, a:origBuffNR) == -1
+if <SID>HGEditFile(resultBufferName, a:origBuffNR) == -1
 return -1
 endif
 set buftype=nofile
 set noswapfile
 set filetype=
-if s:HGGetOption("HGCommandDeleteOnHide", 0)
+if <SID>HGGetOption("HGCommandDeleteOnHide", 0)
 set bufhidden=delete
 endif
 silent 0put=hgOut
 " remove the blank line will kill the last fold.
 "
 " This could be fixed by explicitly detecting whether the last line is
 " within a fold, but I prefer to simply unfold the result buffer altogether.
-if has('folding')
+if has("folding")
-normal zR
+setlocal nofoldenable
 endif
 $d
 1
 if origBuffer
 if bufexists(origBuffer)
 return origBuffer
 else
 " Original buffer no longer exists.
 return -1
 endif
 else
 " No original buffer
 return a:hgBuffer
 endif
 " Function: s:HGCurrentBufferCheck() {{{2
 " Attempts to locate the original file to which HG operations were applied
 " for the current buffer.
 function! s:HGCurrentBufferCheck()
-return s:HGBufferCheck(bufnr("%"))
+return <SID>HGBufferCheck(bufnr("%"))
 endfunction
 " Function: s:HGToggleDeleteOnHide() {{{2
 " Toggles on and off the delete-on-hide behavior of HG buffers
 " Function: s:HGDoCommand(hgcmd, cmdName, statusText) {{{2
 " General skeleton for HG function execution.
 " Returns: name of the new command buffer containing the command results
 function! s:HGDoCommand(cmd, cmdName, statusText)
-let hgBufferCheck=s:HGCurrentBufferCheck()
+let hgBufferCheck=<SID>HGCurrentBufferCheck()
 if hgBufferCheck == -1
 echo "Original buffer no longer exists, aborting."
 return -1
 endif
 let fileName=bufname(hgBufferCheck)
 if isdirectory(fileName)
 let fileName=fileName . "/" . getline(".")
 endif
-let realFileName = fnamemodify(s:HGResolveLink(fileName), ':t')
+let realFileName = fnamemodify(<SID>HGResolveLink(fileName), ':t')
-let oldCwd=s:HGChangeToCurrentFileDir(fileName)
+let oldCwd=<SID>HGChangeToCurrentFileDir(fileName)
 try
 " TODO
 "if !filereadable('HG/Root')
 "throw fileName . ' is not a HG-controlled file.'
 "endif
 let fullCmd = a:cmd . ' "' . realFileName . '"'
 "echomsg "DEBUG".fullCmd
-let resultBuffer=s:HGCreateCommandBuffer(fullCmd, a:cmdName, a:statusText, hgBufferCheck)
+let resultBuffer=<SID>HGCreateCommandBuffer(fullCmd, a:cmdName, a:statusText, hgBufferCheck)
 return resultBuffer
 catch
 echoerr v:exception
 return -1
 finally
 " the corresponding results.
 "
 " Returns: string to be exec'd that sets the multiple return values.
 function! s:HGGetStatusVars(revisionVar, branchVar, repositoryVar)
-let hgBufferCheck=s:HGCurrentBufferCheck()
+let hgBufferCheck=<SID>HGCurrentBufferCheck()
 "echomsg "DBG : in HGGetStatusVars"
 if hgBufferCheck == -1
 return ""
 endif
 let fileName=bufname(hgBufferCheck)
-let fileNameWithoutLink=s:HGResolveLink(fileName)
+let fileNameWithoutLink=<SID>HGResolveLink(fileName)
 let realFileName = fnamemodify(fileNameWithoutLink, ':t')
-let oldCwd=s:HGChangeToCurrentFileDir(realFileName)
+let oldCwd=<SID>HGChangeToCurrentFileDir(realFileName)
 try
-let hgCommand = s:HGGetOption("HGCommandHGExec", "hg") . " root  "
+let hgCommand = <SID>HGGetOption("HGCommandHGExec", "hg") . " root  "
 let roottext=system(hgCommand)
 " Suppress ending null char ! Does it work in window ?
 let roottext=substitute(roottext,'^.*/\([^/\n\r]*\)\n\_.*$','\1','')
 if match(getcwd()."/".fileNameWithoutLink, roottext) == -1
 return ""
 endif
 let returnExpression = ""
 if a:repositoryVar != ""
 let returnExpression=returnExpression . " | let " . a:repositoryVar . "='" . roottext . "'"
 endif
-let hgCommand = s:HGGetOption("HGCommandHGExec", "hg") . " status -mardui " . realFileName
+let hgCommand = <SID>HGGetOption("HGCommandHGExec", "hg") . " status -mardui " . realFileName
 let statustext=system(hgCommand)
 if(v:shell_error)
 return ""
 endif
 if match(statustext, '^[?I]') >= 0
 let revision="NEW"
 elseif match(statustext, '^[R]') >= 0
 let revision="REMOVED"
 elseif match(statustext, '^[D]') >= 0
 let revision="DELETED"
 elseif match(statustext, '^[A]') >= 0
 let revision="ADDED"
 else
 " The file is tracked, we can try to get is revision number
-let hgCommand = s:HGGetOption("HGCommandHGExec", "hg") . " parents -b  "
+let hgCommand = <SID>HGGetOption("HGCommandHGExec", "hg") . " parents -b  "
 let statustext=system(hgCommand)
 if(v:shell_error)
 return ""
 endif
 let revision=substitute(statustext, '^changeset:\s*\(\d\+\):.*\_$\_.*$', '\1', "")
 if (exists("b:HGBufferSetup") && b:HGBufferSetup && !exists('a:1'))
 " This buffer is already set up.
 return
 endif
-if !s:HGGetOption("HGCommandEnableBufferSetup", 0)
+if !<SID>HGGetOption("HGCommandEnableBufferSetup", 0)
 \ || @% == ""
 \ || s:HGCommandEditFileRunning > 0
 \ || exists("b:HGOrigBuffNR")
 unlet! b:HGRevision
 unlet! b:HGBranch
 let revision=""
 let branch=""
 let repository=""
-exec s:HGGetStatusVars('revision', 'branch', 'repository')
+exec <SID>HGGetStatusVars('revision', 'branch', 'repository')
 "echomsg "DBG ".revision."#".branch."#".repository
 if revision != ""
 let b:HGRevision=revision
 else
 unlet! b:HGRevision
 " Returns:  The HG buffer number in a passthrough mode.
 function! s:HGMarkOrigBufferForSetup(hgBuffer)
 checktime
 if a:hgBuffer != -1
-let origBuffer = s:HGBufferCheck(a:hgBuffer)
+let origBuffer = <SID>HGBufferCheck(a:hgBuffer)
 "This should never not work, but I'm paranoid
 if origBuffer != a:hgBuffer
 call setbufvar(origBuffer, "HGBufferSetup", 0)
 endif
 else
 "We are presumably in the original buffer
 let b:HGBufferSetup = 0
 "We do the setup now as now event will be triggered allowing it later.
-call s:HGSetupBuffer()
+call <SID>HGSetupBuffer()
 endif
 return a:hgBuffer
 endfunction
 " Function: s:HGOverrideOption(option, [value]) {{{2
 " Helper function to make mkdir as portable as possible
 function! s:HGFlexiMkdir(dir)
 if exists("*mkdir") " we can use Vim's own mkdir()
 call mkdir(a:dir)
 elseif !exists("+shellslash")
-call system('mkdir -p "'.a:dir.'"')
+call system("mkdir -p '".a:dir."'")
 else " M$
 let l:ssl = &shellslash
 try
 set shellslash
+" no single quotes?
 call system('mkdir "'.a:dir.'"')
 finally
 let &shellslash = l:ssl
 endtry
 endif
 endfunction
-function! s:HGInstallDocumentation(full_name, revision)
+function! s:HGInstallDocumentation(full_name)
 " Figure out document path based on full name of this script:
-let l:vim_plugin_path = fnamemodify(a:full_name, ':h')
+let l:vim_doc_path = fnamemodify(a:full_name, ":h:h") . "/doc"
-let l:vim_doc_path  = fnamemodify(a:full_name, ':h:h') . "/doc"
 if filewritable(l:vim_doc_path) != 2
-echomsg "hgcommand: Trying to update docs at: " . l:vim_doc_path
+echomsg s:script_name . ": Trying to update docs at" l:vim_doc_path
 silent! call <SID>HGFlexiMkdir(l:vim_doc_path)
 if filewritable(l:vim_doc_path) != 2
 " Try first item in 'runtimepath':
-let l:vimfiles = matchstr(&runtimepath, '[^,]\+\ze,')
+let l:vim_doc_path =
-let l:vim_doc_path = l:vimfiles . "/doc"
+\ substitute(&runtimepath, '^\([^,]*\).*', '\1/doc', 'e')
 if filewritable(l:vim_doc_path) != 2
-echomsg "hgcommand: Trying to update docs at: " . l:vim_doc_path
+echomsg s:script_name . ": Trying to update docs at" l:vim_doc_path
 silent! call <SID>HGFlexiMkdir(l:vim_doc_path)
 if filewritable(l:vim_doc_path) != 2
 " Put a warning:
 echomsg "Unable to open documentation directory"
 echomsg " type `:help add-local-help' for more information."
 endif
 endif
 endif
 endif
-" Full name of script and documentation file:
+" Full name of documentation file:
-let l:script_name = fnamemodify(a:full_name, ':t')
+let l:doc_file =
-let l:doc_name  = fnamemodify(a:full_name, ':t:r') . '.txt'
+\ l:vim_doc_path . "/" . s:script_name . ".txt"
-let l:doc_file  = l:vim_doc_path . "/" . l:doc_name
 " Bail out if document file is still up to date:
-if filereadable(l:doc_file)  && getftime(a:full_name) < getftime(l:doc_file)
+if filereadable(l:doc_file)  &&
+\ getftime(a:full_name) < getftime(l:doc_file)
 return 0
 endif
+" temporary global settings
+let l:lz = &lazyredraw
+let l:hls = &hlsearch
+set lazyredraw nohlsearch
 " Create a new buffer & read in the plugin file (me):
-setl nomodeline
+1 new
-1 new!
+setlocal noswapfile modifiable nomodeline
-setl noswapfile modifiable
+if has("folding")
-sil exe 'read ' . a:full_name
+setlocal nofoldenable
+endif
-setl modeline
+silent execute "read" escape(a:full_name, " ")
-let l:buf = bufnr("%")
+let l:doc_buf = bufnr("%")
-norm zR
+1
-norm gg
 " Delete from first line to a line starts with
 " === START_DOC
-sil 1,/^=\{3,}\s\+START_DOC\C/ d
+silent 1,/^=\{3,}\s\+START_DOC\C/ d
 " Delete from a line starts with
 " === END_DOC
 " to the end of the documents:
-sil /^=\{3,}\s\+END_DOC\C/,$ d
+silent /^=\{3,}\s\+END_DOC\C/,$ d
-" Remove fold marks:
-sil %s/{\{3}[1-9]/  /e
 " Add modeline for help doc: the modeline string is mangled intentionally
 " to avoid it be recognized by VIM:
-call append(line('$'), '')
+call append(line("$"), "")
-call append(line('$'), ' v' . 'im:tw=78:ts=8:ft=help:norl:')
+call append(line("$"), " v" . "im:tw=78:ts=8:ft=help:norl:")
 " Replace revision:
-sil exe "normal :1s/#version#/ v" . a:revision . "/\<CR>"
+silent execute "normal :1s/#version#/" . s:script_version . "/\<CR>"
 " Save the help document and wipe out buffer:
-sil exe 'wq! ' . l:doc_file . ' | bw ' . l:buf
+silent execute "wq!" escape(l:doc_file, " ") "| bw" l:doc_buf
 " Build help tags:
-sil exe 'helptags ' . l:vim_doc_path
+silent execute "helptags" l:vim_doc_path
+let &hlsearch = l:hls
+let &lazyredraw = l:lz
 return 1
 endfunction
 " Section: Public functions {{{1
 " Global function for retrieving the current buffer's HG revision number.
 " Returns: Revision number or an empty string if an error occurs.
 function! HGGetRevision()
 let revision=""
-exec s:HGGetStatusVars('revision', '', '')
+exec <SID>HGGetStatusVars('revision', '', '')
 return revision
 endfunction
 " Function: HGDisableBufferSetup() {{{2
 " Global function for deactivating the buffer autovariables.
 function! HGEnableBufferSetup()
 let g:HGCommandEnableBufferSetup=1
 augroup HGCommandPlugin
 au!
-au BufEnter * call s:HGSetupBuffer()
+au BufEnter * call <SID>HGSetupBuffer()
-au BufWritePost * call s:HGSetupBuffer()
+au BufWritePost * call <SID>HGSetupBuffer()
 " Force resetting up buffer on external file change (HG update)
-au FileChangedShell * call s:HGSetupBuffer(1)
+au FileChangedShell * call <SID>HGSetupBuffer(1)
 augroup END
 " Only auto-load if the plugin is fully loaded.  This gives other plugins a
 " chance to run.
 if g:loaded_hgcommand == 2
-call s:HGSetupBuffer()
+call <SID>HGSetupBuffer()
 endif
 endfunction
 " Function: HGGetStatusLine() {{{2
 " Default (sample) status line entry for HG files.  This is only useful if
 " Section: HG command functions {{{1
 " Function: s:HGAdd() {{{2
 function! s:HGAdd()
-return s:HGMarkOrigBufferForSetup(s:HGDoCommand('add', 'hgadd', ''))
+return <SID>HGMarkOrigBufferForSetup(<SID>HGDoCommand('add', 'hgadd', ''))
 endfunction
 " Function: s:HGAnnotate(...) {{{2
 function! s:HGAnnotate(...)
 if a:0 == 0
 if &filetype == "HGAnnotate"
 " This is a HGAnnotate buffer.  Perform annotation of the version
 " indicated by the current line.
 let revision = substitute(getline("."),'\(^[0-9]*\):.*','\1','')
-if s:HGGetOption('HGCommandAnnotateParent', 0) != 0 && revision > 0
+if <SID>HGGetOption('HGCommandAnnotateParent', 0) != 0 && revision > 0
 let revision = revision - 1
 endif
 else
 let revision=HGGetRevision()
 if revision == ""
 if revision == "NEW"
 echo "No annotatation available for new file."
 return -1
 endif
-let resultBuffer=s:HGDoCommand('annotate -ndu -r ' . revision, 'hgannotate', revision)
+let resultBuffer=<SID>HGDoCommand('annotate -ndu -r ' . revision, 'hgannotate', revision)
 "echomsg "DBG: ".resultBuffer
 if resultBuffer !=  -1
 set filetype=HGAnnotate
 endif
 function! s:HGCommit(...)
 " Handle the commit message being specified.  If a message is supplied, it
 " is used; if bang is supplied, an empty message is used; otherwise, the
 " user is provided a buffer from which to edit the commit message.
 if a:2 != "" || a:1 == "!"
-return s:HGMarkOrigBufferForSetup(s:HGDoCommand('commit -m "' . a:2 . '"', 'hgcommit', ''))
+return <SID>HGMarkOrigBufferForSetup(<SID>HGDoCommand('commit -m "' . a:2 . '"', 'hgcommit', ''))
 endif
-let hgBufferCheck=s:HGCurrentBufferCheck()
+let hgBufferCheck=<SID>HGCurrentBufferCheck()
 if hgBufferCheck ==  -1
 echo "Original buffer no longer exists, aborting."
 return -1
 endif
 set shellslash
 let messageFileName = tempname()
 let fileName=bufname(hgBufferCheck)
-let realFilePath=s:HGResolveLink(fileName)
+let realFilePath=<SID>HGResolveLink(fileName)
 let newCwd=fnamemodify(realFilePath, ':h')
 if strlen(newCwd) == 0
 " Account for autochdir being in effect, which will make this blank, but
 " we know we'll be in the current directory for the original file.
 let newCwd = getcwd()
 endif
 let realFileName=fnamemodify(realFilePath, ':t')
-if s:HGEditFile(messageFileName, hgBufferCheck) == -1
+if <SID>HGEditFile(messageFileName, hgBufferCheck) == -1
 return
 endif
 " Protect against case and backslash issues in Windows.
 let autoPattern = '\c' . messageFileName
 silent 0put ='HG: ----------------------------------------------------------------------'
 silent put =\"HG: Enter Log.  Lines beginning with `HG:' are removed automatically\"
 silent put ='HG: Type <leader>cc (or your own <Plug>HGCommit mapping)'
-if s:HGGetOption('HGCommandCommitOnWrite', 1) == 1
+if <SID>HGGetOption('HGCommandCommitOnWrite', 1) == 1
 execute 'au HGCommit BufWritePre' autoPattern 'g/^HG:/d'
-execute 'au HGCommit BufWritePost' autoPattern 'call s:HGFinishCommit("' . messageFileName . '", "' . newCwd . '", "' . realFileName . '", ' . hgBufferCheck . ') | au! * ' autoPattern
+execute 'au HGCommit BufWritePost' autoPattern 'call <SID>HGFinishCommit("' . messageFileName . '", "' . newCwd . '", "' . realFileName . '", ' . hgBufferCheck . ') | au! * ' autoPattern
 silent put ='HG: or write this buffer'
 endif
 silent put ='HG: to finish this commit operation'
 silent put ='HG: ----------------------------------------------------------------------'
 else
 let revOptions = ''
 let caption = ''
 endif
-let hgdiffopt=s:HGGetOption('HGCommandDiffOpt', 'w')
+let hgdiffopt=<SID>HGGetOption('HGCommandDiffOpt', 'w')
 if hgdiffopt == ""
 let diffoptionstring=""
 else
 let diffoptionstring=" -" . hgdiffopt . " "
 endif
-let resultBuffer = s:HGDoCommand('diff ' . diffoptionstring . revOptions , 'hgdiff', caption)
+let resultBuffer = <SID>HGDoCommand('diff ' . diffoptionstring . revOptions , 'hgdiff', caption)
 if resultBuffer != -1
 set filetype=diff
 endif
 return resultBuffer
 endfunction
 " Function: s:HGGotoOriginal(["!]) {{{2
 function! s:HGGotoOriginal(...)
-let origBuffNR = s:HGCurrentBufferCheck()
+let origBuffNR = <SID>HGCurrentBufferCheck()
 if origBuffNR > 0
 let origWinNR = bufwinnr(origBuffNR)
 if origWinNR == -1
 execute 'buffer' origBuffNR
 else
 if filereadable(a:messageFile)
 let oldCwd=getcwd()
 if strlen(a:targetDir) > 0
 execute 'cd' escape(a:targetDir, ' ')
 endif
-let resultBuffer=s:HGCreateCommandBuffer('commit -l "' . a:messageFile . '" "'. a:targetFile . '"', 'hgcommit', '', a:origBuffNR)
+let resultBuffer=<SID>HGCreateCommandBuffer('commit -l "' . a:messageFile . '" "'. a:targetFile . '"', 'hgcommit', '', a:origBuffNR)
 execute 'cd' escape(oldCwd, ' ')
 execute 'bw' escape(a:messageFile, ' *?\')
 silent execute 'call delete("' . a:messageFile . '")'
-return s:HGMarkOrigBufferForSetup(resultBuffer)
+return <SID>HGMarkOrigBufferForSetup(resultBuffer)
 else
 echoerr "Can't read message file; no commit is possible."
 return -1
 endif
 endfunction
 else
 let versionOption=" -r" . a:1
 let caption = a:1
 endif
-let resultBuffer=s:HGDoCommand('log' . versionOption, 'hglog', caption)
+let resultBuffer=<SID>HGDoCommand('log' . versionOption, 'hglog', caption)
 if resultBuffer != ""
 set filetype=rcslog
 endif
 return resultBuffer
 endfunction
 " Function: s:HGRevert() {{{2
 function! s:HGRevert()
-return s:HGMarkOrigBufferForSetup(s:HGDoCommand('revert', 'hgrevert', ''))
+return <SID>HGMarkOrigBufferForSetup(<SID>HGDoCommand('revert', 'hgrevert', ''))
 endfunction
 " Function: s:HGReview(...) {{{2
 function! s:HGReview(...)
 if a:0 == 0
 let versiontag=""
-if s:HGGetOption('HGCommandInteractive', 0)
+if <SID>HGGetOption('HGCommandInteractive', 0)
 let versiontag=input('Revision:  ')
 endif
 if versiontag == ""
 let versiontag="(current)"
 let versionOption=""
 else
 let versiontag=a:1
 let versionOption=" -r " . versiontag . " "
 endif
-let resultBuffer = s:HGDoCommand('cat' . versionOption, 'hgreview', versiontag)
+let resultBuffer = <SID>HGDoCommand('cat' . versionOption, 'hgreview', versiontag)
 if resultBuffer > 0
 let &filetype=getbufvar(b:HGOrigBuffNR, '&filetype')
 endif
 return resultBuffer
 endfunction
 " Function: s:HGStatus() {{{2
 function! s:HGStatus()
-return s:HGDoCommand('status', 'hgstatus', '')
+return <SID>HGDoCommand('status', 'hgstatus', '')
 endfunction
 " Function: s:HGUpdate() {{{2
 function! s:HGUpdate()
-return s:HGMarkOrigBufferForSetup(s:HGDoCommand('update', 'update', ''))
+return <SID>HGMarkOrigBufferForSetup(<SID>HGDoCommand('update', 'update', ''))
 endfunction
 " Function: s:HGVimDiff(...) {{{2
 function! s:HGVimDiff(...)
-let originalBuffer = s:HGCurrentBufferCheck()
+let originalBuffer = <SID>HGCurrentBufferCheck()
 let s:HGCommandEditFileRunning = s:HGCommandEditFileRunning + 1
 try
 " If there's already a VimDiff'ed window, restore it.
 " There may only be one HGVimDiff original window at a time.
 if exists("s:vimDiffSourceBuffer") && s:vimDiffSourceBuffer != originalBuffer
 " Clear the existing vimdiff setup by removing the result buffers.
-call s:HGWipeoutCommandBuffers(s:vimDiffSourceBuffer, 'vimdiff')
+call <SID>HGWipeoutCommandBuffers(s:vimDiffSourceBuffer, 'vimdiff')
 endif
 " Split and diff
 if(a:0 == 2)
 " Reset the vimdiff system, as 2 explicit versions were provided.
 if exists('s:vimDiffSourceBuffer')
-call s:HGWipeoutCommandBuffers(s:vimDiffSourceBuffer, 'vimdiff')
+call <SID>HGWipeoutCommandBuffers(s:vimDiffSourceBuffer, 'vimdiff')
 endif
-let resultBuffer = s:HGReview(a:1)
+let resultBuffer = <SID>HGReview(a:1)
 if resultBuffer < 0
 echomsg "Can't open HG revision " . a:1
 return resultBuffer
 endif
 let b:HGCommand = 'vimdiff'
 diffthis
 let s:vimDiffBufferCount = 1
 let s:vimDiffScratchList = '{'. resultBuffer . '}'
 " If no split method is defined, cheat, and set it to vertical.
 try
-call s:HGOverrideOption('HGCommandSplit', s:HGGetOption('HGCommandDiffSplit', s:HGGetOption('HGCommandSplit', 'vertical')))
+call <SID>HGOverrideOption('HGCommandSplit', <SID>HGGetOption('HGCommandDiffSplit', <SID>HGGetOption('HGCommandSplit', 'vertical')))
-let resultBuffer=s:HGReview(a:2)
+let resultBuffer=<SID>HGReview(a:2)
 finally
-call s:HGOverrideOption('HGCommandSplit')
+call <SID>HGOverrideOption('HGCommandSplit')
 endtry
 if resultBuffer < 0
 echomsg "Can't open HG revision " . a:1
 return resultBuffer
 endif
 let s:vimDiffScratchList = s:vimDiffScratchList . '{'. resultBuffer . '}'
 else
 " Add new buffer
 try
 " Force splitting behavior, otherwise why use vimdiff?
-call s:HGOverrideOption("HGCommandEdit", "split")
+call <SID>HGOverrideOption("HGCommandEdit", "split")
-call s:HGOverrideOption("HGCommandSplit", s:HGGetOption('HGCommandDiffSplit', s:HGGetOption('HGCommandSplit', 'vertical')))
+call <SID>HGOverrideOption("HGCommandSplit", <SID>HGGetOption('HGCommandDiffSplit', <SID>HGGetOption('HGCommandSplit', 'vertical')))
 if(a:0 == 0)
-let resultBuffer=s:HGReview()
+let resultBuffer=<SID>HGReview()
 else
-let resultBuffer=s:HGReview(a:1)
+let resultBuffer=<SID>HGReview(a:1)
 endif
 finally
-call s:HGOverrideOption("HGCommandEdit")
+call <SID>HGOverrideOption("HGCommandEdit")
-call s:HGOverrideOption("HGCommandSplit")
+call <SID>HGOverrideOption("HGCommandSplit")
 endtry
 if resultBuffer < 0
 echomsg "Can't open current HG revision"
 return resultBuffer
 endif
 " This could have been invoked on a HG result buffer, not the
 " original buffer.
 wincmd W
 execute 'buffer' originalBuffer
 " Store info for later original buffer restore
 let s:vimDiffRestoreCmd =
 \    "call setbufvar(".originalBuffer.", \"&diff\", ".getbufvar(originalBuffer, '&diff').")"
 \ . "|call setbufvar(".originalBuffer.", \"&foldcolumn\", ".getbufvar(originalBuffer, '&foldcolumn').")"
 \ . "|call setbufvar(".originalBuffer.", \"&foldenable\", ".getbufvar(originalBuffer, '&foldenable').")"
 \ . "|call setbufvar(".originalBuffer.", \"&foldmethod\", '".getbufvar(originalBuffer, '&foldmethod')."')"
 \ . "|call setbufvar(".originalBuffer.", \"&scrollbind\", ".getbufvar(originalBuffer, '&scrollbind').")"
 \ . "|call setbufvar(".originalBuffer.", \"&wrap\", ".getbufvar(originalBuffer, '&wrap').")"
-\ . "|if &foldmethod=='manual'|execute 'normal zE'|endif"
+\ . "|if &foldmethod=='manual'|execute 'normal! zE'|endif"
 diffthis
 wincmd w
 else
 " Adding a window to an existing vimdiff
 let s:vimDiffBufferCount = s:vimDiffBufferCount + 1
 endtry
 endfunction
 " Section: Command definitions {{{1
 " Section: Primary commands {{{2
-com! HGAdd call s:HGAdd()
+com! HGAdd call <SID>HGAdd()
-com! -nargs=? HGAnnotate call s:HGAnnotate(<f-args>)
+com! -nargs=? HGAnnotate call <SID>HGAnnotate(<f-args>)
-com! -bang -nargs=? HGCommit call s:HGCommit(<q-bang>, <q-args>)
+com! -bang -nargs=? HGCommit call <SID>HGCommit(<q-bang>, <q-args>)
-com! -nargs=* HGDiff call s:HGDiff(<f-args>)
+com! -nargs=* HGDiff call <SID>HGDiff(<f-args>)
-com! -bang HGGotoOriginal call s:HGGotoOriginal(<q-bang>)
+com! -bang HGGotoOriginal call <SID>HGGotoOriginal(<q-bang>)
-com! -nargs=? HGLog call s:HGLog(<f-args>)
+com! -nargs=? HGLog call <SID>HGLog(<f-args>)
-com! HGRevert call s:HGRevert()
+com! HGRevert call <SID>HGRevert()
-com! -nargs=? HGReview call s:HGReview(<f-args>)
+com! -nargs=? HGReview call <SID>HGReview(<f-args>)
-com! HGStatus call s:HGStatus()
+com! HGStatus call <SID>HGStatus()
-com! HGUpdate call s:HGUpdate()
+com! HGUpdate call <SID>HGUpdate()
-com! -nargs=* HGVimDiff call s:HGVimDiff(<f-args>)
+com! -nargs=* HGVimDiff call <SID>HGVimDiff(<f-args>)
 " Section: HG buffer management commands {{{2
 com! HGDisableBufferSetup call HGDisableBufferSetup()
 com! HGEnableBufferSetup call HGEnableBufferSetup()
 endtry
 endfunction
 augroup HGVimDiffRestore
 au!
-au BufUnload * call s:HGVimDiffRestore(expand("<abuf>"))
+au BufUnload * call <SID>HGVimDiffRestore(expand("<abuf>"))
 augroup END
 " Section: Optional activation of buffer management {{{1
 if s:HGGetOption('HGCommandEnableBufferSetup', 1)
 call HGEnableBufferSetup()
 endif
 " Section: Doc installation {{{1
-"
-let s:revision="0.1"
+if <SID>HGInstallDocumentation(expand("<sfile>:p"))
-if s:HGInstallDocumentation(escape(expand('<sfile>:p'), ' '), s:revision)
+echomsg s:script_name s:script_version . ": updated documentation"
-echom expand('<sfile>:t:r') . ' v' . s:revision .
+endif
-\ ': Help-documentation installed.'
-endif
-" delete one-time vars and functions
-delfunction <SID>HGInstallDocumentation
-delfunction <SID>HGFlexiMkdir
-unlet s:revision
 " Section: Plugin completion {{{1
+" delete one-time vars and functions
+delfunction <SID>HGInstallDocumentation
+delfunction <SID>HGFlexiMkdir
+delfunction <SID>HGCleanupOnFailure
+unlet s:script_version s:script_name
 let loaded_hgcommand=2
 silent do HGCommand User HGPluginFinish
+let &cpo = s:save_cpo
+unlet s:save_cpo
 " vim:se expandtab sts=2 sw=2:
 finish
 """"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
 " Section: Documentation content                                          {{{1
 	Bugs			: |hgcommand-bugs|
 ==============================================================================
 2. HGCommand Installation				   *hgcommand-install*
 In order to install the plugin, place the hgcommand.vim file into a plugin'
 directory in your runtime path (please see |add-global-plugin| and
 |'runtimepath'|.
 HGCommand may be customized by setting variables, creating maps, and
 specifying event handlers.  Please see |hgcommand-customize| for more
 details.
 *hgcommand-auto-help*
 The help file is automagically generated when the |hgcommand| script is
 loaded for the first time.
 ==============================================================================
 3. HGCommand Intro					           *hgcommand*
 *hgcommand-intro*
 The HGCommand plugin provides global ex commands for manipulating
 HG-controlled source files.  In general, each command operates on the
 current buffer and accomplishes a separate hg function, such as update,
 commit, log, and others (please see |hgcommand-commands| for a list of all
 available commands).  The results of each operation are displayed in a
 scratch buffer.  Several buffer variables are defined for those scratch
 buffers (please see |hgcommand-buffer-variables|).
 The notion of "current file" means either the current buffer, or, in the
 case of a directory buffer, the file on the current line within the buffer.
 For convenience, any HGCommand invoked on a HGCommand scratch buffer acts
 as though it was invoked on the original file and splits the screen so that
 the output appears in a new window.
 Many of the commands accept revisions as arguments.  By default, most
 operate on the most recent revision on the current branch if no revision is
 specified (though see |HGCommandInteractive| to prompt instead).
 Each HGCommand is mapped to a key sequence starting with the <Leader>
 keystroke.  The default mappings may be overridden by supplying different
 mappings before the plugin is loaded, such as in the vimrc, in the standard
 fashion for plugin mappings.  For examples, please see
 |hgcommand-mappings-override|.
 The HGCommand plugin may be configured in several ways.  For more details,
 please see |hgcommand-customize|.
 ==============================================================================
 4. HGCommand Manual					    *hgcommand-manual*
 |:HGUpdate|
 |:HGVimDiff|
 :HGAdd							              *:HGAdd*
 This command performs "hg add" on the current file.  Please note, this does
 not commit the newly-added file.
 :HGAnnotate						         *:HGAnnotate*
 This command performs "hg annotate" on the current file.  If an argument is
 given, the argument is used as a revision number to display.  If not given
 an argument, it uses the most recent version of the file on the current
 branch.  Additionally, if the current buffer is a HGAnnotate buffer
 already, the version number on the current line is used.
 If the |HGCommandAnnotateParent| variable is set to a non-zero value, the
 version previous to the one on the current line is used instead.  This
 allows one to navigate back to examine the previous version of a line.
 The filetype of the HGCommand scratch buffer is set to 'HGAnnotate', to
 take advantage of the bundled syntax file.
 :HGCommit[!]						           *:HGCommit*
 If called with arguments, this performs "hg commit" using the arguments as
 the log message.
 If '!' is used with no arguments, an empty log message is committed.
 If called with no arguments, this is a two-step command.  The first step
 opens a buffer to accept a log message.  When that buffer is written, it is
 automatically closed and the file is committed using the information from
 that log message.  The commit can be abandoned if the log message buffer is
 deleted or wiped before being written.
 Alternatively, the mapping that is used to invoke :HGCommit (by default
 <Leader>hgc) can be used in the log message buffer to immediately commit.
 This is useful if the |HGCommandCommitOnWrite| variable is set to 0 to
 disable the normal commit-on-write behavior.
 :HGDiff						                     *:HGDiff*
 With no arguments, this performs "hg diff" on the current file against the
 current repository version.
 With one argument, "hg diff" is performed on the current file against the
 specified revision.
 With two arguments, hg diff is performed between the specified revisions of
 the current file.
 This command uses the 'HGCommandDiffOpt' variable to specify diff options.
 If that variable does not exist, then 'wbBc' is assumed.  If you wish to
 have no options, then set it to the empty string.
 :HGGotoOriginal					             *:HGGotoOriginal*
 This command returns the current window to the source buffer, if the
 current buffer is a HG command output buffer.
 :HGGotoOriginal!
 Like ":HGGotoOriginal" but also executes :bufwipeout on all HG command
 output buffers for the source buffer.
 :HGLog							              *:HGLog*
 Performs "hg log" on the current file.
 If an argument is given, it is passed as an argument to the "-r" option of
 "hg log".
 :HGRevert						           *:HGRevert*
 Replaces the current file with the most recent version from the repository
 in order to wipe out any undesired changes.
 :HGReview						           *:HGReview*
 Retrieves a particular version of the current file.  If no argument is
 given, the most recent version of the file on the current branch is
 retrieved.  Otherwise, the specified version is retrieved.
 :HGStatus					 	           *:HGStatus*
 Performs "hg status" on the current file.
 :HGUpdate						           *:HGUpdate*
 Performs "hg update" on the current file.  This intentionally does not
 automatically reload the current buffer, though vim should prompt the user
 to do so if the underlying file is altered by this command.
 :HGVimDiff						          *:HGVimDiff*
 With no arguments, this prompts the user for a revision and then uses
 vimdiff to display the differences between the current file and the
 specified revision.  If no revision is specified, the most recent version
 of the file on the current branch is used.
 With one argument, that argument is used as the revision as above.  With
 two arguments, the differences between the two revisions is displayed using
 vimdiff.
 With either zero or one argument, the original buffer is used to perform
 the vimdiff.  When the other buffer is closed, the original buffer will be
 returned to normal mode.
 Once vimdiff mode is started using the above methods, additional vimdiff
 buffers may be added by passing a single version argument to the command.
 There may be up to 4 vimdiff buffers total.
 Using the 2-argument form of the command resets the vimdiff to only those 2
 versions.  Additionally, invoking the command on a different file will
 close the previous vimdiff buffers.
 4.2 Mappings						  *hgcommand-mappings*
 By default, a mapping is defined for each command.  These mappings execute
 the default (no-argument) form of each command.
 <Leader>hga HGAdd
 <Leader>hgn HGAnnotate
 <Leader>hgc HGCommit
 <Leader>hgu HGUpdate
 <Leader>hgv HGVimDiff
 *hgcommand-mappings-override*
 The default mappings can be overriden by user-provided instead by mapping
 to <Plug>CommandName.  This is especially useful when these mappings
 collide with other existing mappings (vim will warn of this during plugin
 initialization, but will not clobber the existing mappings).
 For instance, to override the default mapping for :HGAdd to set it to
 '\add', add the following to the vimrc: >
 nmap \add <Plug>HGAdd
 <
 4.3 Automatic buffer variables			  *hgcommand-buffer-variables*
 Several buffer variables are defined in each HGCommand result buffer.
 These may be useful for additional customization in callbacks defined in
 the event handlers (please see |hgcommand-events|).
 The following variables are automatically defined:
 b:hgOrigBuffNR						      *b:hgOrigBuffNR*
 This variable is set to the buffer number of the source file.
 b:hgcmd						                     *b:hgcmd*
 This variable is set to the name of the hg command that created the result
 buffer.
 ==============================================================================
 5. Configuration and customization			 *hgcommand-customize*
 *hgcommand-config*
 The HGCommand plugin can be configured in two ways:  by setting
 configuration variables (see |hgcommand-options|) or by defining HGCommand
 event handlers (see |hgcommand-events|).  Additionally, the HGCommand
 plugin provides several option for naming the HG result buffers (see
 |hgcommand-naming|) and supported a customized status line (see
 |hgcommand-statusline| and |hgcommand-buffer-management|).
 5.1 HGCommand configuration variables			   *hgcommand-options*
 Several variables affect the plugin's behavior.  These variables are
 checked at time of execution, and may be defined at the window, buffer, or
 global level and are checked in that order of precedence.
 The following variables are available:
 |HGCommandNameResultBuffers|
 |HGCommandSplit|
 HGCommandAnnotateParent			             *HGCommandAnnotateParent*
 This variable, if set to a non-zero value, causes the zero-argument form of
 HGAnnotate when invoked on a HGAnnotate buffer to go to the version
 previous to that displayed on the current line. If not set, it defaults to
 0.
 HGCommandCommitOnWrite				      *HGCommandCommitOnWrite*
 This variable, if set to a non-zero value, causes the pending hg commit to
 take place immediately as soon as the log message buffer is written.  If
 set to zero, only the HGCommit mapping will cause the pending commit to
 occur.  If not set, it defaults to 1.
 HGCommandHGExec				                     *HGCommandHGExec*
 This variable controls the executable used for all HG commands.  If not
 set, it defaults to "hg".
 HGCommandDeleteOnHide				       *HGCommandDeleteOnHide*
 This variable, if set to a non-zero value, causes the temporary HG result
 buffers to automatically delete themselves when hidden.
 HGCommandDiffOpt				            *HGCommandDiffOpt*
 This variable, if set, determines the options passed to the diff command of
 HG.  If not set, it defaults to 'w'.
 HGCommandDiffSplit				          *HGCommandDiffSplit*
 This variable overrides the |HGCommandSplit| variable, but only for buffers
 created with |:HGVimDiff|.
 HGCommandEdit					               *HGCommandEdit*
 This variable controls whether the original buffer is replaced ('edit') or
 split ('split').  If not set, it defaults to 'edit'.
 HGCommandEnableBufferSetup			  *HGCommandEnableBufferSetup*
 This variable, if set to a non-zero value, activates HG buffer management
 mode see (|hgcommand-buffer-management|).  This mode means that three
 buffer variables, 'HGRepository', 'HGRevision' and 'HGBranch', are set if
 the file is HG-controlled.  This is useful for displaying version
 information in the status bar.
 HGCommandInteractive				        *HGCommandInteractive*
 This variable, if set to a non-zero value, causes appropriate commands (for
 the moment, only |:HGReview|) to query the user for a revision to use
 instead of the current revision if none is specified.
 HGCommandNameMarker				         *HGCommandNameMarker*
 This variable, if set, configures the special attention-getting characters
 that appear on either side of the hg buffer type in the buffer name.  This
 has no effect unless |HGCommandNameResultBuffers| is set to a true value.
 If not set, it defaults to '_'.
 HGCommandNameResultBuffers			  *HGCommandNameResultBuffers*
 This variable, if set to a true value, causes the hg result buffers to be
 named in the old way ('<source file name> _<hg command>_').  If not set or
 set to a false value, the result buffer is nameless.
 HGCommandSplit					              *HGCommandSplit*
 This variable controls the orientation of the various window splits that
 may occur (such as with HGVimDiff, when using a HG command on a HG command
 buffer, or when the |HGCommandEdit| variable is set to 'split'.  If set to
 'horizontal', the resulting windows will be on stacked on top of one
 another.  If set to 'vertical', the resulting windows will be side-by-side.
 If not set, it defaults to 'horizontal' for all but HGVimDiff windows.
 5.2 HGCommand events				            *hgcommand-events*
 For additional customization, HGCommand can trigger user-defined events.
 Event handlers are provided by defining User event autocommands (see
 |autocommand|, |User|) in the HGCommand group with patterns matching the
 event name.
 For instance, the following could be added to the vimrc to provide a 'q'
 mapping to quit a HGCommand scratch buffer: >
 augroup HGCommand
 au HGCommand User HGBufferCreated silent! nmap <unique> <buffer> q:
 bwipeout<cr>
 <
 The following hooks are available:
 HGBufferCreated		This event is fired just after a hg command result
 buffer is created and filled with the result of a hg
 command.  It is executed within the context of the HG
 command buffer.  The HGCommand buffer variables may be
 useful for handlers of this event (please see
 |hgcommand-buffer-variables|).
 HGBufferSetup		This event is fired just after HG buffer setup occurs,
 if enabled.
 HGPluginFinish		This event is fired just after the HGCommand plugin
 loads.
 HGVimDiffFinish		This event is fired just after the HGVimDiff command
 executes to allow customization of, for instance,
 window placement and focus.
 5.3 HGCommand buffer naming				    *hgcommand-naming*
 By default, the buffers containing the result of HG commands are nameless
 scratch buffers.  It is intended that buffer variables of those buffers be
 used to customize the statusline option so that the user may fully control
 the display of result buffers.
 If the old-style naming is desired, please enable the
 |HGCommandNameResultBuffers| variable.  Then, each result buffer will
 receive a unique name that includes the source file name, the HG command,
 and any extra data (such as revision numbers) that were part of the
 command.
 5.4 HGCommand status line support			*hgcommand-statusline*
 It is intended that the user will customize the |'statusline'| option to
 include HG result buffer attributes.  A sample function that may be used in
 the |'statusline'| option is provided by the plugin, HGGetStatusLine().  In
 order to use that function in the status line, do something like the
 following: >
 set statusline=%<%f\ %{HGGetStatusLine()}\ %h%m%r%=%l,%c%V\ %P
 <
 of which %{HGGetStatusLine()} is the relevant portion.
 The sample HGGetStatusLine() function handles both HG result buffers and
 HG-managed files if HGCommand buffer management is enabled (please see
 |hgcommand-buffer-management|).
 5.5 HGCommand buffer management		         *hgcommand-buffer-management*
 The HGCommand plugin can operate in buffer management mode, which means
 that it attempts to set two buffer variables ('HGRevision' and 'HGBranch')
 upon entry into a buffer.  This is rather slow because it means that 'hg
 status' will be invoked at each entry into a buffer (during the |BufEnter|
 autocommand).
 This mode is enabled by default.  In order to disable it, set the
 |HGCommandEnableBufferSetup| variable to a false (zero) value.  Enabling
 this mode simply provides the buffer variables mentioned above.  The user
 must explicitly include those in the |'statusline'| option if they are to
 appear in the status line (but see |hgcommand-statusline| for a simple way
 to do that).
 ==============================================================================
 9. Tips							      *hgcommand-tips*
 :nmap <Leader>hgN :vs<CR><C-w>h<Leader>hgn:vertical res 40<CR>
 \ggdddd:set scb<CR>:set nowrap<CR><C-w>lgg:set scb<CR>
 \:set nowrap<CR>
 <
 This splits the buffer vertically, puts an annotation on the left (minus
 the header) with the width set to 40. An editable/normal copy is placed on
 the right.  The two versions are scroll locked so they  move as one. and
 wrapping is turned off so that the lines line up correctly. The advantages
 are...
 1) You get a versioning on the right.
 2) You can still edit your own code.
 3) Your own code still has syntax highlighting.
 8. Known bugs						      *hgcommand-bugs*
 Please let me know if you run across any.
 HGVimDiff, when using the original (real) source buffer as one of the diff
 buffers, uses some hacks to try to restore the state of the original buffer
 when the scratch buffer containing the other version is destroyed.  There
 may still be bugs in here, depending on many configuration details.
 ==============================================================================
 9. TODO  						      *hgcommand-todo*
 ==============================================================================
 === END_DOC
 """"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
 " v im:tw=78:ts=8:ft=help:norl:
 " vim600: set foldmethod=marker  tabstop=8 shiftwidth=2 softtabstop=2 smartindent smarttab  :
 "fileencoding=iso-8859-15

changeset 2759	19436facb073
parent 2733	0b7206a65325
child 3528	bf48ca46139b