vnoremap r i|

" Personal Vim _vimrc settings for Øystein Bech "DreymaR" Gadmar
" To use, put this file into Vim/GVim's top dir ($VIM)
"-------------------------------------------------------------------------------

" Various settings, some non-default in colemak.vim and some others
set noinsertmode        " we want to start in normal mode unlike, e.g., cream
set noswapfile            " don't make a .swp file (especially when running portably)
"set backup            " do keep a '~' backup file though
set nobackup            " don't keep a '~' backup file (especially when running portably)
set lazyredraw            " don't redraw screen during macros and other non-typed commands
set ignorecase            " ignore case in patterns...
set smartcase            " ...except for mixed or upper case
set autoindent            " Enter opens new lines at the same indent level
set ruler            " show the cursor position all the time
set incsearch            " Display the match for a search pattern when halfway typing it
set backspace=indent,eol,start    " Allow backspacing over autoindents, linebreaks and insert start

if has("gui_running")
    source $VIMRUNTIME/mswin.vim
"    behave mswin        " make the mouse behave like a Windows mouse (not xterm) - included in mswin.vim
    set guifont=lucida_console:h09
    "colorscheme evening
    colorscheme darkblue
    "colorscheme ron
    highlight Normal guibg=#001122
    "highlight LineNr ctermfg=darkcyan guifg=darkcyan
    "highlight Comment ctermfg=green guifg=#66ff00
    "highlight Statement ctermfg=yellow gui=bold guifg=#ffcc33
    winpos 30 0
    set lines=56        " Fits an 1152x864 screen resolution
    set columns=157
    set showcmd        " Display an incomplete command in the lower right corner of the Vim window
    set number        " display line numbers
    set hlsearch        " highlight search patterns
    set showtabline=2    " always show tab page labels
endif

"-------------------------------------------------------------------------------

mapc    " Clear all old mappings, if any
"if has("gui_running") | source $VIMRUNTIME/mswin.vim | endif    " mswin is run above already

" This one isn't working! Not done in mswin but in the source somewhere, <Tab> and <Ctrl-I> become synonyms...
" It seems to be because CTRL-I is a synonym to <Tab> in the Jump command, which is "hardcoded"?
"unmap <C-i>

"-------------------------------------------------------------------------------

source $VIM/colemak.vim        " Use this line if colemak.vim is in Vim's top dir ($VIM)
"source $VIM/../../Data/settings/colemak.vim    " Use this line for GVimPortable

" Show the colemak.vim helpscreen in a read-only window split
" You could insert this in your _vimrc, and navigate with C-r u/e and -/_.
"if winnr($) > 1 | wincmd o | endif
"17sview $VIM/cmkscr.vim
":wincmd w

" To get the Colemak help screen, type :ars and hit Enter - to close it (and other windows...) use :sra
cnoreabbr <expr> ars (getcmdtype() . getcmdline() != ':ars' ? 'ars' : 'source $VIM/cmkscr.vim')
cnoreabbr <expr> sra (getcmdtype() . getcmdline() != ':sra' ? 'sra' : 'wincmd o')

"-------------------------------------------------------------------------------

" Unresolved mappings in colemak.vim (per 080421):

" End of word forwards/backwards
"nnoremap ; e|xnoremap ; e|onoremap ; e|
"nnoremap g; ge|xnoremap g; ge|onoremap g; ge|
nnoremap gy e|xnoremap gy e|onoremap gy e|
nnoremap gl ge|xnoremap gl ge|onoremap gl ge|
nnoremap gY E|xnoremap gY E|onoremap gY E|
nnoremap gL gE|xnoremap gL gE|onoremap gL gE|
" I don't want to lose the hol/eol trick, and the C-n/i keys don't work (yet?)!
"nnoremap <C-y> e|xnoremap <C-y> e|onoremap <C-y> e|
"nnoremap <C-l> ge|xnoremap <C-l> ge|onoremap <C-l> ge|

" Window sizes, folds, etc. - the whole range of 'z' commands!
noremap , z|

" Fuller i>r remapping (fun to select inner in v-mode; but a(ll) doesn't work...)
vnoremap r i|

" Substitute
nnoremap gs S|xnoremap gs S|

" Mappings in colemak.vim (per 080421) that I want to change:

