tests/bundled/lh-vim-lib/autoload/lh/event.vim @ 321c5d51ee50
Fix the default value for close_on_revert.
| author | Steve Losh <steve@stevelosh.com> |
|---|---|
| date | Mon, 09 May 2011 21:10:50 -0400 |
| parents | 2b3d5ee5c4a4 |
| children | (none) |
"============================================================================= " $Id: event.vim 246 2010-09-19 22:40:58Z luc.hermitte $ " File: autoload/lh/event.vim {{{1 " Author: Luc Hermitte <EMAIL:hermitte {at} free {dot} fr> " <URL:http://code.google.com/p/lh-vim/> " Version: 2.2.1 " Created: 15th Feb 2008 " Last Update: $Date: 2010-09-19 18:40:58 -0400 (Sun, 19 Sep 2010) $ "------------------------------------------------------------------------ " Description: " Function to help manage vim |autocommand-events| " "------------------------------------------------------------------------ " Installation: " Drop it into {rtp}/autoload/lh/ " Vim 7+ required. " History: " v2.0.6: " Creation " TODO: " }}}1 "============================================================================= let s:cpo_save=&cpo set cpo&vim "------------------------------------------------------------------------ " ## Functions {{{1 " # Debug {{{2 function! lh#event#verbose(level) let s:verbose = a:level endfunction function! s:Verbose(expr) if exists('s:verbose') && s:verbose echomsg a:expr endif endfunction function! lh#event#debug(expr) return eval(a:expr) endfunction "------------------------------------------------------------------------ " # Event Registration {{{2 function! s:RegisteredOnce(cmd, group) " We can't delete the current augroup autocommand => increment a counter if !exists('s:'.a:group) || s:{a:group} == 0 let s:{a:group} = 1 exe a:cmd endif endfunction function! lh#event#register_for_one_execution_at(event, cmd, group) let group = a:group.'_once' let s:{group} = 0 exe 'augroup '.group au! exe 'au '.a:event.' '.expand('%:p').' call s:RegisteredOnce('.string(a:cmd).','.string(group).')' augroup END endfunction function! lh#event#RegisterForOneExecutionAt(event, cmd, group) return lh#event#register_for_one_execution_at(a:event, a:cmd, a:group) endfunction "------------------------------------------------------------------------ let &cpo=s:cpo_save "============================================================================= " vim600: set fdm=marker: