528
|
1 " tarPlugin.vim -- a Vim plugin for browsing tarfiles
|
1126
|
2 " Original was copyright (c) 2002, Michael C. Toren <mct@toren.net>
|
4339
|
3 " Modified by Charles E. Campbell
|
528
|
4 " Distributed under the GNU General Public License.
|
|
5 "
|
|
6 " Updates are available from <http://michael.toren.net/code/>. If you
|
|
7 " find this script useful, or have suggestions for improvements, please
|
|
8 " let me know.
|
|
9 " Also look there for further comments and documentation.
|
|
10 "
|
|
11 " This part only sets the autocommands. The functions are in autoload/tar.vim.
|
1126
|
12 " ---------------------------------------------------------------------
|
|
13 " Load Once: {{{1
|
|
14 if &cp || exists("g:loaded_tarPlugin")
|
|
15 finish
|
|
16 endif
|
19099
|
17 let g:loaded_tarPlugin = "v32"
|
1126
|
18 let s:keepcpo = &cpo
|
|
19 set cpo&vim
|
528
|
20
|
1126
|
21 " ---------------------------------------------------------------------
|
|
22 " Public Interface: {{{1
|
557
|
23 augroup tar
|
|
24 au!
|
1624
|
25 au BufReadCmd tarfile::* call tar#Read(expand("<amatch>"), 1)
|
|
26 au FileReadCmd tarfile::* call tar#Read(expand("<amatch>"), 0)
|
|
27 au BufWriteCmd tarfile::* call tar#Write(expand("<amatch>"))
|
|
28 au FileWriteCmd tarfile::* call tar#Write(expand("<amatch>"))
|
528
|
29
|
557
|
30 if has("unix")
|
1624
|
31 au BufReadCmd tarfile::*/* call tar#Read(expand("<amatch>"), 1)
|
|
32 au FileReadCmd tarfile::*/* call tar#Read(expand("<amatch>"), 0)
|
|
33 au BufWriteCmd tarfile::*/* call tar#Write(expand("<amatch>"))
|
|
34 au FileWriteCmd tarfile::*/* call tar#Write(expand("<amatch>"))
|
557
|
35 endif
|
528
|
36
|
2034
|
37 au BufReadCmd *.tar.gz call tar#Browse(expand("<amatch>"))
|
|
38 au BufReadCmd *.tar call tar#Browse(expand("<amatch>"))
|
|
39 au BufReadCmd *.lrp call tar#Browse(expand("<amatch>"))
|
|
40 au BufReadCmd *.tar.bz2 call tar#Browse(expand("<amatch>"))
|
|
41 au BufReadCmd *.tar.Z call tar#Browse(expand("<amatch>"))
|
19099
|
42 au BufReadCmd *.tbz call tar#Browse(expand("<amatch>"))
|
2034
|
43 au BufReadCmd *.tgz call tar#Browse(expand("<amatch>"))
|
|
44 au BufReadCmd *.tar.lzma call tar#Browse(expand("<amatch>"))
|
2426
|
45 au BufReadCmd *.tar.xz call tar#Browse(expand("<amatch>"))
|
|
46 au BufReadCmd *.txz call tar#Browse(expand("<amatch>"))
|
557
|
47 augroup END
|
2034
|
48 com! -nargs=? -complete=file Vimuntar call tar#Vimuntar(<q-args>)
|
528
|
49
|
1126
|
50 " ---------------------------------------------------------------------
|
|
51 " Restoration And Modelines: {{{1
|
|
52 " vim: fdm=marker
|
|
53 let &cpo= s:keepcpo
|
|
54 unlet s:keepcpo
|