" Home/end of line
" If I use C-n, I have to move the Autocomplete function?!
"nnoremap <C-n> ^|xnoremap <C-n> ^|onoremap <C-n> ^|
" Because of the synonym effect, (i)noremap <C-i> messes up <Tab>!
"nnoremap <C-i> $|xnoremap <C-i> $|onoremap <C-i> $|
"inoremap <C-n> <Home>|cnoremap <C-n> <Home>|
"inoremap <C-i> <End>|cnoremap <C-i> <End>|
nnoremap <C-l> ^|xnoremap <C-l> ^|onoremap <C-l> ^|
nnoremap <C-y> $|xnoremap <C-y> $|onoremap <C-y> $|
inoremap <M-L> <Home>|cnoremap <M-L> <Home>|
inoremap <M-Y> <End>|cnoremap <M-Y> <End>|

" 2PageUp/2PageDown - may not be enough C-mappings for this (we want Eof/Bof!)
"nnoremap <silent> <expr> <C-j> (winheight(0)*2) . "\<C-u>"
"nnoremap <silent> <expr> <C-h> (winheight(0)*2) . "\<C-d>"
"xnoremap <silent> <expr> <C-j> (winheight(0)*2) . "\<C-u>"
"xnoremap <silent> <expr> <C-h> (winheight(0)*2) . "\<C-d>"
cnoremap <M-j> <PageUp>|
cnoremap <M-h> <PageDown>|

" Half page up/down - this may be the most useful page function?
nnoremap <silent> <expr> j (winheight(0)/2) . "\<C-u>"
nnoremap <silent> <expr> h (winheight(0)/2) . "\<C-d>"
vnoremap <silent> <expr> j (winheight(0)/2) . "\<C-u>"
vnoremap <silent> <expr> h (winheight(0)/2) . "\<C-d>"
inoremap <silent> <expr> <M-j> "\<C-o>" . (winheight(0)/2) . "\<C-u>"
inoremap <silent> <expr> <M-h> "\<C-o>" . (winheight(0)/2) . "\<C-d>"

" WORD left/right is brought back on shift-word keys
noremap L B|
noremap Y W|

" Cursor position jumplist
unmap (
unmap )
nnoremap <C-[> <C-o>|
nnoremap <C-]> <C-i>|
" The following remapping isn't working?!
"nnoremap <C-,> <C-o>|
"nnoremap <C-.> <C-i>|

" No longer map ; to : as I'm using a layout with unshifted colon.
nunmap ;|xunmap ;|

"Might as well bring Ex mode back in style from the exile over at Q.
noremap g: Q|

" Open new commands in a new Tab - but we also want the old way accessible!
"cnoreabbr <expr> h  (getcmdtype() . getcmdline() != ':h'  ? 'h'  : 'help')
cnoreabbr <expr> he (getcmdtype() . getcmdline() != ':he' ? 'he' : 'help')
"cnoreabbr <expr> e  (getcmdtype() . getcmdline() != ':e'  ? 'e'  : 'edit' )
cnoreabbr <expr> ed (getcmdtype() . getcmdline() != ':ed' ? 'ed' : 'edit' )

" (GUI) Start/end of document
"nnoremap <C--> gg0|xnoremap <C--> gg0|snoremap <C--> <C-Home><Home>|
"nnoremap <C-_> G$|xnoremap <C-_> G$|snoremap <C-_> <C-End><End>|

" (GUI) Move cursor to top/bottom/middle of screen
nnoremap J H|vnoremap J H|inoremap <M-J> <C-o>H|
nnoremap H L|vnoremap H L|inoremap <M-H> <C-o>L|
nnoremap G M|vnoremap G M|inoremap <M-G> <C-o>M|

" Join/Merge lines
nnoremap M J|vnoremap M J|inoremap <M-M> <C-o>J|

" (GUI) Scroll in place
nnoremap <C-u> <C-y>|inoremap <C-u> <C-o><C-y>|
nnoremap <C-e> <C-e>|inoremap <C-e> <C-o><C-e>|

" (GUI) Tabs need to work in ic modes too?
" Not sure whether this is working as intended!!!
noremap <silent> <C-S-Tab> :<C-u>tabprev<CR>|inoremap <silent> <C-o><C-S-Tab> :<C-u>tabprev<CR>|cnoremap <silent> <C-o><C-S-Tab> :<C-u>tabprev<CR>|
noremap <silent> <C-Tab> :<C-u>tabnext<CR>|inoremap <silent> <C-o><C-Tab> :<C-u>tabnext<CR>|cnoremap <silent> <C-o><C-Tab> :<C-u>tabnext<CR>|

