Charles E. Campbell, Jr. wrote:
> You're right -- I've put 135g up on my website with this addressed.
I think that more s:Strlen() should be replaced with strlen(). Please
check attached patch. Maybe s:Strlen() is not required in the current
version. This patch is also including fix for wide listing in where the
following line.
@@ -5972 +5972 @@
- exe 'silent keepjumps
'.w:netrw_bannercnt.',$s/^.*$/\=escape(printf("%-'.b:netrw_cpf.'s",submatch(0)),"\\")/'
+ exe 'silent keepjumps '.w:netrw_bannercnt.',$s/$/\=repeat("
",b:netrw_cpf-virtcol("$"))/'
--
Yukihiro Nakadaira - [EMAIL PROTECTED]
--~--~---------~--~----~------------~-------~--~----~
You received this message from the "vim_use" maillist.
For more information, visit http://www.vim.org/maillist.php
-~----------~----~----~----~------~----~------~--~---
*** autoload/netrw.vim.orig 2008-12-07 02:29:30.000000000 +0900
--- autoload/netrw.vim 2008-12-07 04:40:17.000000000 +0900
***************
*** 3634,3640 ****
" only update match list if current directory isn't the same as before
let s:explore_prvdir = b:netrw_curdir
let s:explore_match = ""
! let dirlen = s:Strlen(b:netrw_curdir)
if b:netrw_curdir !~ '/$'
let dirlen= dirlen + 1
endif
--- 3634,3640 ----
" only update match list if current directory isn't the same as before
let s:explore_prvdir = b:netrw_curdir
let s:explore_match = ""
! let dirlen = strlen(b:netrw_curdir)
if b:netrw_curdir !~ '/$'
let dirlen= dirlen + 1
endif
***************
*** 3738,3744 ****
if g:netrw_list_hide =~ '\(^\|,\)\\(^\\|\\s\\s\\)\\zs\\.\\S\\+'
" remove pattern from hiding list
let g:netrw_list_hide= substitute(g:netrw_list_hide,'\(^\|,\)\\(^\\|\\s\\s\\)\\zs\\.\\S\\+','','')
! elseif s:Strlen(g:netrw_list_hide) >= 1
let g:netrw_list_hide= g:netrw_list_hide . ',\(^\|\s\s\)\zs\.\S\+'
else
let g:netrw_list_hide= '\(^\|\s\s\)\zs\.\S\+'
--- 3738,3744 ----
if g:netrw_list_hide =~ '\(^\|,\)\\(^\\|\\s\\s\\)\\zs\\.\\S\\+'
" remove pattern from hiding list
let g:netrw_list_hide= substitute(g:netrw_list_hide,'\(^\|,\)\\(^\\|\\s\\s\\)\\zs\\.\\S\\+','','')
! elseif g:netrw_list_hide != ''
let g:netrw_list_hide= g:netrw_list_hide . ',\(^\|\s\s\)\zs\.\S\+'
else
let g:netrw_list_hide= '\(^\|\s\s\)\zs\.\S\+'
***************
*** 5905,5911 ****
if !exists("w:netrw_treetop")
let w:netrw_treetop= a:dirname
" call Decho("w:netrw_treetop<".w:netrw_treetop."> (reusing)")
! elseif (w:netrw_treetop =~ ('^'.a:dirname) && s:Strlen(a:dirname) < s:Strlen(w:netrw_treetop)) || a:dirname !~ ('^'.w:netrw_treetop)
let w:netrw_treetop= a:dirname
" call Decho("w:netrw_treetop<".w:netrw_treetop."> (went up)")
endif
--- 5905,5911 ----
if !exists("w:netrw_treetop")
let w:netrw_treetop= a:dirname
" call Decho("w:netrw_treetop<".w:netrw_treetop."> (reusing)")
! elseif (w:netrw_treetop =~ ('^'.a:dirname) && strlen(a:dirname) < strlen(w:netrw_treetop)) || a:dirname !~ ('^'.w:netrw_treetop)
let w:netrw_treetop= a:dirname
" call Decho("w:netrw_treetop<".w:netrw_treetop."> (went up)")
endif
***************
*** 5969,5975 ****
" call Decho("fpl= [winwidth=".winwidth(0)."]/[b:netrw_cpf=".b:netrw_cpf.']='.w:netrw_fpl)
" make wide display
! exe 'silent keepjumps '.w:netrw_bannercnt.',$s/^.*$/\=escape(printf("%-'.b:netrw_cpf.'s",submatch(0)),"\\")/'
call histdel("/",-1)
let fpc = (line("$") - w:netrw_bannercnt + w:netrw_fpl)/w:netrw_fpl
let newcolstart = w:netrw_bannercnt + fpc
--- 5969,5975 ----
" call Decho("fpl= [winwidth=".winwidth(0)."]/[b:netrw_cpf=".b:netrw_cpf.']='.w:netrw_fpl)
" make wide display
! exe 'silent keepjumps '.w:netrw_bannercnt.',$s/$/\=repeat(" ",b:netrw_cpf-virtcol("$"))/'
call histdel("/",-1)
let fpc = (line("$") - w:netrw_bannercnt + w:netrw_fpl)/w:netrw_fpl
let newcolstart = w:netrw_bannercnt + fpc
***************
*** 6802,6808 ****
" get the list of files contained in the current directory
let dirname = escape(b:netrw_curdir,g:netrw_glob_escape)
! let dirnamelen = s:Strlen(b:netrw_curdir)
let filelist = glob(s:ComposePath(dirname,"*"))
" call Decho("glob(dirname<".dirname."/*>)=".filelist)
if filelist != ""
--- 6802,6808 ----
" get the list of files contained in the current directory
let dirname = escape(b:netrw_curdir,g:netrw_glob_escape)
! let dirnamelen = strlen(b:netrw_curdir)
let filelist = glob(s:ComposePath(dirname,"*"))
" call Decho("glob(dirname<".dirname."/*>)=".filelist)
if filelist != ""
***************
*** 7449,7456 ****
if(has("amiga"))
" call Decho("amiga")
! let ec = a:base[s:Strlen(a:base)-1]
! if ec != '/' && ec != ':'
let ret = a:base . "/" . a:subdir
else
let ret = a:base . a:subdir
--- 7449,7455 ----
if(has("amiga"))
" call Decho("amiga")
! if a:base !~ '[/:]$'
let ret = a:base . "/" . a:subdir
else
let ret = a:base . a:subdir
