0
0
mirror of https://github.com/vim/vim.git synced 2025-07-26 11:04:33 -04:00

updated for version 7.0161

This commit is contained in:
Bram Moolenaar 2005-11-28 23:05:55 +00:00
parent 36c31f71ad
commit bba577a242
5 changed files with 42 additions and 89 deletions

View File

@ -1,7 +1,7 @@
" tar.vim: Handles browsing tarfiles " tar.vim: Handles browsing tarfiles
" AUTOLOAD PORTION " AUTOLOAD PORTION
" Date: Nov 18, 2005 " Date: Nov 28, 2005
" Version: 4 " Version: 5
" Maintainer: Charles E Campbell, Jr <drchipNOSPAM at campbellfamily dot biz> " Maintainer: Charles E Campbell, Jr <drchipNOSPAM at campbellfamily dot biz>
" License: Vim License (see vim's :help license) " License: Vim License (see vim's :help license)
" "
@ -24,7 +24,7 @@ set cpo&vim
if exists("g:loaded_tar") if exists("g:loaded_tar")
finish finish
endif endif
let g:loaded_tar= "v4" let g:loaded_tar= "v5"
" --------------------------------------------------------------------- " ---------------------------------------------------------------------
" Default Settings: {{{1 " Default Settings: {{{1
@ -46,11 +46,14 @@ endif
" tar#Browse: {{{2 " tar#Browse: {{{2
fun! tar#Browse(tarfile) fun! tar#Browse(tarfile)
" call Dfunc("tar#Browse(tarfile<".a:tarfile.">)") " call Dfunc("tar#Browse(tarfile<".a:tarfile.">)")
let repkeep= &report
set report=10
" sanity checks " sanity checks
if !executable("tar") if !executable("tar")
echohl Error | echo '***error*** (tar#Browse) "tar" not available on your system' echohl Error | echo '***error*** (tar#Browse) "tar" not available on your system'
call inputsave()|call input("Press <cr> to continue")|call inputrestore() call inputsave()|call input("Press <cr> to continue")|call inputrestore()
let &report= repkeep
" call Dret("tar#Browse") " call Dret("tar#Browse")
return return
endif endif
@ -60,6 +63,7 @@ fun! tar#Browse(tarfile)
echohl Error | echo "***error*** (tar#Browse) File not readable<".a:tarfile.">" | echohl None echohl Error | echo "***error*** (tar#Browse) File not readable<".a:tarfile.">" | echohl None
call inputsave()|call input("Press <cr> to continue")|call inputrestore() call inputsave()|call input("Press <cr> to continue")|call inputrestore()
endif endif
let &report= repkeep
" call Dret("tar#Browse : file<".a:tarfile."> not readable") " call Dret("tar#Browse : file<".a:tarfile."> not readable")
return return
endif endif
@ -94,6 +98,7 @@ fun! tar#Browse(tarfile)
setlocal noma nomod ro setlocal noma nomod ro
noremap <silent> <buffer> <cr> :call <SID>TarBrowseSelect()<cr> noremap <silent> <buffer> <cr> :call <SID>TarBrowseSelect()<cr>
let &report= repkeep
" call Dret("tar#Browse : w:tarfile<".w:tarfile.">") " call Dret("tar#Browse : w:tarfile<".w:tarfile.">")
endfun endfun
@ -101,11 +106,14 @@ endfun
" TarBrowseSelect: {{{2 " TarBrowseSelect: {{{2
fun! s:TarBrowseSelect() fun! s:TarBrowseSelect()
" call Dfunc("TarBrowseSelect() w:tarfile<".w:tarfile."> curfile<".expand("%").">") " call Dfunc("TarBrowseSelect() w:tarfile<".w:tarfile."> curfile<".expand("%").">")
let repkeep= &report
set report=10
let fname= getline(".") let fname= getline(".")
" call Decho("fname<".fname.">") " call Decho("fname<".fname.">")
" sanity check " sanity check
if fname =~ '^"' if fname =~ '^"'
let &report= repkeep
" call Dret("TarBrowseSelect") " call Dret("TarBrowseSelect")
return return
endif endif
@ -121,6 +129,7 @@ fun! s:TarBrowseSelect()
exe "e tarfile:".tarfile.':'.fname exe "e tarfile:".tarfile.':'.fname
filetype detect filetype detect
let &report= repkeep
" call Dret("TarBrowseSelect : s:tblfile_".winnr()."<".s:tblfile_{winnr()}.">") " call Dret("TarBrowseSelect : s:tblfile_".winnr()."<".s:tblfile_{winnr()}.">")
endfun endfun
@ -128,6 +137,8 @@ endfun
" tar#Read: {{{2 " tar#Read: {{{2
fun! tar#Read(fname,mode) fun! tar#Read(fname,mode)
" call Dfunc("tar#Read(fname<".a:fname.">,mode=".a:mode.")") " call Dfunc("tar#Read(fname<".a:fname.">,mode=".a:mode.")")
let repkeep= &report
set report=10
let tarfile = substitute(a:fname,'tarfile:\(.\{-}\):.*$','\1','') let tarfile = substitute(a:fname,'tarfile:\(.\{-}\):.*$','\1','')
let fname = substitute(a:fname,'tarfile:.\{-}:\(.*\)$','\1','') let fname = substitute(a:fname,'tarfile:.\{-}:\(.*\)$','\1','')
" call Decho("tarfile<".tarfile."> fname<".fname.">") " call Decho("tarfile<".tarfile."> fname<".fname.">")
@ -149,6 +160,7 @@ fun! tar#Read(fname,mode)
0d 0d
set nomod set nomod
let &report= repkeep
" call Dret("tar#Read : w:tarfile<".w:tarfile.">") " call Dret("tar#Read : w:tarfile<".w:tarfile.">")
endfun endfun
@ -156,17 +168,21 @@ endfun
" tar#Write: {{{2 " tar#Write: {{{2
fun! tar#Write(fname) fun! tar#Write(fname)
" call Dfunc("tar#Write(fname<".a:fname.">) w:tarfile<".w:tarfile."> tblfile_".winnr()."<".s:tblfile_{winnr()}.">") " call Dfunc("tar#Write(fname<".a:fname.">) w:tarfile<".w:tarfile."> tblfile_".winnr()."<".s:tblfile_{winnr()}.">")
let repkeep= &report
set report=10
" sanity checks " sanity checks
if !executable("tar") if !executable("tar")
echohl Error | echo '***error*** (tar#Browse) "tar" not available on your system' echohl Error | echo '***error*** (tar#Browse) "tar" not available on your system'
call inputsave()|call input("Press <cr> to continue")|call inputrestore() call inputsave()|call input("Press <cr> to continue")|call inputrestore()
let &report= repkeep
" call Dret("tar#Write") " call Dret("tar#Write")
return return
endif endif
if !exists("*mkdir") if !exists("*mkdir")
echohl Error | echo "***error*** (tar#Write) sorry, mkdir() doesn't work on your system" | echohl None echohl Error | echo "***error*** (tar#Write) sorry, mkdir() doesn't work on your system" | echohl None
call inputsave()|call input("Press <cr> to continue")|call inputrestore() call inputsave()|call input("Press <cr> to continue")|call inputrestore()
let &report= repkeep
" call Dret("tar#Write") " call Dret("tar#Write")
return return
endif endif
@ -186,6 +202,7 @@ fun! tar#Write(fname)
catch /^Vim\%((\a\+)\)\=:E344/ catch /^Vim\%((\a\+)\)\=:E344/
echohl Error | echo "***error*** (tar#Write) cannot cd to temporary directory" | Echohl None echohl Error | echo "***error*** (tar#Write) cannot cd to temporary directory" | Echohl None
call inputsave()|call input("Press <cr> to continue")|call inputrestore() call inputsave()|call input("Press <cr> to continue")|call inputrestore()
let &report= repkeep
" call Dret("tar#Write") " call Dret("tar#Write")
return return
endtry endtry
@ -285,6 +302,7 @@ fun! tar#Write(fname)
exe "cd ".escape(curdir,' \') exe "cd ".escape(curdir,' \')
setlocal nomod setlocal nomod
let &report= repkeep
" call Dret("tar#Write") " call Dret("tar#Write")
endfun endfun

View File

@ -1,37 +0,0 @@
*tar.txt* Tar File Interface Nov 03, 2005
Author: Charles E. Campbell, Jr. <NdrOchip@ScampbellPfamily.AbizM>
(remove NOSPAM from Campbell's email first)
Copyright: The GPL (gnu public license) applies to *tar-copyright*
tarPlugin.vim, and tar.txt.
No warranty, express or implied. Use At-Your-Own-Risk.
==============================================================================
1. Contents *tar* *tar-contents*
1. Contents..................................................|tar-contents|
2. Usage.....................................................|tar-usage|
3. History...................................................|tar-history|
==============================================================================
2. Usage *tar-usage* *tar-manual*
When one edits a *.tar file, this plugin will handle displaying a
contents page. Select a file to edit by moving the cursor atop
the desired file, then hit the <return> key. After editing, one may
also write to the file. Currently, one may not make a new file in
tar archives via the plugin.
==============================================================================
3. History *tar-history*
v3 Sep 16, 2005 * handles writing files in an archive back to the
archive
Oct 18, 2005 * <amatch> used instead of <afile> in autocmds
Oct 18, 2005 * handles writing to compressed archives
Nov 03, 2005 * handles writing tarfiles across a network using
netrw#NetWrite()
v2 * converted to use Vim7's new autoload feature by
Bram Moolenaar
v1 (original release) * Michael Toren (see http://michael.toren.net/code/)
==============================================================================
vim:tw=78:ts=8:ft=help

View File

@ -1,4 +1,4 @@
*todo.txt* For Vim version 7.0aa. Last change: 2005 Nov 26 *todo.txt* For Vim version 7.0aa. Last change: 2005 Nov 28
VIM REFERENCE MANUAL by Bram Moolenaar VIM REFERENCE MANUAL by Bram Moolenaar
@ -37,6 +37,9 @@ Using chown() is unsafe. (Jinpeng Wei)
Go over all changes between 6.3 and 6.4 and make sure they are included in 7. Go over all changes between 6.3 and 6.4 and make sure they are included in 7.
Using ":read" in an empty buffer in Ex mode, then undo leaves a line behind.
(Servatius Brandt).
'statusline' is drawn over the Omni menu. 'statusline' is drawn over the Omni menu.
Cygwin and Mac OS/X may preserve case for file names but ignore case Cygwin and Mac OS/X may preserve case for file names but ignore case
@ -60,6 +63,12 @@ errors and illegal bytes. Make default to replace bad bytes/characters with
Win32: preserve the hidden attribute of the viminfo file. Win32: preserve the hidden attribute of the viminfo file.
Add ":startgreplace" to do "gR", like ":startreplace" does "R".
When 'delcombine' is set in Select mode before a character with a combining
char the combinging char is deleted when it shouldn't. (Tony Mechelynck, Nov
27)
ccomplete: ccomplete:
- When an option is set: In completion mode and the user types (identifier) - When an option is set: In completion mode and the user types (identifier)
characters, advance to the first match instead of removing the popup menu. characters, advance to the first match instead of removing the popup menu.
@ -72,6 +81,8 @@ ccomplete:
- page-up / page-down - page-up / page-down
spelling: spelling:
- "z?" was to be used for searching in folded text. Use something else for
suggestions. "zu"?
- When a recognized word ends in a . don't have 'spellcapcheck" match it. - When a recognized word ends in a . don't have 'spellcapcheck" match it.
- Use KEEPCASE instead of "KEP". It applies to the word including affixes - Use KEEPCASE instead of "KEP". It applies to the word including affixes
Hunspell also uses it. Hunspell also uses it.
@ -109,8 +120,8 @@ Mac unicode patch (Da Woon Jung):
- With 'nopaste' pasting is wrong, with 'paste' Command-V doesn't work. - With 'nopaste' pasting is wrong, with 'paste' Command-V doesn't work.
(Alan Schmitt) (Alan Schmitt)
Mac: drop support for OS 9? Most people are now using OS/X and Vim 6.4 can be Mac: drop support for OS 9. Most people are now using OS/X and Vim 6.4 can be
used for others. used for others. Will make maintaining the code simpler.
Patch to add a few flags to search(). (Benji Fisher, Nov 22) Patch to add a few flags to search(). (Benji Fisher, Nov 22)
@ -1483,8 +1494,8 @@ Diff mode:
Folding: Folding:
(commands still available: zg zG zI zJ zK zp zP zq zQ zV zw zW zy zY; (commands still available: zI zJ zK zp zP zq zQ zV zy zY;
secondary: zB zS zT zZ) secondary: zB zS zT zZ, z=)
8 Add "z/" and "z?" for searching in not folded text only. 8 Add "z/" and "z?" for searching in not folded text only.
8 Add different highlighting for a fold line depending on the fold level. 8 Add different highlighting for a fold line depending on the fold level.
(Noel Henson) (Noel Henson)

View File

@ -1,40 +0,0 @@
*zip.txt* Zip File Interface Nov 03, 2005
Author: Charles E. Campbell, Jr. <NdrOchip@ScampbellPfamily.AbizM>
(remove NOSPAM from Campbell's email first)
Copyright: Copyright (C) 2005 Charles E. Campbell, Jr. {{{1 *zip-copyright*
Permission is hereby granted to use and distribute this code,
with or without modifications, provided that this copyright
notice is copied with it. Like anything else that's free,
zip.vim and zipPlugin.vim are provided *as is* and comes with no
warranty of any kind, either expressed or implied. By using this
plugin, you agree that in no event will the copyright holder be
liable for any damages resulting from the use of this software.
==============================================================================
1. Contents *zip* *zip-contents*
1. Contents..................................................|zip-contents|
2. Usage.....................................................|zip-usage|
3. History...................................................|zip-history|
==============================================================================
2. Usage *zip-usage* *zip-manual*
When one edits a *.zip file, this plugin will handle displaying a
contents page. Select a file to edit by moving the cursor atop
the desired file, then hit the <return> key. After editing, one may
also write to the file. Currently, one may not make a new file in
zip archives via the plugin.
==============================================================================
3. History *zip-history*
v3 Oct 18, 2005 * <amatch> used instead of <afile> in autocmds
v2 Sep 16, 2005 * silenced some commands (avoiding hit-enter prompt)
* began testing under Windows; works thus far
* filetype detection fixed
Nov 03, 2005 * handles writing zipfiles across a network using
netrw#NetWrite()
v1 Sep 15, 2005 * Initial release, had browsing, reading, and writing
==============================================================================
vim:tw=78:ts=8:ft=help

View File

@ -1804,14 +1804,15 @@ write_viminfo(file, forceit)
/* Use mch_open() to be able to use O_NOFOLLOW and set file /* Use mch_open() to be able to use O_NOFOLLOW and set file
* protection same as original file, but strip s-bit. */ * protection same as original file, but strip s-bit. */
#ifdef UNIX
fd = mch_open((char *)tempname, fd = mch_open((char *)tempname,
O_CREAT|O_EXTRA|O_EXCL|O_WRONLY|O_NOFOLLOW, O_CREAT|O_EXTRA|O_EXCL|O_WRONLY|O_NOFOLLOW,
#ifdef UNIX (int)((st_old.st_mode & 0777) | 0600));
(int)((st_old.st_mode & 0777) | 0600)
#else #else
0600 /* r&w for user only */ fd = mch_open((char *)tempname,
O_CREAT|O_EXTRA|O_EXCL|O_WRONLY|O_NOFOLLOW,
0600); /* r&w for user only */
#endif #endif
);
if (fd < 0) if (fd < 0)
fp_out = NULL; fp_out = NULL;
else else