Mercurial > vim
diff runtime/autoload/zip.vim @ 568:db92c5cc4f66
updated for version 7.0161
author | vimboss |
---|---|
date | Mon, 28 Nov 2005 23:01:53 +0000 |
parents | 862863033fdd |
children | bd2fe62c9d77 |
line wrap: on
line diff
--- a/runtime/autoload/zip.vim +++ b/runtime/autoload/zip.vim @@ -1,7 +1,7 @@ " zip.vim: Handles browsing zipfiles " AUTOLOAD PORTION -" Date: Nov 14, 2005 -" Version: 4 +" Date: Nov 28, 2005 +" Version: 5 " Maintainer: Charles E Campbell, Jr <drchipNOSPAM at campbellfamily dot biz> " License: Vim License (see vim's :help license) " Copyright: Copyright (C) 2005 Charles E. Campbell, Jr. {{{1 @@ -22,7 +22,7 @@ if exists("g:loaded_zip") finish endif -let g:loaded_zip= "v4" +let g:loaded_zip= "v5" " ---------------- " Functions: {{{1 @@ -32,11 +32,14 @@ let g:loaded_zip= "v4" " zip#Browse: {{{2 fun! zip#Browse(zipfile) " call Dfunc("zip#Browse(zipfile<".a:zipfile.">)") + let repkeep= &report + set report=10 " sanity checks if !executable("unzip") echohl Error | echo "***error*** (zip#Browse) unzip not available on your system" call inputsave()|call input("Press <cr> to continue")|call inputrestore() + let &report= repkeep " call Dret("zip#Browse") return endif @@ -46,6 +49,7 @@ fun! zip#Browse(zipfile) echohl Error | echo "***error*** (zip#Browse) File not readable<".a:zipfile.">" | echohl None call inputsave()|call input("Press <cr> to continue")|call inputrestore() endif + let &report= repkeep " call Dret("zip#Browse : file<".a:zipfile."> not readable") return endif @@ -77,6 +81,7 @@ fun! zip#Browse(zipfile) setlocal noma nomod ro noremap <silent> <buffer> <cr> :call <SID>ZipBrowseSelect()<cr> + let &report= repkeep " call Dret("zip#Browse") endfun @@ -84,16 +89,20 @@ endfun " ZipBrowseSelect: {{{2 fun! s:ZipBrowseSelect() " call Dfunc("ZipBrowseSelect() zipfile<".w:zipfile."> curfile<".expand("%").">") + let repkeep= &report + set report=10 let fname= getline(".") " sanity check if fname =~ '^"' + let &report= repkeep " call Dret("ZipBrowseSelect") return endif if fname =~ '/$' echohl Error | echo "***error*** (zip#Browse) Please specify a file, not a directory" | echohl None call inputsave()|call input("Press <cr> to continue")|call inputrestore() + let &report= repkeep " call Dret("ZipBrowseSelect") return endif @@ -110,6 +119,7 @@ fun! s:ZipBrowseSelect() exe "e zipfile:".zipfile.':'.fname filetype detect + let &report= repkeep " call Dret("ZipBrowseSelect : s:zipfile_".winnr()."<".s:zipfile_{winnr()}.">") endfun @@ -117,6 +127,9 @@ endfun " zip#Read: {{{2 fun! zip#Read(fname,mode) " call Dfunc("zip#Read(fname<".a:fname.">,mode=".a:mode.")") + let repkeep= &report + set report=10 + let zipfile = substitute(a:fname,'zipfile:\(.\{-}\):.*$','\1','') let fname = substitute(a:fname,'zipfile:.\{-}:\(.*\)$','\1','') " call Decho("zipfile<".zipfile."> fname<".fname.">") @@ -127,6 +140,7 @@ fun! zip#Read(fname,mode) 0d set nomod + let &report= repkeep " call Dret("zip#Read") endfun @@ -134,17 +148,21 @@ endfun " zip#Write: {{{2 fun! zip#Write(fname) " call Dfunc("zip#Write(fname<".a:fname.") zipfile_".winnr()."<".s:zipfile_{winnr()}.">") + let repkeep= &report + set report=10 " sanity checks if !executable("zip") echohl Error | echo "***error*** (zip#Write) sorry, your system doesn't appear to have the zip pgm" | echohl None call inputsave()|call input("Press <cr> to continue")|call inputrestore() + let &report= repkeep " call Dret("zip#Write") return endif if !exists("*mkdir") echohl Error | echo "***error*** (zip#Write) sorry, mkdir() doesn't work on your system" | echohl None call inputsave()|call input("Press <cr> to continue")|call inputrestore() + let &report= repkeep " call Dret("zip#Write") return endif @@ -164,6 +182,7 @@ fun! zip#Write(fname) catch /^Vim\%((\a\+)\)\=:E344/ echohl Error | echo "***error*** (zip#Write) cannot cd to temporary directory" | Echohl None call inputsave()|call input("Press <cr> to continue")|call inputrestore() + let &report= repkeep " call Dret("zip#Write") return endtry @@ -220,6 +239,7 @@ fun! zip#Write(fname) exe "cd ".escape(curdir,' \') setlocal nomod + let &report= repkeep " call Dret("zip#Write") endfun