" Touched: <20-Sep-03 05:36:48 IST, madhu>. start using vim
source $VIMRUNTIME/vimrc_example.vim
"source $VIMRUNTIME/mswin.vim
"behave mswin
set nocompatible shellslash ignorecase smartcase
set clipboard=autoselect selectmode=mouse guioptions+=Aa go-=T shm+=I
set hi=200 nowb nobk 
set ai lisp sm sw=1
set suffixes+=.lib,.fas, "doesn't work... so.
set wildignore=*.fas,*.lib

autocmd BufRead *.lsp,*.lisp,*.system,*.asd so c:/madhu/VIlisp-2.0/VIlisp.vim
map <F2> aTouched: <<C-R>=strftime("%c")<Esc> IST, madhu><CR><Esc>
"minimize this window and alternate
map <C-W><C-B> <C-W>1_<C-W><C-W>
"misc
imap jj <Esc>
map ; <Esc>:
"easy parens
inoremap [ (
inoremap ] )
inoremap <F8> <Char-91>
inoremap <F9> <Char-93>
"map <C-S> <Esc>/
"imap <C-S> <Esc>/
imap <C-s> :update<cr>
map <C-s> :update
"emacs is your mother"
map <C-x><C-s> <Esc>:update<CR>
imap <C-x><C-s> <Esc>:update<CR>
map <C-x><C-c> <Esc>:wq<CR>
imap <C-x><C-c> <Esc>:wq<CR>
map <C-x>1 <C-w>o
map <C-x>k <C-w>c
map <C-x>b <C-w>r
map <C-x>2 :split<CR>

set diffexpr=MyDiff()
function MyDiff()
  let opt = ''
  if &diffopt =~ 'icase' | let opt = opt . '-i ' | endif
  if &diffopt =~ 'iwhite' | let opt = opt . '-b ' | endif
  silent execute '!C:\MADHU\VIM\VIM62\diff -a ' . opt . '"' . v:fname_in . '" "' . v:fname_new . '" > "' . v:fname_out . '"'
endfunction