" Get back the <C-d> functionality for the command line (no Delete)?
cunmap <C-d>

" New/close/save is <C-Q> (no more needed for Visual Block mode!)
noremap <silent> <C-q> :<C-u>call CloseWindow()<CR>|
inoremap <silent> <C-q> <C-o>:<C-u>call CloseWindow()<CR>|cnoremap <silent> <C-q> <C-c>:<C-u>call CloseWindow()<CR>|

" Window handling: <C-w> is now no longer <C-r>! We won't have to remap more than necessary this way.
unmap <C-w>
unmap! <C-w>
unmap <C-r>
" <C-r><C-r> - open a new window
unmap <C-r><C-r>
unmap <C-r>n
unmap <C-r>u
unmap <C-r>e
unmap <C-r>i
" <C-w><C-t> opens a new window - analoguous to the Tabs
nnoremap <C-w><C-t> <C-w>n|xnoremap <C-w><C-t> <C-w>n|
nnoremap <C-w>n <C-w>h|xnoremap <C-w>n <C-w>h| 
nnoremap <C-w>u <C-w>k|xnoremap <C-w>u <C-w>k| 
nnoremap <C-w>e <C-w>j|xnoremap <C-w>e <C-w>j| 
nnoremap <C-w>i <C-w>l|xnoremap <C-w>i <C-w>l| 

" Todo: C-p/C-i/C-m/C-n???

"+----------+----------+----------+----------+----------+----------+----------+----------+----------+----------+----------+----------+----------+
"|          |          |          |          |          |          |          |          |          |          |          |          |          |
"|~ Case    |! ExtFlt> |@ PlyMcr· |#  <-=    |$  ->|    |% GoMatch |^  <--    |& Rep :s  |*  =->    |( |<-Sent |) Sent->| |_ LastLin |+ NextLin |
"|` Go Mk·  |1         |2         |3         |4         |5         |6         |7         |8         |9         |0  |<-    |- TopLine |= Format> |
"+----------+----------+----------+----------+----------+----------+----------+----------+----------+----------+----------+----------+----------+
"|  NextTab |  Close   |  WinCmd  |  GUIFind |  =<Up>?  |  FileInf |  Bof!    |   <--    |    ?     |   ->|    |          |  <-Jump  |  Jump->  |
"|<TAB>     |Q PlyMcrQ |W Warp->| |F <-Find· |P <-Prch· |G ScrMid  |J ScrTop  |L <-WORD  |U  5Up    |Y WORD->  |; z-Cmd·  |{ |<-Para |} Para->| |
"|<ESC>     |  RecMcr· |  Warp >  |  Find·-> |  Prch·-> |  g-Cmd·  |  1/2PgUp |  <-word  |    Up    |  word->  |: ExLine  |[ <-Misc· |] Misc·-> |
"+----------+----------+----------+----------+----------+----------+----------+----------+----------+----------+----------+----------+----------+
"           |  AreaAll |  Redo?   |  Save    |  NewTab  |  DelWord |  Eof!    |  =<Dn>?  |  1/2PgDn |  =<Tab>? |  GUIOpen |          |          |
"Ctrl+:     |A AreaLin |R RepMode |S |<-Ins  |T Att->|  |D Del->|  |H ScrBot  |N 5Left   |E  5Dn    |I 5Right  |O OpenUp  |" SetReg· || GoCol1  |
"Up/Dn scrl |  Area    |  Replce· |  InSert  |  ATtach  |  Delete> |  1/2PgDn |   Left   |    Dn    |   Right  |  OpenDn  |' GoMk·|< |\ (usr)·  |
"PgUp/Dn HL +----------+----------+----------+----------+----------+----------+----------+----------+----------+----------+----------+----------+
"           |  Undo?   |  ClpCtLn |  ClpCpLn |  ClipIns |  VisBlok |  Digraph |  <Entr>? |          |          |          |
"           |Z Redo    |X CutLine |C CopyLin |V <-Paste |B RevPpFf |K <-Next§ |M MidScr? |< <-Indnt |> Indnt-> |? <-Find§ |    · = char arg.
"           |  Undo    |  Cut >   |  Copy >  |  Paste-> |  RepPpFf |  Next§-> |  Set Mk· |, (usr)·  |. Repeat  |/ Find§-> |    > = move arg.
"           +----------+----------+----------+----------+----------+----------+----------+----------+----------+----------+
"
"Quick colemak.vim helpscreen - DreymaR, 0809                                                                                       [columns=149]
"
"Legend: |<- <-- ->| bol/hol/eol; Mk mark; Flt filter; Mcr macro; Reg register; = same/ident.; § pattern; Warp change; Area visual; 'Pr(oa)ch 'till.
"NB: Please understand that this sheet cannot possibly cover everything. It's pretty much mode naïve and modes are everything, for instance.
"    Luckily, one idea in colemak.vim is to make functionality more consistent over multiple modes (although you may have to use Meta/Alt!).
"Notes: Some keys (sXUQK) are now available as g-commands. Ctrl-Shift-Up/Dn swaps lines. Use r(educed) for i(nner). A count may be used with - _ G |.
"Changes: M JHG jh ; LY C-ly , C-[] C-q C-w () C-ue abbreviations (he ed ars). These are changed relative to colemak.vim (per 080421).
"
"
"Missing: Ctrl-D in x (show alternatives)?, C-T (tag stack)?, eE, sS, -_,
"Problem: Some C-mappings are "hard-coded" synonyms that cannot be remapped?! <C-i>=<Tab> (can be handy?); <C-m>=<Enter> etc.?
"
" Show the colemak.vim helpscreen in a read-only window split. You could source this from your _vimrc, and navigate with, e.g., C-w u/e and -/_.
17sview $VIM/cmkscr.vim
wincmd w
"

