vim tabline

.vimrc_tabline

if exists("+showtabline")
     function! MyTabLine()
         let s = ''
         let t = tabpagenr()
         let i = 1
         while i <= tabpagenr('$')
             let buflist = tabpagebuflist(i)
             let winnr = tabpagewinnr(i)
             let s .= (i != 1 ? '%#TabLine# | ' : '')
             let s .= (i == t ? '%#TabLineSel#' : '%#TabLine#')
             let s .= ' '
             let file = substitute(simplify(bufname(buflist[winnr - 1])), $HOME, '~', '')
             if file == ''
                 let file = '[No Name]'
             endif
             let s .= (getbufvar(buflist[winnr - 1], "&mod") ? '*' : '')
             let s .= file
             let s .= ' '
             let i = i + 1
         endwhile
         let s .= '%T%#TabLineFill#%='
         return s
     endfunction

     set stal=2
     set tabline=%!MyTabLine()
endif