Handle uncluttered buffers.
[profile.git] / .vimrc
diff --git a/.vimrc b/.vimrc
index 7ac76ec..3f4fd1d 100644 (file)
--- a/.vimrc
+++ b/.vimrc
@@ -75,12 +75,16 @@ if ! has("gui_running")
   se bg=dark
 endif
 
-" Allow mouse use in a terminal.
-se mouse=nvir
+" 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.
-se updatetime=500
+if has("signs")
+  se updatetime=500
+endif
 
 " Enable tab-completion prompting for commands.
 se wildmenu
@@ -98,19 +102,22 @@ augroup Display
 autocmd!
 augroup Mode
 autocmd!
-augroup Signs
-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.
-if ! exists("oldcols")
-  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=\e[8;%p1%d;%p2%dt
@@ -126,10 +133,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
@@ -153,11 +156,13 @@ fun! Iain_Vars()
   if ! exists("g:iainextracolumns")
     let g:iainextracolumns = 0
   endif
-  if ! exists("g:marksigns")
-    let g:marksigns = 0
-  endif
-  if ! exists("g:firstsign")
-    let g:firstsign = 100
+  if has("signs")
+    if ! exists("g:marksigns")
+      let g:marksigns = 0
+    endif
+    if ! exists("g:firstsign")
+      let g:firstsign = 100
+    endif
   endif
 endfun
 
@@ -248,7 +253,8 @@ fun! Resize_Columns(op, ...)
     let l:columns = a:1
   endif
 
-  let l:resize = "se columns" . a:op . "=" . l:columns
+  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
@@ -258,14 +264,14 @@ fun! Resize_Columns(op, ...)
   " 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 .= " lines+=1"
+    let l:resize = l:resize . " lines=" . (&lines + 1)
   endif
 
-  exec l:resize
+  exe l:resize
 endfun
 
 " Toggle number display.
-fun! Number()
+fun! Number(resize)
   call Iain_Vars()
   let &number = ! &number
 
@@ -281,16 +287,20 @@ 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 Display 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 Mode BufEnter * if &ft == "make" | call MakeMode_map() | endif
@@ -343,7 +353,7 @@ call Mapping("p", ":se paste!<CR>:<CR>")
 " Swap case-sensitivity with \c.
 call Mapping("c", ":call Invert_Case()<CR>:<CR>")
 " Change number mode with \n.
-call Mapping("n", ":call Number()<CR>:<CR>")
+call Mapping("n", ":call Number(1)<CR>:<CR>")
 " Expand or shrink window size with \> and \<.
 call Mapping(">", ":call Resize_Columns('+')<CR>:<CR>")
 call Mapping("<", ":call Resize_Columns('-')<CR>:<CR>")
@@ -356,8 +366,62 @@ map Q <NOP>
 " 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\") . \">\"<CR>")
 
+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 * call Number()
+au Display VimEnter * if ! Uncluttered_Buffer() | call Number(0) | endif
 endif
 
 """"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
@@ -413,8 +477,10 @@ vnoremap * y/\V<C-R>=substitute(escape(@@,"/\\"),"\n","\\\\n","ge")<CR><CR>
 vnoremap # y?\V<C-R>=substitute(escape(@@,"?\\"),"\n","\\\\n","ge")<CR><CR>
 
 " Set mark and update highlighting.
-au Signs BufEnter * call <SID>Highlight_Signs()
-au Signs CursorHold * call <SID>Highlight_Signs()
+if has("signs")
+  au Signs BufEnter * call <SID>Highlight_Signs()
+  au Signs CursorHold * call <SID>Highlight_Signs()
+endif
 
 fun! <SID>Prep_Signs()
   if ! exists("b:signdot") || ! g:marksigns
@@ -491,7 +557,7 @@ fun! <SID>Place_Sign(number, line, old, name)
 endfun
 
 fun! <SID>Highlight_Signs(...)
-  if ! g:marksigns
+  if ! has("signs") || ! g:marksigns || Uncluttered_Buffer()
     return
   endif
 
@@ -521,7 +587,10 @@ fun! <SID>Highlight_Signs(...)
 endfun
 
 " Toggle signs.
-fun! <SID>Cycle_Signs()
+fun! <SID>Cycle_Signs(resize)
+  if ! has("signs")
+    return
+  endif
   call Iain_Vars()
   let g:marksigns = ! g:marksigns
 
@@ -549,7 +618,9 @@ fun! <SID>Cycle_Signs()
     sign define MarkE text=E texthl=MarkSign linehl=MarkLine
     sign define MarkF text=F texthl=MarkSign linehl=MarkLine
 
-    call Resize_Columns("+", 2)
+    if a:resize
+      call Resize_Columns("+", 2)
+    endif
     call <SID>Highlight_Signs()
   else
     exe "sign unplace " . (g:firstsign + 0)
@@ -595,7 +666,9 @@ fun! <SID>Cycle_Signs()
     sign undefine MarkF
 
     call <SID>Prep_Signs()
-    call Resize_Columns("-", 2)
+    if a:resize
+      call Resize_Columns("-", 2)
+    endif
   endif
 endfun
 
@@ -658,7 +731,7 @@ call Mapping("q", ":call Cycle_Quickfix()<CR>:<CR>")
 " updated as a side-effect.
 call Mapping("s", ":filetype detect<CR>:<CR>")
 " Toggle marks with \m.
-call Mapping("m", ":call <SID>Cycle_Signs()<CR>:<CR>")
+call Mapping("m", ":call <SID>Cycle_Signs(1)<CR>:<CR>")
 
 fun! <SID>Iain_Colour(colour)
   if &t_Co == 88
@@ -731,13 +804,13 @@ fun! Highlight_StatusLine(flag)
 
   let l:termcolour = <SID>Iain_Colour(l:colour)
 
-  exec "highlight StatusLine guifg=white guibg=" . l:colour . " ctermfg=white ctermbg=" . l:termcolour
+  exec "highlight StatusLine gui=bold term=bold cterm=bold guifg=white guibg=" . l:colour . " ctermfg=white ctermbg=" . l:termcolour
 endfun
 
 au Display VimEnter * call Highlight_StatusLine("")
 
 " Show signs by default.
-au Display VimEnter * call <SID>Cycle_Signs()
+au Display VimEnter * call <SID>Cycle_Signs(0)
 endif
 
 """"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
@@ -766,7 +839,7 @@ endfun
 " Find out if any buffer was modified.
 fun! <SID>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
@@ -824,8 +897,10 @@ au StatusLine FocusLost * call Highlight_StatusLine("f")
 au StatusLine InsertEnter * call Highlight_StatusLine("I")
 au StatusLine InsertLeave * call Highlight_StatusLine("i")
 
-au Signs InsertEnter * call <SID>Highlight_Signs()
-au Signs InsertLeave * call <SID>Highlight_Signs()
+if has("signs")
+  au Signs InsertEnter * call <SID>Highlight_Signs()
+  au Signs InsertLeave * call <SID>Highlight_Signs()
+endif
 
 " Limit the size of the popup menu when completing.
 se pumheight=20
@@ -851,3 +926,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