def python_function(foo, bar):
   """ Some docstring for the function """
   ...code

+   def python_function(foo, bar): Some docstring for the function

set ignorecase
set smartcase
set gdefault
set hlsearch        " highlight search patterns
set incsearch        " enable incremental search

#ifvim
set nocompatible    " make Vim behave in a more useful way
set hidden              " Allow hiding of non-saved buffers
set lazyredraw        " don't redraw screen while executing macros/mappings
set ruler        " show the cursor position all the time
set showcmd        " display incomplete commands
set virtualedit=block    " allow virtual editing in Visual block mode
set backspace=indent,eol,start  " allow backspacing over everything in insert mode

set scrolloff=10        " Number of rows before edge of screen
set nostartofline    " keep cursor in the same column if possible
set whichwrap=b,s,[,],<,>,h,l " allow cursor to wrap between lines
set nowrap

set nobackup
set dir=c:/temp      " Set swap file directory

set shortmess=AatI       " Get rid of 'press ENTER to...' message
set statusline=%<%F%m%r%h%w\ %y\ \ %{strftime(\"%c\",getftime(expand(\"%:p\")))}%=\ line:%04l\/%04L\ col:%3c\ ascii:%3b
set laststatus=2

filetype plugin on
filetype indent on
#endif




"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
"
" Keyboard maps
"


" Q
nnoremap q q|       " Record macro
nnoremap Q @q|      " Macros (replay the macro recorded by qq)

" W
nnoremap w "_c|     " Change  
vnoremap w "_c
nnoremap W "_C|     " Change until end of line  
onoremap w iw|      " inner word

" F
nnoremap f f|       " Find next char on line
onoremap f t|       " But delete to instead of to and including

" P
noremap p ;|        " Repeat last f, t
noremap P ,

" G
nnoremap g g|       " Go to

" ----------------------------------------------

" A
nnoremap a V|       " Visual line mode
nnoremap A v|       " Visual mode

" R
nnoremap r r|       " Replace

" S
nnoremap s i|       " Insert mode
nnoremap S I|       " Insert at beginning of line
vnoremap s I|       " Block insert

" T
nnoremap t a|       " Append
nnoremap T A|       " Append to end of line
vnoremap t A|       " Block append

" D
nnoremap d d|       " Delete

" ----------------------------------------------

" Z
nnoremap z u|       " Undo
nnoremap Z <C-r>|   " Redo   
nnoremap <C-z> u

" X
nnoremap x "_x|     " Delete char into black hole  
vnoremap x "_x
nnoremap <C-x> "*dd|" Cut into clipboard       

" C
nnoremap c y|       " Copy
onoremap c y
vnoremap c y
nnoremap C y$
nnoremap <C-c> "*Y| " Copy into clipboard      
cnoremap <C-c> <C-y>

" V
nnoremap v p|       " Paste
nnoremap V P
nnoremap <C-v> "*p| " Paste into clipboard      
inoremap <C-v> <c-r>"
cnoremap <C-v> <C-r>

" B
#ifvim
nnoremap b %|       " Match brace
onoremap b %
#endif


" ----------------------------------------------
" ----------------------------------------------

" J
#ifvim
nnoremap j :call SwapParams("forwards")<cr>
#endif

" L
noremap l b|       " Word left 
noremap L zk
nnoremap + zr|     " Open more folds

" U
nnoremap u k|       " Up 
vnoremap u k
nnoremap U 5k|      " 5*Up   
vnoremap U 5k

" Y
noremap y w|       " Word right 
noremap Y zj

" ----------------------------------------------

" H
nnoremap h za|     " Toggle fold
nnoremap H zR|     " Turn off all folds
nnoremap <c-h> zt  " Scroll cursor to top (minus scrolloff)

" N
nnoremap n h|      " Left  
vnoremap n h
noremap N ^|       " Start of line 
inoremap <C-n> <C-p>| " Word completion

" E
nnoremap e j|      " Down  
vnoremap e j
nnoremap E 5j|     " 5*Down   
vnoremap E 5j 
" map ( prev-function

" I
nnoremap i l|      " Right  
vnoremap i l
noremap I $|       " End of line 
" map ) next-function

" Indentation text motion
#ifvim
omap ii iB
omap ai aB
#endif

" O
nnoremap o o|      " Open new line  

" '

" ----------------------------------------------

" K
nnoremap k n|      " Search next  
nnoremap K N|      " Search prev  

" M
nnoremap m /|      " Search
nnoremap M ?|      " Search backward  
nnoremap - zm|     " Close more folds

" ,
#ifvim
let mapleader = ","
let g:mapleader = ","
#endif

" .
nnoremap . .|      " Repeat command  

" ----------------------------------------------
" ----------------------------------------------

" Backspace
inoremap <C-BS> <C-w>|  " Insert mode delete word backwards

" Space
nnoremap <space> 10j|       " Page down
nnoremap <s-space> 10k|     " Page up

" Esc
nnoremap <Esc> <Esc>:nohlsearch<bar>pclose<CR>

" Return
nnoremap <CR> i<CR><Esc>



"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
"
" Indentation
"
#ifvim
set tabstop=4           " Tabs size
set shiftwidth=4
set softtabstop=4       " To make backspace erase tabs
set expandtab
set smartindent

function! Sub(word, sub)
    execute '%s/\<' . a:word . '\>/' . a:sub
endfunction

#endif

"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
"
" Leader commands
"
#ifvim

" Save file
nnoremap <leader>s :w<CR>
" Quit
nnoremap <leader>q :q<CR>

#endif




"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
"
" Python
"
#ifvim
#endif



"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
"
" Plugins
"
#ifvim

" MiniBufExplorer
let g:miniBufExplModSelTarget = 1
let g:miniBufExplorerMoreThanOne = 0
let g:miniBufExplModSelTarget = 0
let g:miniBufExplUseSingleClick = 1
let g:miniBufExplMapWindowNavVim = 1
let g:miniBufExplVSplit = 25
let g:miniBufExplSplitBelow=1

" FuzzyFileFinder
nnoremap <leader>t :FuzzyFinderRemoveCache<CR>:FuzzyFinderFile <C-r>=expand('%:p:h').'\'<CR><CR>
nnoremap <leader>d :FuzzyFinderBuffer<CR>
let g:FuzzyFinderOptions.Base.key_open = '<CR>'
let g:FuzzyFinderOptions.Base.key_open_split = '<C-s>'
let g:FuzzyFinderOptions.Base.key_open_vsplit = '<C-v>'
let g:FuzzyFinderOptions.Base.key_open_tab = '<C-t>'
let g:FuzzyFinderOptions.Base.key_ignore_case = '<C-c>'

#endif

"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
"
" Buffer/window/tab management
"
#ifvim

" Window management
nnoremap <c-n> <c-w>W|             " Window prev
nnoremap <c-i> <c-w>w|             " Window next
nnoremap <leader>wv <c-w><c-v>|    " Window split vertical
nnoremap <leader>ws <c-w><c-s>|    " Window split horizontal
nnoremap <leader>wn <c-w><c-h>|    " Window left
nnoremap <leader>wi <c-w><c-l>|    " Window right
nnoremap <leader>wu <c-w><c-j>|    " Window up
nnoremap <leader>we <c-w><c-k>|    " Window down
nnoremap <leader>wo <c-w><c-o>|    " Make only window
nnoremap <leader>wd <c-w><c-c>|    " Close window
nnoremap <leader>wf <c-w><c-f>|    " Edit file under cursor in new window

" Tab management
"nnoremap <leader>tn :tabp<CR>|     " Prev tab
"nnoremap <leader>ti :tabn<CR>|     " Next tab
"nnoremap <leader>tw :tabclose<CR>| " Close tab

" Buffer management
nnoremap <leader>bd :Bclose<CR>|   " Close buffer

" Don't close window, when deleting a buffer
command! Bclose call <SID>BufcloseCloseIt()

function! <SID>BufcloseCloseIt()
   let l:currentBufNum = bufnr("%")
   let l:alternateBufNum = bufnr("#")

   if buflisted(l:alternateBufNum)
     buffer #
   else
     bnext
   endif

   if bufnr("%") == l:currentBufNum
     new
   endif

   if buflisted(l:currentBufNum)
     execute("bdelete! ".l:currentBufNum)
   endif
endfunction

#endif


"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
"
" Appearance
"
#ifvim
set gfn=Consolas:h10:cANSI
set antialias
set lines=9999 columns=9999
set background=dark
set guioptions-=T
set guioptions-=m
colors peaksea


"
"  Folding appearance
"

python << EOF
import re
import vim

def compile_regexp():
    l = []
    l.append(r'"""(?P<id>.*)"""')        # python_docstring
    l.append(r'"""(?P<id>.*)')           # python_docstring
    l.append(r'#(?P<id>.*)')             # python_comment
    l.append(r'/\*+!?(?P<id>.*?)!?\*+/') # c_singleline_comment, doxygen support
    l.append(r'/\*+!?(?P<id>.*)')        # c_multiline_comment, doxygen support
    l.append(r'//+!?(?P<id>.*)')         # cpp_comment, doxygen support
    l = [r'\s*' + c for c in l]

    global regexp_list
    regexp_list = [re.compile(regexp) for regexp in l]


def match_line(firstline):
    for regexp in regexp_list:
        match = re.match(regexp, firstline)
        if match is not None:
            if match.group('id') is not None:
                return match.group('id').strip()
    return ''

def get_indent_level(line, tabspaces):
    indent = 0
    for c in line:
        if c == ' ': indent += 1
        elif c == '\t': indent += tabspaces
        else: break
    return indent

def indent(line, level):
    return line.rjust(len(line) + level)

def get_fold_str(ibegin, iend):
    ibegin -= 1     # Make sane range
    ret =  ''.join([str(iend - ibegin), ' lines: ',
                    match_line(vim.current.buffer[ibegin]), ' '
                   ])
    ret = ret.replace('"', r'\"')

    tabspace = 4
    level = get_indent_level(vim.current.buffer[ibegin-1], tabspace)
    ret = '+' + indent(ret, level + tabspace - 1)
    return ret

def get_fold_str(ibegin, iend):
    ibegin -= 1     # Make sane range
    line = vim.current.buffer[ibegin]
    ret = '%s {%d lines} %s' % (line.strip(), iend - ibegin, 
                                match_line(vim.current.buffer[ibegin+1]))

    tabspace = 4
    level = get_indent_level(line, tabspace)
    prefix = '+'
    ret = prefix + indent(ret, level - len(prefix))
    return ret

compile_regexp()
EOF

set foldlevel=1
set fillchars="fold: "          " No fill character
set foldtext=FoldText()
set foldcolumn=0
function FoldText()
python << EOF
istart = int(vim.eval('v:foldstart'))
iend = int(vim.eval('v:foldend'))
vim.command('return ' + '"' + get_fold_str(istart, iend) + '"')
EOF
endfunction

#endif