85 lines
1.9 KiB
Plaintext
85 lines
1.9 KiB
Plaintext
let s:so_save = &so | let s:siso_save = &siso | set so=0 siso=0
|
|
argglobal
|
|
setlocal autoindent
|
|
setlocal autoread
|
|
setlocal nobinary
|
|
setlocal bufhidden=
|
|
setlocal buflisted
|
|
setlocal buftype=
|
|
setlocal nocindent
|
|
setlocal cinkeys=0{,0},0),:,0#,!^F,o,O,e
|
|
setlocal cinoptions=
|
|
setlocal cinwords=if,else,while,do,for,switch
|
|
setlocal comments=s1:/*,mb:*,ex:*/,://,b:#,:%,:XCOMM,n:>,fb:-
|
|
setlocal commentstring=/*%s*/
|
|
setlocal complete=.,w,b,u,t,i
|
|
setlocal nocopyindent
|
|
setlocal define=
|
|
setlocal dictionary=
|
|
setlocal nodiff
|
|
setlocal equalprg=
|
|
setlocal errorformat=
|
|
setlocal expandtab
|
|
if &filetype != 'scheme'
|
|
setlocal filetype=scheme
|
|
endif
|
|
setlocal foldcolumn=0
|
|
setlocal foldenable
|
|
setlocal foldexpr=0
|
|
setlocal foldignore=#
|
|
setlocal foldlevel=0
|
|
setlocal foldmarker={{{,}}}
|
|
setlocal foldmethod=manual
|
|
setlocal foldminlines=1
|
|
setlocal foldnestmax=20
|
|
setlocal foldtext=foldtext()
|
|
setlocal formatoptions=tcq
|
|
setlocal grepprg=
|
|
setlocal iminsert=0
|
|
setlocal imsearch=0
|
|
setlocal include=
|
|
setlocal includeexpr=
|
|
setlocal indentexpr=GetSchemeIndent()
|
|
setlocal indentkeys=0{,0},:,0#,!^F,o,O,e
|
|
setlocal noinfercase
|
|
setlocal iskeyword=33,35-39,42-58,60-90,94,95,97-122,126,_
|
|
setlocal keywordprg=
|
|
setlocal nolinebreak
|
|
setlocal lisp
|
|
setlocal nolist
|
|
setlocal makeprg=
|
|
setlocal matchpairs=(:),{:},[:]
|
|
setlocal modeline
|
|
setlocal modifiable
|
|
setlocal nrformats=octal,hex
|
|
setlocal nonumber
|
|
setlocal path=
|
|
setlocal nopreserveindent
|
|
setlocal nopreviewwindow
|
|
setlocal noreadonly
|
|
setlocal noscrollbind
|
|
setlocal shiftwidth=2
|
|
setlocal noshortname
|
|
setlocal nosmartindent
|
|
setlocal softtabstop=0
|
|
setlocal suffixesadd=
|
|
setlocal swapfile
|
|
if &syntax != 'scheme'
|
|
setlocal syntax=scheme
|
|
endif
|
|
setlocal tabstop=8
|
|
setlocal tags=
|
|
setlocal textwidth=68
|
|
setlocal thesaurus=
|
|
setlocal nowinfixheight
|
|
setlocal wrap
|
|
setlocal wrapmargin=0
|
|
silent! normal! zE
|
|
let s:l = 36 - ((30 * winheight(0) + 17) / 35)
|
|
if s:l < 1 | let s:l = 1 | endif
|
|
exe s:l
|
|
normal! zt
|
|
36
|
|
normal! 029l
|
|
let &so = s:so_save | let &siso = s:siso_save
|