mirror of
https://github.com/Raimondi/delimitMate.git
synced 2025-12-07 05:04:34 +08:00
First commit.
This commit is contained in:
Israel Chauca Fuentes
210
delimater.vim
Normal file
210
delimater.vim
Normal file
@@ -0,0 +1,210 @@
|
||||
" DELIMITERS MADE LESS ANNOYING:{{{1
|
||||
"
|
||||
" Main novelty here (if it is one): this does NOT try to be helpful by
|
||||
" inserting the closing delimiter for you when you type an opening one.
|
||||
" Instead it only tries to be smart about what to do when you type a closing
|
||||
" delimiter yourself.
|
||||
"
|
||||
" If you just typed an empty delimiter pair, it'll move the cursor back
|
||||
" inside. If you type a closing delimiter the cursor is already on (or to
|
||||
" the left of, if the cursor is on a space), it'll skip the cursor past that
|
||||
" delimiter without inserting it.
|
||||
"
|
||||
" That way you never end with superfluous delimiters to delete, which deletion
|
||||
" itself can be tricky to perform, since the editor might be trying to be
|
||||
" helpful about deletions as well. Instead, you only ever get delimiters you
|
||||
" explicitly typed yourself.
|
||||
"
|
||||
" I had trained myself into the good habit of typing pairs together anyway.
|
||||
" The only annoying part of that habit is the manual cursor placement work;
|
||||
" but that work is quite predictable almost all of the time. That's exactly
|
||||
" the sort of work that computers are for.
|
||||
|
||||
" Init:{{{1
|
||||
if exists("loaded_annoying_delimiters")
|
||||
" finish
|
||||
endif
|
||||
if v:version < 700
|
||||
echoerr "AnnoyingDelimiters: this plugin requires vim >= 7!"
|
||||
finish
|
||||
endif
|
||||
let loaded_annoying_delimiters = 1
|
||||
|
||||
if !exists("g:annoyDelims_delims_list")
|
||||
let s:delims = split (") } ] ' \" `")
|
||||
else
|
||||
let s:delims = g:annoyDelims_delims_list
|
||||
endif
|
||||
|
||||
if !exists("g:annoyDelims_autocomplete")
|
||||
let s:autocomplete = 1
|
||||
else
|
||||
let s:autocomplete = g:annoyDelims_autocomplete
|
||||
endif
|
||||
|
||||
let s:paired_delims = split( &matchpairs, ',' )
|
||||
let s:quote_delims = split("\" ' ` ´")
|
||||
"let s:left_delims = []
|
||||
"let s:right_delims = []
|
||||
|
||||
"for pair in s:paired_delims
|
||||
"let pairl = split(pair,":")
|
||||
"let s:left_delims = s:left_delims + pairl[0]
|
||||
"let s:right_delims = s:right_delims + pairl[1]
|
||||
"endfor
|
||||
|
||||
let s:left_delims = split(&matchpairs, ':.,\=')
|
||||
let s:right_delims = split(&matchpairs, ',\=.:')
|
||||
|
||||
let s:leader = "q"
|
||||
|
||||
" Functions:{{{1
|
||||
function! IsEmptyPair(str)
|
||||
for pair in split( &matchpairs, ',' ) + [ "''", '""', '``' ]
|
||||
if a:str == join( split( pair, ':' ),'' )
|
||||
return 1
|
||||
endif
|
||||
endfor
|
||||
return 0
|
||||
endfunc
|
||||
|
||||
function! WithinEmptyPair()
|
||||
let cur = strpart( getline('.'), col('.')-2, 2 )
|
||||
return IsEmptyPair( cur )
|
||||
endfunc
|
||||
|
||||
function! SkipDelim(char)
|
||||
let cur = strpart( getline('.'), col('.')-2, 3 )
|
||||
if cur[0] == "\\"
|
||||
return a:char
|
||||
elseif cur[1] == a:char
|
||||
return "\<Right>"
|
||||
elseif cur[1] == ' ' && cur[2] == a:char
|
||||
return "\<Right>\<Right>"
|
||||
elseif IsEmptyPair( cur[0] . a:char )
|
||||
return a:char . "\<Left>"
|
||||
else
|
||||
return a:char
|
||||
endif
|
||||
endfunc
|
||||
|
||||
function! QuoteDelim(char)
|
||||
let line = getline('.')
|
||||
let col = col('.')
|
||||
if line[col - 2] == "\\"
|
||||
"Inserting a quoted quotation mark into the string
|
||||
return a:char
|
||||
elseif line[col - 1] == a:char
|
||||
"Escaping out of the string
|
||||
return "\<Right>"
|
||||
else
|
||||
"Starting a string
|
||||
return a:char.a:char."\<Left>"
|
||||
endif
|
||||
endf
|
||||
|
||||
function! ClosePair(char)
|
||||
if getline('.')[col('.') - 1] == a:char
|
||||
return "\<Right>"
|
||||
else
|
||||
return a:char
|
||||
endif
|
||||
endf
|
||||
|
||||
function! ResetMappings()
|
||||
for delim in s:right_delims + s:left_delims + s:quote_delims
|
||||
silent! exec 'iunmap ' . delim
|
||||
silent! exec 'vunmap ' . s:leader . delim
|
||||
endfor
|
||||
endfunction
|
||||
|
||||
" Mappings:{{{1
|
||||
|
||||
call ResetMappings()
|
||||
if s:autocomplete == 0
|
||||
" Don't auto-complete:{{{2
|
||||
let test_string = "Don't"
|
||||
"inoremap <expr> ) SkipDelim(')')
|
||||
for delim in s:right_delims + s:quote_delims
|
||||
exec 'imap <expr> ' . delim . ' SkipDelim("\' . delim . '")'
|
||||
endfor
|
||||
|
||||
" Wrap the selection with delimiters:
|
||||
"vmap <expr> q( visualmode() == "<C-V>" ? "I(\<Esc>" : "s(\<C-R>\")\<Esc>"
|
||||
let s:i = 0
|
||||
while s:i < len(s:paired_delims)
|
||||
exec 'vmap <expr> ' . s:leader . s:left_delims[s:i] .
|
||||
\' visualmode() == "<C-V>" ? "I' . s:left_delims[s:i] .
|
||||
\'\<Esc>" : "s' . s:left_delims[s:i] . '\<C-R>\"' .
|
||||
\s:right_delims[s:i] . '\<Esc>"'
|
||||
exec 'vmap <expr> ' . s:leader . s:right_delims[s:i] .
|
||||
\' visualmode() == "<C-V>" ? "I' . s:left_delims[s:i] .
|
||||
\'\<Esc>" : "s' . s:left_delims[s:i] . '\<C-R>\"' .
|
||||
\s:right_delims[s:i] . '\<Esc>"'
|
||||
let s:i = s:i + 1
|
||||
endwhile
|
||||
|
||||
for quote in s:quote_delims
|
||||
exec 'vmap <expr> ' . s:leader . quote .
|
||||
\' visualmode() == "<C-V>" ? "I' . quote .
|
||||
\'\<Esc>" : "s' . quote . '\<C-R>\"' . quote . '\<Esc>"'
|
||||
endfor
|
||||
|
||||
else
|
||||
" Do auto-complete:{{{2
|
||||
let test_string = "Do"
|
||||
let s:i = 0
|
||||
while s:i < len(s:paired_delims)
|
||||
exec 'imap ' . s:left_delims[s:i] . ' ' . s:left_delims[s:i] . s:right_delims[s:i] . '<Left>'
|
||||
let s:i = s:i + 1
|
||||
endwhile
|
||||
"imap ( ()<Left>
|
||||
"imap [ []<Left>
|
||||
"imap { {}<Left>
|
||||
"autocmd Syntax html,vim imap < <lt>><Left>
|
||||
"let test_list = []
|
||||
let s:i = 0
|
||||
for delim in s:quote_delims
|
||||
exec 'imap ' . delim . ' <c-r>=QuoteDelim("\' . delim . '")<CR>'
|
||||
endfor
|
||||
for delim in s:right_delims
|
||||
exec 'imap ' . delim . ' <c-r>=ClosePair("\' . delim . '")<CR>'
|
||||
endfor
|
||||
"imap " <c-r>=QuoteDelim('"')<CR>
|
||||
"imap ' <c-r>=QuoteDelim("'")<CR>
|
||||
"imap ) <c-r>=ClosePair(')')<CR>
|
||||
"imap ] <c-r>=ClosePair(']')<CR>
|
||||
"imap } <c-r>=ClosePair('}')<CR>
|
||||
|
||||
" Wrap the selection with delimiters:
|
||||
"vmap <expr> q( visualmode() == "<C-V>" ? "I(\<Esc>" : "s()\<C-R>\"\<Esc>"
|
||||
let s:i = 0
|
||||
while s:i < len(s:paired_delims)
|
||||
exec 'vmap <expr> ' . s:leader . s:left_delims[s:i] . ' visualmode() == "<C-V>" ? "I' . s:left_delims[s:i] . '\<Esc>" : "s' . s:left_delims[s:i] . s:right_delims[s:i] . '\<C-R>\"\<Esc>"'
|
||||
exec 'vmap <expr> ' . s:leader . s:right_delims[s:i] . ' visualmode() == "<C-V>" ? "I' . s:left_delims[s:i] . '\<Esc>" : "s' . s:left_delims[s:i] . s:right_delims[s:i] . '\<C-R>\"\<Esc>"'
|
||||
let s:i = s:i + 1
|
||||
endwhile
|
||||
|
||||
for quote in s:quote_delims
|
||||
exec 'vmap <expr> ' . s:leader . quote .
|
||||
\' visualmode() == "<C-V>" ? "I' . quote .
|
||||
\'\<Esc>" : "s' . quote . '\<C-R>\"' . quote . '\<Esc>"'
|
||||
endfor
|
||||
"vmap ( <ESC>`>a)<ESC>`<i(<ESC>
|
||||
"vmap ) <ESC>`>a)<ESC>`<i(<ESC>
|
||||
"vmap { <ESC>`>a}<ESC>`<i{<ESC>
|
||||
"vmap } <ESC>`>a}<ESC>`<i{<ESC>
|
||||
"vmap " <ESC>`>a"<ESC>`<i"<ESC>
|
||||
"vmap ' <ESC>`>a'<ESC>`<i'<ESC>
|
||||
"vmap ` <ESC>`>a`<ESC>`<i`<ESC>
|
||||
"vmap [ <ESC>`>a]<ESC>`<i[<ESC>
|
||||
"vmap ] <ESC>`>a]<ESC>`<i[<ESC>
|
||||
|
||||
|
||||
endif
|
||||
" Expansions:{{{2
|
||||
imap <expr> <BS> WithinEmptyPair() ? "\<Right>\<BS>\<BS>" : "\<BS>"
|
||||
imap <expr> <CR> WithinEmptyPair() ? "\<CR>\<CR>\<Up>" : "\<CR>"
|
||||
imap <expr> <Space> WithinEmptyPair() ? "\<Space>\<Space>\<Left>" : "\<Space>"
|
||||
|
||||
" vim:foldmethod=marker:foldcolumn=2
|
||||
Reference in New Issue
Block a user