1 files changed, 128 insertions, 0 deletions
diff --git a/vim/bundle/tlib_vim/autoload/tlib/win.vim b/vim/bundle/tlib_vim/autoload/tlib/win.vim
new file mode 100755
index 0000000..4963af1
--- /dev/null
+++ b/vim/bundle/tlib_vim/autoload/tlib/win.vim
@@ -0,0 +1,128 @@
+" @Author:      Tom Link (micathom AT gmail com?subject=[vim])
+" @Website:     http://www.vim.org/account/profile.php?user_id=4037
+" @License:     GPL (see http://www.gnu.org/licenses/gpl.txt)
+" @Revision:    55
+
+
+" Return vim code to jump back to the original window.
+function! tlib#win#Set(winnr) "{{{3
+    if a:winnr > 0
+        " TLogVAR a:winnr
+        " TLogDBG winnr()
+        " TLogDBG string(tlib#win#List())
+        if winnr() != a:winnr && winbufnr(a:winnr) != -1
+            let rv = winnr().'wincmd w'
+            exec a:winnr .'wincmd w'
+            " TLogVAR rv
+            " TLogDBG string(tlib#win#List())
+            return rv
+        endif
+    endif
+    return ''
+endf
+ 
+
+" :def: function! tlib#win#GetLayout(?save_view=0)
+function! tlib#win#GetLayout(...) "{{{3
+    TVarArg ['save_view', 0]
+    let views = {}
+    if save_view
+        let winnr = winnr()
+        windo let views[winnr()] = winsaveview()
+        " for w in range(1, winnr('$'))
+        "     call tlib#win#Set(w)
+        "     let views[w] = winsaveview()
+        " endfor
+        call tlib#win#Set(winnr)
+    endif
+    return {'winnr': winnr('$'), 'winrestcmd': winrestcmd(), 'views': views, 'cmdheight': &cmdheight, 'guioptions': &guioptions, 'tabpagenr': tabpagenr()}
+endf
+
+
+function! tlib#win#SetLayout(layout) "{{{3
+    if a:layout.tabpagenr == tabpagenr() && a:layout.winnr == winnr('$')
+        " TLogVAR a:layout.winrestcmd
+        " TLogDBG string(tlib#win#List())
+        exec a:layout.winrestcmd
+        if !empty(a:layout.views)
+            let winnr = winnr()
+            " TLogVAR winnr
+            for [w, v] in items(a:layout.views)
+                " TLogVAR w, v
+                call tlib#win#Set(w)
+                call winrestview(v)
+            endfor
+            call tlib#win#Set(winnr)
+        endif
+        if a:layout.cmdheight != &cmdheight
+            let &cmdheight = a:layout.cmdheight
+        endif
+        " TLogDBG string(tlib#win#List())
+        return 1
+    endif
+    return 0
+endf
+
+
+function! tlib#win#List() "{{{3
+    let wl = {}
+    for wn in range(1, winnr('$'))
+        let wl[wn] = bufname(winbufnr(wn))
+    endfor
+    return wl
+endf
+
+
+" " :def: function! tlib#win#GetLayout1(?save_view=0)
+" " Contrary to |tlib#win#GetLayout|, this version doesn't use 
+" " |winrestcmd()|. It can also save windows views.
+" function! tlib#win#GetLayout1(...) "{{{3
+"     TVarArg ['save_view', 0]
+"     let winnr = winnr()
+"     let acc = {}
+"     for w in range(1, winnr('$'))
+"         let def = {'h': winheight(w), 'w': winwidth(w)}
+"         if save_view
+"             call tlib#win#Set(w)
+"             let def.view = winsaveview()
+"         endif
+"         let acc[w] = def
+"     endfor
+"     call tlib#win#Set(winnr)
+"     return acc
+" endf
+" 
+" 
+" " Reset layout from the value of |tlib#win#GetLayout1|.
+" function! tlib#win#SetLayout1(layout) "{{{3
+"     if len(a:layout) != winnr('$')
+"         return 0
+"     endif
+"     let winnr = winnr()
+"     for [w, def] in items(a:layout)
+"         if tlib#win#Set(w)
+"             exec 'resize '. def.h
+"             exec 'vertical resize '. def.w
+"             if has_key(def, 'view')
+"                 call winrestview(def.view)
+"             endif
+"         else
+"             break
+"         endif
+"     endfor
+"     call tlib#win#Set(winnr)
+"     return 1
+" endf
+
+
+function! tlib#win#Width(wnr) "{{{3
+    return winwidth(a:wnr) - &fdc
+endf
+
+
+function! tlib#win#WinDo(ex) "{{{3
+    let w = winnr()
+    exec 'windo '. a:ex
+    exec w .'wincmd w'
+endf
+