X-Git-Url: http://git.iain.cx/?p=profile.git;a=blobdiff_plain;f=.vimrc;h=4e1c4b84fda6dfb702f5ea452b776882602ff139;hp=5f81697233c7784cdb46f4750251a35de88a59fc;hb=38e73bd0f8a6b326fb47e4cba06587b03e561a07;hpb=cb8fd4bb449e44110ca681bdab168009cf9e229b diff --git a/.vimrc b/.vimrc index 5f81697..4e1c4b8 100644 --- a/.vimrc +++ b/.vimrc @@ -17,16 +17,26 @@ version 4.0 " No compatibility mode. se nocp +" Find stuff. +if has("win32") + se rtp=~/.vim,$VIMRUNTIME +endif + " Tabstop 2. se ts=2 " And use spaces not tabs. se expandtab " And << and >> indent by 2. se sw=2 +" Backspace deletes full tab width at the start of a line. +se smarttab " Allow backspace to delete before start of line. se bs=2 +" Don't jump to the start of the line when using H, L etc. +se nosol + " Show the ruler. se ruler " Show partial commands in the ruler. @@ -75,6 +85,17 @@ if ! has("gui_running") se bg=dark endif +" Allow mouse use in a terminal but only if it can work. +if has("xterm_clipboard") + se mouse=nvir +endif + +" Update more quickly. For use with sign highlighting as polling for +" CursorMove makes redrawing slow. +if has("signs") + se updatetime=500 +endif + " Enable tab-completion prompting for commands. se wildmenu " Don't list object files when globbing files to load. @@ -86,14 +107,30 @@ se suffixes-=*.o,*.obj " cross-platform. se ssop+=unix,slash +" How often do we need to use ^A/^X on octals? +se nf=hex + " Nuke any pre-existing autocommands. +augroup Display autocmd! +augroup Mode +autocmd! +if has("signs") + augroup Signs + autocmd! +endif +augroup StatusLine +autocmd! +augroup END " Save the current window width so we can restore it when we quit. -let oldcols=&columns +if ! exists("g:oldcols") + let g:oldcols=&columns +endif -" More GUI options. Add icon, tearoffs and toolbar. -se go+=itT +" More GUI options. Add icon and tearoffs. +se go+=i +se go+=t " Allow dynamic window resize even if we aren't in an xterm. se t_WS=[8;%p1%d;%p2%dt @@ -109,10 +146,6 @@ if version < "600" syn on endif -" Use a discernably different colour to highlight the cursor which shows -" matching brackets. Our regular cursor is green so use blue instead of cyan. -hi MatchParen ctermbg=blue - " Catch typos. command! W :w command! Wq :wq @@ -136,6 +169,14 @@ fun! Iain_Vars() if ! exists("g:iainextracolumns") let g:iainextracolumns = 0 endif + if has("signs") + if ! exists("g:marksigns") + let g:marksigns = 0 + endif + if ! exists("g:firstsign") + let g:firstsign = 100 + endif + endif endfun " Helper for status line. @@ -213,25 +254,37 @@ fun! Invert_Case() endfun " Grow or shrink the window size. -fun! Resize_Columns(op) - " XXX: This won't work inside screen. - " We should really detect whether it would work rather than assume it won't. - if &term =~ '^screen' - return +fun! Resize_Columns(op, ...) + if a:0 == 0 + " Vim 5 hardcodes the size of numbers column to 8. + if version >= "700" + let l:columns = &numberwidth + else + let l:columns = 8 + endif + else + let l:columns = a:1 endif - " Vim 5 hardcodes the size of numbers column to 8. - if version >= "700" - let l:numberwidth = &numberwidth - else - let l:numberwidth = 8 + exe "let l:resize=" . &columns . a:op . l:columns + let l:resize = "se columns=" . l:resize + + " HACK: Inside screen there is an extra line for the status bar. Vim + " manages the resize by sending an escape sequence to set the number of + " lines and number of columns in one action. To do this it will first query + " the number of lines and then set by . Because of the extra line for the status bar this results in + " the real terminal being shrunk by a line. We ask for the terminal to grow + " by a line so it ends up actually being the same. + if &term =~ '^screen' + let l:resize = l:resize . " lines=" . (&lines + 1) endif - exec "se columns" . a:op . "=" . l:numberwidth + exe l:resize endfun " Toggle number display. -fun! Number() +fun! Number(resize) call Iain_Vars() let &number = ! &number @@ -247,20 +300,24 @@ fun! Number() if l:num_numbers == 0 let g:iainextracolumns = 0 - call Resize_Columns("-") + if a:resize + call Resize_Columns("-") + endif elseif g:iainextracolumns == 0 let g:iainextracolumns = 1 - call Resize_Columns("+") + if a:resize + call Resize_Columns("+") + endif endif endif endfun " Restore window size. -au VimLeave * if exists("oldcols") | let &columns=oldcols | endif +au Display VimLeave * if exists("g:oldcols") | call Resize_Columns("-", (&columns - g:oldcols)) | endif " Map Makefile mode. -au BufEnter * if &ft == "make" | call MakeMode_map() | endif -au BufLeave * if &ft == "make" | call MakeMode_unmap() | endif +au Mode BufEnter * if &ft == "make" | call MakeMode_map() | endif +au Mode BufLeave * if &ft == "make" | call MakeMode_unmap() | endif " Entering Make mode. fun! MakeMode_map() @@ -309,7 +366,7 @@ call Mapping("p", ":se paste!:") " Swap case-sensitivity with \c. call Mapping("c", ":call Invert_Case():") " Change number mode with \n. -call Mapping("n", ":call Number():") +call Mapping("n", ":call Number(1):") " Expand or shrink window size with \> and \<. call Mapping(">", ":call Resize_Columns('+'):") call Mapping("<", ":call Resize_Columns('-'):") @@ -322,6 +379,62 @@ map Q " Vim tip 99: What's the highlighting group under the cursor? call Mapping("h", ":echo \"hi<\" . synIDattr(synID(line(\".\"),col(\".\"),1),\"name\") . '> trans<' . synIDattr(synID(line(\".\"),col(\".\"),0),\"name\") . \"> lo<\" . synIDattr(synIDtrans(synID(line(\".\"),col(\".\"),1)),\"name\") . \">\"") +fun! Uncluttered_Buffer() + if exists("uncluttered_buffer") + if uncluttered_buffer == 1 + return 1 + endif + endif + + if version >= "600" + if &buftype != '' + return 1 + endif + endif + + if &ft == 'perforce' + return 1 + endif + + if &ft == 'svn' + return 1 + endif + + if &ft == 'gitcommit' + return 1 + endif + + return 0 +endfun + +fun! Startup_Resize() + let l:columns = 0 + + " Resize for numbers. + if &number + if version >= "700" + let l:columns = &numberwidth + else + let l:columns = 8 + endif + endif + + " Resize for signs. + if has("signs") + if g:marksigns + if version >= "600" + let l:columns = l:columns + 2 + endif + endif + endif + + if g:oldcols < (80 + l:columns) + call Resize_Columns("+", l:columns) + endif +endfun + +" Show numbers by default. +au Display VimEnter * if ! Uncluttered_Buffer() | call Number(0) | endif endif """""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""" @@ -339,45 +452,286 @@ filetype indent on " Less intrusive syntax highlighting. syn enable -" Nice GUI colour. +" Set colours. if has("gui_running") - se guifont=DejaVu\ Sans\ Mono\ 10 - colo darkblue - hi LineNr guibg=#303030 -elseif &t_Co > 16 try - colo iain + if has("win32") + se guifont=DejaVu_Sans_Mono:h10:cANSI + else + se guifont=DejaVu\ Sans\ Mono\ 10 + endif catch endtry endif -if has("win32") - se guifont=DejaVu_Sans_Mono:h10:cANSI +if has("gui_running") || &t_Co > 16 + try + colo iain + catch + endtry endif -hi! link TabLineSel StatusLine -hi! link TabLine StatusLineNC " Ignore whitespace when diffing. se diffopt=filler,iwhite " Expand window when doing a vertical diff. if &diff - let &columns = 164 + if &columns < 161 + let &columns = &columns * 2 + endif endif " Remember that we are opening the quickfix window. -au BufWinEnter quickfix let g:quickfixing=1 -au BufUnload * if &ft == "qf" | let g:quickfixing=0 | endif +au Mode BufWinEnter quickfix let g:quickfixing=1 +au Mode BufUnload * if &ft == "qf" | let g:quickfixing=0 | endif " Allow in-place editing of crontabs. -au FileType crontab set backupcopy=yes +au Mode FileType crontab set backupcopy=yes " Make * and # work the way you expect in visual mode. vnoremap * y/\V=substitute(escape(@@,"/\\"),"\n","\\\\n","ge") vnoremap # y?\V=substitute(escape(@@,"?\\"),"\n","\\\\n","ge") +" Set mark and update highlighting. +if has("signs") + au Signs BufEnter * call Highlight_Signs() + au Signs CursorHold * call Highlight_Signs() +endif + +fun! Prep_Signs() + if ! exists("b:signdot") || ! g:marksigns + let b:signdot=0 + endif + if ! exists("b:signdash") || ! g:marksigns + let b:signdash=0 + endif + if ! exists("b:signquote") || ! g:marksigns + let b:signquote=0 + endif + if ! exists("b:signcaret") || ! g:marksigns + let b:signcaret=0 + endif + if ! exists("b:signless") || ! g:marksigns + let b:signless=0 + endif + if ! exists("b:signgreater") || ! g:marksigns + let b:signgreater=0 + endif + if ! exists("b:signleft") || ! g:marksigns + let b:signleft=0 + endif + if ! exists("b:signright") || ! g:marksigns + let b:signright=0 + endif + if ! exists("b:signsquareleft") || ! g:marksigns + let b:signsquareleft=0 + endif + if ! exists("b:signsquareright") || ! g:marksigns + let b:signsquareright=0 + endif + if ! exists("b:signbraceleft") || ! g:marksigns + let b:signbraceleft=0 + endif + if ! exists("b:signbraceright") || ! g:marksigns + let b:signbraceright=0 + endif + if ! exists("b:signa") || ! g:marksigns + let b:signa=0 + endif + if ! exists("b:signb") || ! g:marksigns + let b:signb=0 + endif + if ! exists("b:signc") || ! g:marksigns + let b:signc=0 + endif + if ! exists("b:signd") || ! g:marksigns + let b:signd=0 + endif + if ! exists("b:signe") || ! g:marksigns + let b:signe=0 + endif + if ! exists("b:signf") || ! g:marksigns + let b:signf=0 + endif + if ! exists("b:signA") || ! g:marksigns + let b:signA=0 + endif + if ! exists("b:signB") || ! g:marksigns + let b:signB=0 + endif + if ! exists("b:signC") || ! g:marksigns + let b:signC=0 + endif + if ! exists("b:signD") || ! g:marksigns + let b:signD=0 + endif + if ! exists("b:signE") || ! g:marksigns + let b:signE=0 + endif + if ! exists("b:signF") || ! g:marksigns + let b:signF=0 + endif +endfun! + +fun! Place_Sign(number, line, old, name) + if a:line == a:old + return a:old + endif + + exe "sign unplace " . (g:firstsign + a:number) . " buffer=" . bufnr("") + " Don't place the sign if it would conflict with the last change sign. + exe "sign place " . (g:firstsign + a:number) . " line=" . a:line . " name=" . a:name . " buffer=" . bufnr("") + return a:line +endfun + +fun! Highlight_Signs(...) + if ! has("signs") || ! g:marksigns || Uncluttered_Buffer() + return + endif + + call Prep_Signs() + + let b:signdot = Place_Sign(0, line("'."), b:signdot, "MarkDot") + let b:signdash = Place_Sign(1, line("''"), b:signdash, "MarkDash") + let b:signquote = Place_Sign(2, line("'\""), b:signquote, "MarkQuote") + let b:signcaret = Place_Sign(3, line("'^"), b:signcaret, "MarkCaret") + let b:signless = Place_Sign(4, line("'<"), b:signless, "MarkLess") + let b:signgreater = Place_Sign(5, line("'>"), b:signgreater, "MarkGreater") + let b:signleft = Place_Sign(6, line("'("), b:signleft, "MarkLeft") + let b:signright = Place_Sign(7, line("')"), b:signright, "MarkRight") + let b:signsquareleft = Place_Sign(8, line("'["), b:signsquareleft, "MarkSquareLeft") + let b:signsquareright = Place_Sign(9, line("']"), b:signsquareright, "MarkSquareRight") + let b:signbraceleft = Place_Sign(10, line("'{"), b:signbraceleft, "MarkBraceLeft") + let b:signbraceright = Place_Sign(11, line("'}"), b:signbraceright, "MarkBraceRight") + + let b:signa = Place_Sign(12, line("'a"), b:signa, "Marka") + let b:signb = Place_Sign(13, line("'b"), b:signb, "Markb") + let b:signc = Place_Sign(15, line("'c"), b:signc, "Markc") + let b:signd = Place_Sign(16, line("'d"), b:signd, "Markd") + let b:signe = Place_Sign(17, line("'e"), b:signe, "Marke") + let b:signf = Place_Sign(18, line("'f"), b:signf, "Markf") + let b:signA = Place_Sign(19, line("'A"), b:signA, "MarkA") + let b:signB = Place_Sign(20, line("'B"), b:signB, "MarkB") + let b:signC = Place_Sign(21, line("'C"), b:signC, "MarkC") + let b:signD = Place_Sign(22, line("'D"), b:signD, "MarkD") + let b:signE = Place_Sign(23, line("'E"), b:signE, "MarkE") + let b:signF = Place_Sign(24, line("'F"), b:signF, "MarkF") +endfun + +" Toggle signs. +fun! Cycle_Signs(resize) + if ! has("signs") + return + endif + call Iain_Vars() + let g:marksigns = ! g:marksigns + + if g:marksigns + " Signs to highlight marks. + " Syntax won't work properly in Vim 6. + sign define MarkDash text=' texthl=MarkSign + sign define MarkDot text=* texthl=MarkDot + sign define MarkQuote text=" texthl=MarkSign + sign define MarkCaret text=^ texthl=MarkDot + sign define MarkLess text=< texthl=MarkSign + sign define MarkGreater text=> texthl=MarkSign + sign define MarkLeft text=( texthl=MarkSign + sign define MarkRight text=) texthl=MarkSign + sign define MarkSquareLeft text=[ texthl=MarkSign + sign define MarkSquareRight text=] texthl=MarkSign + sign define MarkBraceLeft text={ texthl=MarkSign + sign define MarkBraceRight text=} texthl=MarkSign + sign define Marka text=a texthl=MarkSign linehl=MarkLine + sign define Markb text=b texthl=MarkSign linehl=MarkLine + sign define Markc text=c texthl=MarkSign linehl=MarkLine + sign define Markd text=d texthl=MarkSign linehl=MarkLine + sign define Marke text=e texthl=MarkSign linehl=MarkLine + sign define Markf text=f texthl=MarkSign linehl=MarkLine + sign define MarkA text=A texthl=MarkSign linehl=MarkLine + sign define MarkB text=B texthl=MarkSign linehl=MarkLine + sign define MarkC text=C texthl=MarkSign linehl=MarkLine + sign define MarkD text=D texthl=MarkSign linehl=MarkLine + sign define MarkE text=E texthl=MarkSign linehl=MarkLine + sign define MarkF text=F texthl=MarkSign linehl=MarkLine + + if a:resize + call Resize_Columns("+", 2) + endif + call Highlight_Signs() + else + exe "sign unplace " . (g:firstsign + 0) + exe "sign unplace " . (g:firstsign + 1) + exe "sign unplace " . (g:firstsign + 2) + exe "sign unplace " . (g:firstsign + 3) + exe "sign unplace " . (g:firstsign + 4) + exe "sign unplace " . (g:firstsign + 5) + exe "sign unplace " . (g:firstsign + 6) + exe "sign unplace " . (g:firstsign + 7) + exe "sign unplace " . (g:firstsign + 8) + exe "sign unplace " . (g:firstsign + 9) + exe "sign unplace " . (g:firstsign + 10) + exe "sign unplace " . (g:firstsign + 11) + exe "sign unplace " . (g:firstsign + 12) + exe "sign unplace " . (g:firstsign + 13) + exe "sign unplace " . (g:firstsign + 14) + exe "sign unplace " . (g:firstsign + 15) + exe "sign unplace " . (g:firstsign + 16) + exe "sign unplace " . (g:firstsign + 17) + exe "sign unplace " . (g:firstsign + 18) + exe "sign unplace " . (g:firstsign + 19) + exe "sign unplace " . (g:firstsign + 20) + exe "sign unplace " . (g:firstsign + 21) + exe "sign unplace " . (g:firstsign + 22) + exe "sign unplace " . (g:firstsign + 23) + exe "sign unplace " . (g:firstsign + 24) + + sign undefine MarkDash + sign undefine MarkDot + sign undefine MarkQuote + sign undefine MarkCaret + sign undefine MarkLess + sign undefine MarkGreater + sign undefine MarkLeft + sign undefine MarkRight + sign undefine MarkSquareLeft + sign undefine MarkSquareRight + sign undefine MarkBraceLeft + sign undefine MarkBraceRight + sign undefine Marka + sign undefine Markb + sign undefine Markc + sign undefine Markd + sign undefine Marke + sign undefine Markf + sign undefine MarkA + sign undefine MarkB + sign undefine MarkC + sign undefine MarkD + sign undefine MarkE + sign undefine MarkF + + call Prep_Signs() + if a:resize + call Resize_Columns("-", 2) + endif + endif +endfun + " Change list mode. fun! Cycle_List() - let basic='tab:\\_,trail:_,extends:<,precedes:>' + " Pretty UTF-8 listchars. + if has('multi_byte') && (&tenc =~? '^u\(tf\|cs\)' || (! strlen(&tenc) && &enc =~? '^u\(tf\|cs\)')) && v:version >= "602" + let basic='tab:»·,trail:…,extends:«,precedes:»' + let eol='eol:¶' + if version >= "700" + let basic=basic . ',nbsp:•' + endif + else + let basic='tab:\\_,trail:_,extends:<,precedes:>' + let eol='eol:$' + if version >= "700" + let basic=basic . ',nbsp:+' + endif + endif call Iain_Vars() let b:iainlist = b:iainlist + 1 if b:iainlist > 2 @@ -389,7 +743,7 @@ fun! Cycle_List() exec "set lcs=" . basic set list else - exec "set lcs=" . basic . ",eol:$" + exec "set lcs=" . basic . "," . eol set list endif endfun @@ -433,8 +787,39 @@ call Mapping("q", ":call Cycle_Quickfix():") " Rerun filetype detection with \s. The s is for syntax, as this will be " updated as a side-effect. call Mapping("s", ":filetype detect:") +" Toggle marks with \m. +call Mapping("m", ":call Cycle_Signs(1):") + +fun! Iain_Colour(colour) + if &t_Co == 88 + if a:colour == "darkblue" + return 17 + elseif a:colour == "darkmagenta" + return 33 + elseif a:colour == "darkred" + return 32 + elseif a:colour == "red" + return 64 + endif + elseif &t_Co == 256 + if a:colour == "darkblue" + return 17 + elseif a:colour == "darkmagenta" + return 90 + elseif a:colour == "darkred" + return 88 + elseif a:colour == "red" + return 196 + endif + else + return a:colour + endif +endfun " Change status bar colour when various things happen. +" Flags: H/h: Cursor held/moved. +" F/f: Focus gained/lost. +" I/i: Insert mode entered/left. fun! Highlight_StatusLine(flag) " Get current status. call Iain_Vars() @@ -443,46 +828,46 @@ fun! Highlight_StatusLine(flag) let re = "[" . tolower(a:flag) . toupper(a:flag) . "]" let b:iainstatus = substitute(b:iainstatus, re, a:flag, "") + let l:normalcolour = "darkblue" + let l:editingcolour = "darkmagenta" + let l:warningcolour = "darkred" + let l:readonlycolour = "red" + " Default colour. - let s:colour = "darkblue" - let s:termcolour = "" - let s:term88colour = "17" - let s:term256colour = "17" + let l:colour = l:normalcolour " Maybe override depending on status. if b:iainstatus =~# "H" if b:iainstatus =~# "I" " Held in insert mode. Add extra highlight if we don't have focus. if b:iainstatus =~# "f" - let s:colour = "darkred" - let s:term88colour = "32" - let s:term256colour = "88" + let l:colour = l:warningcolour else - let s:colour = "darkmagenta" - let s:term88colour = "33" - let s:term256colour = "90" + let l:colour = l:editingcolour endif endif else if b:iainstatus =~# "I" " Regular insert mode. - let s:colour = "darkmagenta" - let s:term88colour = "33" - let s:term256colour = "90" + let l:colour = l:editingcolour endif endif - if &t_Co == 88 - let s:termcolour = s:term88colour - elseif &t_Co == 256 - let s:termcolour = s:term256colour - else - let s:termcolour = s:colour + " Override again if readonly. + if l:colour != l:normalcolour + if getbufvar("", "&ro") + let l:colour = l:readonlycolour + endif endif - exec "highlight StatusLine guifg=white guibg=" . s:colour . " ctermbg=white ctermfg=" . s:termcolour + let l:termcolour = Iain_Colour(l:colour) + + exec "highlight StatusLine gui=bold term=bold cterm=bold guifg=white guibg=" . l:colour . " ctermfg=white ctermbg=" . l:termcolour endfun -call Highlight_StatusLine("") +au Display VimEnter * call Highlight_StatusLine("") + +" Show signs by default. +au Display VimEnter * call Cycle_Signs(0) endif """""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""" @@ -511,7 +896,7 @@ endfun " Find out if any buffer was modified. fun! TabModified(buflist) let l:i = 0 - while i < len(a:buflist) + while l:i < len(a:buflist) if getbufvar(a:buflist[l:i], "&modified") == 1 return "+" endif @@ -562,12 +947,17 @@ endfun se tabline=%!Show_TabLine() se guitablabel=%!Show_GUITabLine() -au CursorHoldI * call Highlight_StatusLine("H") -au CursorMovedI * call Highlight_StatusLine("h") -au FocusGained * call Highlight_StatusLine("F") -au FocusLost * call Highlight_StatusLine("f") -au InsertEnter * call Highlight_StatusLine("I") -au InsertLeave * call Highlight_StatusLine("i") +au StatusLine CursorHoldI * call Highlight_StatusLine("H") +au StatusLine CursorMovedI * call Highlight_StatusLine("h") +au StatusLine FocusGained * call Highlight_StatusLine("F") +au StatusLine FocusLost * call Highlight_StatusLine("f") +au StatusLine InsertEnter * call Highlight_StatusLine("I") +au StatusLine InsertLeave * call Highlight_StatusLine("i") + +if has("signs") + au Signs InsertEnter * call Highlight_Signs() + au Signs InsertLeave * call Highlight_Signs() +endif " Limit the size of the popup menu when completing. se pumheight=20 @@ -593,3 +983,8 @@ se go+=e let g:p4EnableMenu=1 let g:p4Presets='P4CONFIG' endif + +if version >= "500" +" Resize after startup. +au Display VimEnter * call Startup_Resize() +endif