vim: runtime/autoload/netrw.vim comparison

comparison runtime/autoload/netrw.vim @ 12785:65d7fd8381a3

Update runtime files. commit https://github.com/vim/vim/commit/b0d45e7f5354375edd02afafde3bd37dac1515ff Author: Bram Moolenaar <Bram@vim.org> Date: Sun Nov 5 18:19:24 2017 +0100 Update runtime files.

author	Christian Brabandt <cb@256bit.org>
date	Sun, 05 Nov 2017 18:30:05 +0100
parents	8335fdda6d4d
children	92a0a33f8296

comparison

equal deleted inserted replaced

-:b38715f6a758
+:65d7fd8381a3
 " netrw.vim: Handles file transfer and remote directory listing across
 "            AUTOLOAD SECTION
-" Date:		Apr 20, 2016
+" Date:		Nov 03, 2017
-" Version:	156
+" Version:	162
 " Maintainer:	Charles E Campbell <NdrOchip@ScampbellPfamily.AbizM-NOSPAM>
 " GetLatestVimScripts: 1075 1 :AutoInstall: netrw.vim
 " Copyright:    Copyright (C) 2016 Charles E. Campbell {{{1
 "               Permission is hereby granted to use and distribute this code,
 "               with or without modifications, provided that this copyright
 " =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
 " Load Once: {{{1
 if &cp || exists("g:loaded_netrw")
 finish
 endif
-" netrw requires vim having patch 7.4.213; netrw will benefit from vim's having patch#656, too
-if v:version < 704 || (v:version == 704 && !has("patch213"))
+" Check that vim has patches that netrw requires.
-if !exists("s:needpatch213")
+" Patches needed: 1557, and 213.
-unsilent echomsg "***sorry*** this version of netrw requires vim v7.4 with patch 213"
+" (netrw will benefit from vim's having patch#656, too)
-endif
+let s:needspatches=[1557,213]
-let s:needpatch213= 1
+if exists("s:needspatches")
-finish
+for ptch in s:needspatches
+if v:version < 704 || (v:version == 704 && !has("patch".ptch))
+if !exists("s:needpatch{ptch}")
+unsilent echomsg "***sorry*** this version of netrw requires vim v7.4 with patch#".ptch
+endif
+let s:needpatch{ptch}= 1
+finish
+endif
+endfor
 endif
-let g:loaded_netrw = "v156"
+let g:loaded_netrw = "v162"
 if !exists("s:NOTE")
 let s:NOTE    = 0
 let s:WARNING = 1
 let s:ERROR   = 2
 endif
 "   1=warning  = s:WARNING
 "   2=error    = s:ERROR
 "   Usage: netrw#ErrorMsg(s:NOTE | s:WARNING | s:ERROR,"some message",error-number)
 "          netrw#ErrorMsg(s:NOTE | s:WARNING | s:ERROR,["message1","message2",...],error-number)
 "          (this function can optionally take a list of messages)
-"  Jan 19, 2016 : max errnum currently is 103
+"  Mar 21, 2017 : max errnum currently is 105
 fun! netrw#ErrorMsg(level,msg,errnum)
 "  call Dfunc("netrw#ErrorMsg(level=".a:level." msg<".a:msg."> errnum=".a:errnum.") g:netrw_use_errorwindow=".g:netrw_use_errorwindow)
 if a:level < g:netrw_errorlvl
 "   call Dret("netrw#ErrorMsg : suppressing level=".a:level." since g:netrw_errorlvl=".g:netrw_errorlvl)
 call s:NetrwInit("s:LONGLIST",1)
 call s:NetrwInit("s:WIDELIST",2)
 call s:NetrwInit("s:TREELIST",3)
 call s:NetrwInit("s:MAXLIST" ,4)
 endif
+" ---------------------------------------------------------------------
+" Default option values: {{{2
+let g:netrw_localcopycmdopt    = ""
+let g:netrw_localcopydircmdopt = ""
+let g:netrw_localmkdiropt      = ""
+let g:netrw_localmovecmdopt    = ""
+let g:netrw_localrmdiropt      = ""
 " ---------------------------------------------------------------------
 " Default values for netrw's global protocol variables {{{2
 call s:NetrwInit("g:netrw_use_errorwindow",1)
 let s:netrw_ftp_cmd= g:netrw_ftp_cmd
 if !exists("g:netrw_ftp_options")
 let g:netrw_ftp_options= "-i -n"
 endif
 if !exists("g:netrw_http_cmd")
-if executable("elinks")
+if executable("curl")
-let g:netrw_http_cmd = "elinks"
-call s:NetrwInit("g:netrw_http_xcmd","-source >")
-elseif executable("links")
-let g:netrw_http_cmd = "links"
-call s:NetrwInit("g:netrw_http_xcmd","-source >")
-elseif executable("curl")
 let g:netrw_http_cmd	= "curl"
-call s:NetrwInit("g:netrw_http_xcmd","-o")
+call s:NetrwInit("g:netrw_http_xcmd","-L -o")
 elseif executable("wget")
 let g:netrw_http_cmd	= "wget"
 call s:NetrwInit("g:netrw_http_xcmd","-q -O")
+elseif executable("elinks")
+let g:netrw_http_cmd = "elinks"
+call s:NetrwInit("g:netrw_http_xcmd","-source >")
 elseif executable("fetch")
 let g:netrw_http_cmd	= "fetch"
 call s:NetrwInit("g:netrw_http_xcmd","-o")
+elseif executable("links")
+let g:netrw_http_cmd = "links"
+call s:NetrwInit("g:netrw_http_xcmd","-http.extra-header ".shellescape("Accept-Encoding: identity", 1)." -source >")
 else
 let g:netrw_http_cmd	= ""
 endif
 endif
 call s:NetrwInit("g:netrw_http_put_cmd","curl -T")
 call s:NetrwInit("g:netrw_keepj","keepj")
 call s:NetrwInit("g:netrw_rcp_cmd"  , "rcp")
 call s:NetrwInit("g:netrw_rsync_cmd", "rsync")
+call s:NetrwInit("g:netrw_rsync_sep", "/")
 if !exists("g:netrw_scp_cmd")
 if executable("scp")
 call s:NetrwInit("g:netrw_scp_cmd" , "scp -q")
 elseif executable("pscp")
 if (has("win32") || has("win95") || has("win64") || has("win16")) && filereadable('c:\private.ppk')
 if !exists("g:netrw_localcopycmd")
 if has("win32") || has("win95") || has("win64") || has("win16")
 if g:netrw_cygwin
 let g:netrw_localcopycmd= "cp"
 else
-let g:netrw_localcopycmd= expand("$COMSPEC")." /c copy"
+let g:netrw_localcopycmd   = expand("$COMSPEC")
+let g:netrw_localcopycmdopt= " /c copy"
 endif
 elseif has("unix") || has("macunix")
 let g:netrw_localcopycmd= "cp"
 else
 let g:netrw_localcopycmd= ""
 endif
 endif
 if !exists("g:netrw_localcopydircmd")
 if has("win32") || has("win95") || has("win64") || has("win16")
 if g:netrw_cygwin
-let g:netrw_localcopydircmd= "cp -R"
+let g:netrw_localcopydircmd   = "cp"
-else
+let g:netrw_localcopydircmdopt= " -R"
-let g:netrw_localcopycmd= expand("$COMSPEC")." /c xcopy /e /c /h /i /k"
+else
-endif
+let g:netrw_localcopydircmd   = expand("$COMSPEC")
-elseif has("unix") || has("macunix")
+let g:netrw_localcopydircmdopt= " /c xcopy /e /c /h /i /k"
-let g:netrw_localcopydircmd= "cp -R"
+endif
+elseif has("unix")
+let g:netrw_localcopydircmd   = "cp"
+let g:netrw_localcopydircmdopt= " -R"
+elseif has("macunix")
+let g:netrw_localcopydircmd   = "cp"
+let g:netrw_localcopydircmdopt= " -R"
 else
-let g:netrw_localcopycmd= ""
+let g:netrw_localcopydircmd= ""
 endif
 endif
 if exists("g:netrw_local_mkdir")
 let g:netrw_localmkdir= g:netrw_local_mkdir
 call netrw#ErrorMsg(s:NOTE,"g:netrw_local_mkdir is deprecated in favor of g:netrw_localmkdir",87)
 endif
 if has("win32") || has("win95") || has("win64") || has("win16")
 if g:netrw_cygwin
 call s:NetrwInit("g:netrw_localmkdir","mkdir")
 else
-let g:netrw_localmkdir= expand("$COMSPEC")." /c mkdir"
+let g:netrw_localmkdir   = expand("$COMSPEC")
+let g:netrw_localmkdiropt= " /c mkdir"
 endif
 else
 call s:NetrwInit("g:netrw_localmkdir","mkdir")
 endif
 call s:NetrwInit("g:netrw_remote_mkdir","mkdir")
 if !exists("g:netrw_localmovecmd")
 if has("win32") || has("win95") || has("win64") || has("win16")
 if g:netrw_cygwin
 let g:netrw_localmovecmd= "mv"
 else
-let g:netrw_localmovecmd= expand("$COMSPEC")." /c move"
+let g:netrw_localmovecmd   = expand("$COMSPEC")
+let g:netrw_localmovecmdopt= " /c move"
 endif
 elseif has("unix") || has("macunix")
 let g:netrw_localmovecmd= "mv"
 else
 let g:netrw_localmovecmd= ""
 endif
 endif
-if v:version < 704 || !has("patch1109")
+if v:version < 704 || (v:version == 704 && !has("patch1107"))
+" 1109 provides for delete(tmpdir,"d") which is what will be used
 if exists("g:netrw_local_rmdir")
 let g:netrw_localrmdir= g:netrw_local_rmdir
 call netrw#ErrorMsg(s:NOTE,"g:netrw_local_rmdir is deprecated in favor of g:netrw_localrmdir",86)
 endif
 if has("win32") || has("win95") || has("win64") || has("win16")
 if g:netrw_cygwin
 call s:NetrwInit("g:netrw_localrmdir","rmdir")
 else
-let g:netrw_localrmdir= expand("$COMSPEC")." /c rmdir"
+let g:netrw_localrmdir   = expand("$COMSPEC")
+let g:netrw_localrmdiropt= " /c rmdir"
 endif
 else
 call s:NetrwInit("g:netrw_localrmdir","rmdir")
 endif
 endif
 if has("gui_running") && (&enc == 'utf-8' || &enc == 'utf-16' || &enc == 'ucs-4')
 let s:treedepthstring= "│ "
 else
 let s:treedepthstring= "| "
 endif
-call s:NetrwInit("s:netrw_nbcd",'{}')
+call s:NetrwInit("s:netrw_posn",'{}')
 " BufEnter event ignored by decho when following variable is true
 "  Has a side effect that doau BufReadPost doesn't work, so
 "  files read by network transfer aren't appropriately highlighted.
 "let g:decho_bufenter = 1	"Decho
 "     call Decho("..case Nexplore with starpat=".starpat.": (indx=".indx.")",'~'.expand("<slnum>"))
 if !exists("w:netrw_explore_list") " sanity check
 NetrwKeepj call netrw#ErrorMsg(s:WARNING,"using Nexplore or <s-down> improperly; see help for netrw-starstar",40)
 if has("clipboard")
 sil! let @* = keepregstar
-sil! let @+ = keepregstar
+sil! let @+ = keepregplus
 endif
 sil! let @/ = keepregslash
 "      call Dret("netrw#Explore")
 return
 endif
 "     call Decho("case Pexplore with starpat=".starpat.": (indx=".indx.")",'~'.expand("<slnum>"))
 if !exists("w:netrw_explore_list") " sanity check
 NetrwKeepj call netrw#ErrorMsg(s:WARNING,"using Pexplore or <s-up> improperly; see help for netrw-starstar",41)
 if has("clipboard")
 sil! let @* = keepregstar
-sil! let @+ = keepregstar
+sil! let @+ = keepregplus
 endif
 sil! let @/ = keepregslash
 "      call Dret("netrw#Explore")
 return
 endif
 exe "sil NetrwKeepj noautocmd keepalt vimgrep /".pattern."/gj "."**/*"
 catch /^Vim\%((\a\+)\)\=:E480/
 keepalt call netrw#ErrorMsg(s:WARNING,'no files matched pattern<'.pattern.'>',45)
 if &hls | let keepregslash= s:ExplorePatHls(pattern) | endif
 if has("clipboard")
-sil! let @* = keepregstar
+	sil! let @* = keepregstar
-sil! let @+ = keepregstar
+	sil! let @+ = keepregplus
 endif
 sil! let @/ = keepregslash
 "       call Dret("netrw#Explore : no files matched pattern")
 return
 endtry
 if w:netrw_explore_listlen == 0 || (w:netrw_explore_listlen == 1 && w:netrw_explore_list[0] =~ '\*\*\/')
 keepalt NetrwKeepj call netrw#ErrorMsg(s:WARNING,"no files matched",42)
 if has("clipboard")
 sil! let @* = keepregstar
-sil! let @+ = keepregstar
+sil! let @+ = keepregplus
 endif
 sil! let @/ = keepregslash
 "      call Dret("netrw#Explore : no files matched")
 return
 endif
 if !exists("g:netrw_quiet")
 keepalt NetrwKeepj call netrw#ErrorMsg(s:WARNING,"your vim needs the +path_extra feature for Exploring with **!",44)
 endif
 if has("clipboard")
 sil! let @* = keepregstar
-sil! let @+ = keepregstar
+sil! let @+ = keepregplus
 endif
 sil! let @/ = keepregslash
 "    call Dret("netrw#Explore : missing +path_extra")
 return
 endif
 endif
 endif
 let prvfname= fname
 endfor
 "    call Decho("explore_match<".s:explore_match.">",'~'.expand("<slnum>"))
-exe "2match netrwMarkFile /".s:explore_match."/"
+if has("syntax") && exists("g:syntax_on") && g:syntax_on
+exe "2match netrwMarkFile /".s:explore_match."/"
+endif
 endif
 echo "<s-up>==Pexplore  <s-down>==Nexplore"
 else
 2match none
 if exists("s:explore_match")  | unlet s:explore_match  | endif
 " there's no danger of a late FocusGained event on initialization.
 " Consequently, set s:netrw_events to 2.
 let s:netrw_events= 2
 if has("clipboard")
 sil! let @* = keepregstar
-sil! let @+ = keepregstar
+sil! let @+ = keepregplus
 endif
 sil! let @/ = keepregslash
 "  call Dret("netrw#Explore : @/<".@/.">")
 endfun
 " ---------------------------------------------------------------------
 " netrw#Lexplore: toggle Explorer window, keeping it on the left of the current tab {{{2
 fun! netrw#Lexplore(count,rightside,...)
-"  call Dfunc("netrw#Lexplore(count=".a:count."rightside=".a:rightside.",...) a:0=".a:0." ft=".&ft)
+"  call Dfunc("netrw#Lexplore(count=".a:count." rightside=".a:rightside.",...) a:0=".a:0." ft=".&ft)
 let curwin= winnr()
 if a:0 > 0 && a:1 != ""
 " if a netrw window is already on the left-side of the tab
 " and a directory has been specified, explore with that
 " directory.
+"   call Decho("case has input argument(s) (a:1<".a:1.">)")
 let a1 = expand(a:1)
 "   call Decho("a:1<".a:1.">  curwin#".curwin,'~'.expand("<slnum>"))
 exe "1wincmd w"
 if &ft == "netrw"
 "    call Decho("exe Explore ".fnameescape(a:1),'~'.expand("<slnum>"))
 return
 endif
 exe curwin."wincmd w"
 else
 let a1= ""
+"   call Decho("no input arguments")
 endif
 if exists("t:netrw_lexbufnr")
 " check if t:netrw_lexbufnr refers to a netrw window
 let lexwinnr = bufwinnr(t:netrw_lexbufnr)
+"   call Decho("lexwinnr= bufwinnr(t:netrw_lexbufnr#".t:netrw_lexbufnr.")=".lexwinnr)
 else
 let lexwinnr= 0
-endif
+"   call Decho("t:netrw_lexbufnr doesn't exist")
+endif
+"  call Decho("lexwinnr=".lexwinnr,'~'.expand("<slnum>"))
 if lexwinnr > 0
 " close down netrw explorer window
-"  call Decho("t:netrw_lexbufnr#".t:netrw_lexbufnr.": close down netrw window",'~'.expand("<slnum>"))
+"   call Decho("t:netrw_lexbufnr#".t:netrw_lexbufnr.": close down netrw window",'~'.expand("<slnum>"))
 exe lexwinnr."wincmd w"
 let g:netrw_winsize = -winwidth(0)
 let t:netrw_lexposn = winsaveview()
 "   call Decho("saving posn to t:netrw_lexposn<".string(t:netrw_lexposn).">",'~'.expand("<slnum>"))
 "   call Decho("saving t:netrw_lexposn",'~'.expand("<slnum>"))
 close
 if lexwinnr < curwin
 let curwin= curwin - 1
 endif
-exe curwin."wincmd w"
+if lexwinnr != curwin
+exe curwin."wincmd w"
+endif
 unlet t:netrw_lexbufnr
+"   call Decho("unlet t:netrw_lexbufnr")
 else
 " open netrw explorer window
 "   call Decho("t:netrw_lexbufnr<n/a>: open netrw explorer window",'~'.expand("<slnum>"))
 exe "1wincmd w"
 let g:netrw_winsize = a:count
 endif
 let curfile= expand("%")
 "   call Decho("curfile<".curfile.">",'~'.expand("<slnum>"))
 exe (a:rightside? "botright" : "topleft")." vertical ".((g:netrw_winsize > 0)? (g:netrw_winsize*winwidth(0))/100 : -g:netrw_winsize) . " new"
+"   call Decho("new buf#".bufnr("%")." win#".winnr())
 if a:0 > 0 && a1 != ""
 "    call Decho("case 1: Explore ".a1,'~'.expand("<slnum>"))
+call netrw#Explore(0,0,0,a1)
 exe "Explore ".fnameescape(a1)
 elseif curfile =~ '^\a\{3,}://'
 "    call Decho("case 2: Explore ".substitute(curfile,'[^/\\]*$','',''),'~'.expand("<slnum>"))
-exe "Explore ".substitute(curfile,'[^/\\]*$','','')
+call netrw#Explore(0,0,0,substitute(curfile,'[^/\\]*$','',''))
 else
 "    call Decho("case 3: Explore .",'~'.expand("<slnum>"))
-Explore .
+call netrw#Explore(0,0,0,".")
 endif
 if a:count != 0
 let g:netrw_winsize = netrw_winsize
 endif
 setlocal winfixwidth
 let g:netrw_altv     = keep_altv
 let t:netrw_lexbufnr = bufnr("%")
+"   call Decho("let t:netrw_lexbufnr=".t:netrw_lexbufnr)
+"   call Decho("t:netrw_lexposn".(exists("t:netrw_lexposn")? string(t:netrw_lexposn) : " n/a"))
 if exists("t:netrw_lexposn")
 "    call Decho("restoring to t:netrw_lexposn",'~'.expand("<slnum>"))
 "    call Decho("restoring posn to t:netrw_lexposn<".string(t:netrw_lexposn).">",'~'.expand("<slnum>"))
 call winrestview(t:netrw_lexposn)
 unlet t:netrw_lexposn
 if a:rightside
 let g:netrw_chgwin= 1
 else
 let g:netrw_chgwin= 2
 endif
+"   call Decho("let g:netrw_chgwin=".g:netrw_chgwin)
 endif
 "  call Dret("netrw#Lexplore")
 endfun
 if (has("win32") || has("win95") || has("win64") || has("win16"))
 " transfer files one at time
 "     call Decho("transfer files one at a time",'~'.expand("<slnum>"))
 for fname in fnamelist
 "      call Decho("system(".g:netrw_localcopycmd." ".s:ShellEscape(fname)." ".s:ShellEscape(topath).")",'~'.expand("<slnum>"))
-call system(g:netrw_localcopycmd." ".s:ShellEscape(fname)." ".s:ShellEscape(topath))
+call system(g:netrw_localcopycmd.g:netrw_localcopycmdopt." ".s:ShellEscape(fname)." ".s:ShellEscape(topath))
 if v:shell_error != 0
 call netrw#ErrorMsg(s:WARNING,"consider setting g:netrw_localcopycmd<".g:netrw_localcopycmd."> to something that works",80)
 "       call Dret("s:NetrwObtain 0 : failed: ".g:netrw_localcopycmd." ".s:ShellEscape(fname)." ".s:ShellEscape(topath))
 return
 endif
 else
 " transfer files with one command
 "     call Decho("transfer files with one command",'~'.expand("<slnum>"))
 let filelist= join(map(deepcopy(fnamelist),"s:ShellEscape(v:val)"))
 "     call Decho("system(".g:netrw_localcopycmd." ".filelist." ".s:ShellEscape(topath).")",'~'.expand("<slnum>"))
-call system(g:netrw_localcopycmd." ".filelist." ".s:ShellEscape(topath))
+call system(g:netrw_localcopycmd.g:netrw_localcopycmdopt." ".filelist." ".s:ShellEscape(topath))
 if v:shell_error != 0
 call netrw#ErrorMsg(s:WARNING,"consider setting g:netrw_localcopycmd<".g:netrw_localcopycmd."> to something that works",80)
 "      call Dret("s:NetrwObtain 0 : failed: ".g:netrw_localcopycmd." ".filelist." ".s:ShellEscape(topath))
 return
 endif
 if b:netrw_fname =~ '/'
 let path= substitute(b:netrw_fname,'^\(.*/\).\{-}$','\1','')
 else
 let path= ""
 endif
-let filelist= join(map(deepcopy(fnamelist),'s:ShellEscape(g:netrw_machine.":".path.v:val,1)'))
+let filelist= join(map(deepcopy(fnamelist),'escape(s:ShellEscape(g:netrw_machine.":".path.v:val,1)," ")'))
 call s:NetrwExe(s:netrw_silentxfer."!".g:netrw_scp_cmd.s:ShellEscape(useport,1)." ".filelist." ".s:ShellEscape(tgtdir,1))
 elseif b:netrw_method == 2
 " obtain file using ftp + .netrc
 "     call Decho("obtain via ftp+.netrc (method #2)",'~'.expand("<slnum>"))
 " s:NetrwOptionRestore: restore options (based on prior s:NetrwOptionSave) {{{2
 fun! s:NetrwOptionRestore(vt)
 "  call Dfunc("s:NetrwOptionRestore(vt<".a:vt.">) win#".winnr()." buf#".bufnr("%")."<".bufname("%")."> winnr($)=".winnr("$"))
 "  call Decho("settings buf#".bufnr("%")."<".bufname("%").">: ".((&l:ma == 0)? "no" : "")."ma ".((&l:mod == 0)? "no" : "")."mod ".((&l:bl == 0)? "no" : "")."bl ".((&l:ro == 0)? "no" : "")."ro fo=".&l:fo." a:vt=".a:vt,'~'.expand("<slnum>"))
 if !exists("{a:vt}netrw_optionsave")
-call s:RestorePosn(s:netrw_nbcd)
 "   call Decho("settings buf#".bufnr("%")."<".bufname("%").">: ".((&l:ma == 0)? "no" : "")."ma ".((&l:mod == 0)? "no" : "")."mod ".((&l:bl == 0)? "no" : "")."bl ".((&l:ro == 0)? "no" : "")."ro fo=".&l:fo." a:vt=".a:vt,'~'.expand("<slnum>"))
 "   call Decho("ro=".&l:ro." ma=".&l:ma." mod=".&l:mod." wrap=".&l:wrap." (filename<".expand("%")."> win#".winnr()." ft<".&ft.">)",'~'.expand("<slnum>"))
 "   call Dret("s:NetrwOptionRestore : ".a:vt."netrw_optionsave doesn't exist")
 return
 endif
 if &l:acd
 call s:NetrwLcd(curdir)
 endif
 endif
 endif
-if exists("{a:vt}netrw_aikeep")   |let &l:ai     = {a:vt}netrw_aikeep      |unlet {a:vt}netrw_aikeep   |endif
+call s:NetrwRestoreSetting(a:vt."netrw_aikeep","&l:ai")
-if exists("{a:vt}netrw_awkeep")   |let &l:aw     = {a:vt}netrw_awkeep      |unlet {a:vt}netrw_awkeep   |endif
+call s:NetrwRestoreSetting(a:vt."netrw_awkeep","&l:aw")
-if exists("{a:vt}netrw_blkeep")   |let &l:bl     = {a:vt}netrw_blkeep      |unlet {a:vt}netrw_blkeep   |endif
+call s:NetrwRestoreSetting(a:vt."netrw_blkeep","&l:bl")
-if exists("{a:vt}netrw_btkeep")   |let &l:bt     = {a:vt}netrw_btkeep      |unlet {a:vt}netrw_btkeep   |endif
+call s:NetrwRestoreSetting(a:vt."netrw_btkeep","&l:bt")
-if exists("{a:vt}netrw_bombkeep") |let &l:bomb   = {a:vt}netrw_bombkeep    |unlet {a:vt}netrw_bombkeep |endif
+call s:NetrwRestoreSetting(a:vt."netrw_bombkeep","&l:bomb")
-if exists("{a:vt}netrw_cedit")    |let &cedit    = {a:vt}netrw_cedit       |unlet {a:vt}netrw_cedit    |endif
+call s:NetrwRestoreSetting(a:vt."netrw_cedit","&cedit")
-if exists("{a:vt}netrw_cikeep")   |let &l:ci     = {a:vt}netrw_cikeep      |unlet {a:vt}netrw_cikeep   |endif
+call s:NetrwRestoreSetting(a:vt."netrw_cikeep","&l:ci")
-if exists("{a:vt}netrw_cinkeep")  |let &l:cin    = {a:vt}netrw_cinkeep     |unlet {a:vt}netrw_cinkeep  |endif
+call s:NetrwRestoreSetting(a:vt."netrw_cinkeep","&l:cin")
-if exists("{a:vt}netrw_cinokeep") |let &l:cino   = {a:vt}netrw_cinokeep    |unlet {a:vt}netrw_cinokeep |endif
+call s:NetrwRestoreSetting(a:vt."netrw_cinokeep","&l:cino")
-if exists("{a:vt}netrw_comkeep")  |let &l:com    = {a:vt}netrw_comkeep     |unlet {a:vt}netrw_comkeep  |endif
+call s:NetrwRestoreSetting(a:vt."netrw_comkeep","&l:com")
-if exists("{a:vt}netrw_cpokeep")  |let &l:cpo    = {a:vt}netrw_cpokeep     |unlet {a:vt}netrw_cpokeep  |endif
+call s:NetrwRestoreSetting(a:vt."netrw_cpokeep","&l:cpo")
-if exists("{a:vt}netrw_diffkeep") |let &l:diff   = {a:vt}netrw_diffkeep    |unlet {a:vt}netrw_diffkeep |endif
+call s:NetrwRestoreSetting(a:vt."netrw_diffkeep","&l:diff")
-if exists("{a:vt}netrw_fenkeep")  |let &l:fen    = {a:vt}netrw_fenkeep     |unlet {a:vt}netrw_fenkeep  |endif
+call s:NetrwRestoreSetting(a:vt."netrw_fenkeep","&l:fen")
-if exists("g:netrw_ffkep") && g:netrw_ffkeep
+if exists("g:netrw_ffkeep") && g:netrw_ffkeep
-if exists("{a:vt}netrw_ffkeep")   |let &l:ff     = {a:vt}netrw_ffkeep      |unlet {a:vt}netrw_ffkeep   |endif
+call s:NetrwRestoreSetting(a:vt."netrw_ffkeep")","&l:ff")
 endif
-if exists("{a:vt}netrw_fokeep")   |let &l:fo     = {a:vt}netrw_fokeep      |unlet {a:vt}netrw_fokeep   |endif
+call s:NetrwRestoreSetting(a:vt."netrw_fokeep","&l:fo")
-if exists("{a:vt}netrw_gdkeep")   |let &l:gd     = {a:vt}netrw_gdkeep      |unlet {a:vt}netrw_gdkeep   |endif
+call s:NetrwRestoreSetting(a:vt."netrw_gdkeep","&l:gd")
-if exists("{a:vt}netrw_hidkeep")  |let &l:hidden = {a:vt}netrw_hidkeep     |unlet {a:vt}netrw_hidkeep  |endif
+call s:NetrwRestoreSetting(a:vt."netrw_hidkeep","&l:hidden")
-if exists("{a:vt}netrw_imkeep")   |let &l:im     = {a:vt}netrw_imkeep      |unlet {a:vt}netrw_imkeep   |endif
+call s:NetrwRestoreSetting(a:vt."netrw_imkeep","&l:im")
-if exists("{a:vt}netrw_iskkeep")  |let &l:isk    = {a:vt}netrw_iskkeep     |unlet {a:vt}netrw_iskkeep  |endif
+call s:NetrwRestoreSetting(a:vt."netrw_iskkeep","&l:isk")
-if exists("{a:vt}netrw_lskeep")   |let &l:ls     = {a:vt}netrw_lskeep      |unlet {a:vt}netrw_lskeep   |endif
+call s:NetrwRestoreSetting(a:vt."netrw_lskeep","&l:ls")
-if exists("{a:vt}netrw_makeep")   |let &l:ma     = {a:vt}netrw_makeep      |unlet {a:vt}netrw_makeep   |endif
+call s:NetrwRestoreSetting(a:vt."netrw_makeep","&l:ma")
-if exists("{a:vt}netrw_magickeep")|let &l:magic  = {a:vt}netrw_magickeep   |unlet {a:vt}netrw_magickeep|endif
+call s:NetrwRestoreSetting(a:vt."netrw_magickeep","&l:magic")
-if exists("{a:vt}netrw_modkeep")  |let &l:mod    = {a:vt}netrw_modkeep     |unlet {a:vt}netrw_modkeep  |endif
+call s:NetrwRestoreSetting(a:vt."netrw_modkeep","&l:mod")
-if exists("{a:vt}netrw_nukeep")   |let &l:nu     = {a:vt}netrw_nukeep      |unlet {a:vt}netrw_nukeep   |endif
+call s:NetrwRestoreSetting(a:vt."netrw_nukeep","&l:nu")
-if exists("{a:vt}netrw_rnukeep")  |let &l:rnu    = {a:vt}netrw_rnukeep     |unlet {a:vt}netrw_rnukeep  |endif
+call s:NetrwRestoreSetting(a:vt."netrw_rnukeep","&l:rnu")
-if exists("{a:vt}netrw_repkeep")  |let &l:report = {a:vt}netrw_repkeep     |unlet {a:vt}netrw_repkeep  |endif
+call s:NetrwRestoreSetting(a:vt."netrw_repkeep","&l:report")
-if exists("{a:vt}netrw_rokeep")   |let &l:ro     = {a:vt}netrw_rokeep      |unlet {a:vt}netrw_rokeep   |endif
+call s:NetrwRestoreSetting(a:vt."netrw_rokeep","&l:ro")
-if exists("{a:vt}netrw_selkeep")  |let &l:sel    = {a:vt}netrw_selkeep     |unlet {a:vt}netrw_selkeep  |endif
+call s:NetrwRestoreSetting(a:vt."netrw_selkeep","&l:sel")
-if exists("{a:vt}netrw_spellkeep")|let &l:spell  = {a:vt}netrw_spellkeep   |unlet {a:vt}netrw_spellkeep|endif
+call s:NetrwRestoreSetting(a:vt."netrw_spellkeep","&l:spell")
-if has("clipboard")
+call s:NetrwRestoreSetting(a:vt."netrw_twkeep","&l:tw")
-if exists("{a:vt}netrw_starkeep") |let @*        = {a:vt}netrw_starkeep    |unlet {a:vt}netrw_starkeep |endif
+call s:NetrwRestoreSetting(a:vt."netrw_wigkeep","&l:wig")
-endif
+call s:NetrwRestoreSetting(a:vt."netrw_wrapkeep","&l:wrap")
+call s:NetrwRestoreSetting(a:vt."netrw_writekeep","&l:write")
+call s:NetrwRestoreSetting("s:yykeep","@@")
 " Problem: start with liststyle=0; press <i> : result, following line resets l:ts.
-"  if exists("{a:vt}netrw_tskeep")   |let &l:ts     = {a:vt}netrw_tskeep      |unlet {a:vt}netrw_tskeep   |endif
+call s:NetrwRestoreSetting(a:vt."netrw_tskeep","&l:ts")
-if exists("{a:vt}netrw_twkeep")   |let &l:tw     = {a:vt}netrw_twkeep      |unlet {a:vt}netrw_twkeep   |endif
-if exists("{a:vt}netrw_wigkeep")  |let &l:wig    = {a:vt}netrw_wigkeep     |unlet {a:vt}netrw_wigkeep  |endif
-if exists("{a:vt}netrw_wrapkeep") |let &l:wrap   = {a:vt}netrw_wrapkeep    |unlet {a:vt}netrw_wrapkeep |endif
-if exists("{a:vt}netrw_writekeep")|let &l:write  = {a:vt}netrw_writekeep   |unlet {a:vt}netrw_writekeep|endif
-if exists("s:yykeep")             |let  @@       = s:yykeep                |unlet s:yykeep             |endif
 if exists("{a:vt}netrw_swfkeep")
 if &directory == ""
 " user hasn't specified a swapfile directory;
 " netrw will temporarily set the swapfile directory
 " to the current directory as returned by getcwd().
 call s:NetrwLcd(dirkeep)
 unlet {a:vt}netrw_dirkeep
 endif
 endif
 if has("clipboard")
-if exists("{a:vt}netrw_regstar") |sil! let @*= {a:vt}netrw_regstar |unlet {a:vt}netrw_regstar |endif
+call s:NetrwRestoreSetting(a:vt."netrw_starkeep","@*")
-endif
+call s:NetrwRestoreSetting(a:vt."netrw_pluskeep","@+")
-if exists("{a:vt}netrw_regslash")|sil! let @/= {a:vt}netrw_regslash|unlet {a:vt}netrw_regslash|endif
+endif
-call s:RestorePosn(s:netrw_nbcd)
+call s:NetrwRestoreSetting(a:vt."netrw_slashkeep","@/")
 "  call Decho("g:netrw_keepdir=".g:netrw_keepdir.": getcwd<".getcwd()."> acd=".&acd,'~'.expand("<slnum>"))
 "  call Decho("fo=".&fo.(exists("+acd")? " acd=".&acd : " acd doesn't exist"),'~'.expand("<slnum>"))
 "  call Decho("ro=".&l:ro." ma=".&l:ma." mod=".&l:mod." wrap=".&l:wrap." (filename<".expand("%")."> win#".winnr()." ft<".&ft.">)",'~'.expand("<slnum>"))
 "  call Decho("diff=".&l:diff." win#".winnr()." w:netrw_diffkeep=".(exists("w:netrw_diffkeep")? w:netrw_diffkeep : "doesn't exist"),'~'.expand("<slnum>"))
 let {a:vt}netrw_selkeep   = &l:sel
 let {a:vt}netrw_spellkeep = &l:spell
 if !g:netrw_use_noswf
 let {a:vt}netrw_swfkeep  = &l:swf
 endif
-if has("clipboard")
-let {a:vt}netrw_starkeep = @*
-endif
 let {a:vt}netrw_tskeep    = &l:ts
 let {a:vt}netrw_twkeep    = &l:tw           " textwidth
 let {a:vt}netrw_wigkeep   = &l:wig          " wildignore
 let {a:vt}netrw_wrapkeep  = &l:wrap
 let {a:vt}netrw_writekeep = &l:write
 "  call Decho("saving a few selected netrw-related variables",'~'.expand("<slnum>"))
 if g:netrw_keepdir
 let {a:vt}netrw_dirkeep  = getcwd()
 endif
 if has("clipboard")
-if &go =~# 'a' | sil! let {a:vt}netrw_regstar = @* | endif
+sil! let {a:vt}netrw_starkeep = @*
-endif
+sil! let {a:vt}netrw_pluskeep = @+
-sil! let {a:vt}netrw_regslash= @/
+endif
+sil! let {a:vt}netrw_slashkeep= @/
 "  call Decho("settings buf#".bufnr("%")."<".bufname("%").">: ".((&l:ma == 0)? "no" : "")."ma ".((&l:mod == 0)? "no" : "")."mod ".((&l:bl == 0)? "no" : "")."bl ".((&l:ro == 0)? "no" : "")."ro fo=".&l:fo." a:vt=".a:vt,'~'.expand("<slnum>"))
 "  call Dret("s:NetrwOptionSave : tab#".tabpagenr()." win#".winnr())
 endfun
 " ------------------------------------------------------------------------
+" s:NetrwRestoreSetting: restores specified setting using associated keepvar, {{{2
+"                        but only if the setting value differs from the associated keepvar.
+"                        Doing this means that netrw will not come up as having changed a
+"                        setting last when it really didn't actually change it.
+"                        Used by s:NetrwOptionRestore() to restore each netrw-senstive setting
+"                        and  by s:NetrwSafeOptions()
+fun! s:NetrwRestoreSetting(keepvar,setting)
+"  call Dfunc("s:NetrwRestoreSetting(keepvar<".a:keepvar."> setting<".a:setting.">)")
+if a:keepvar =~ '^&'
+exe "let keepvarval= ".a:keepvar
+if keepvarval != a:setting
+if type(a:setting) == 0
+exe "let ".a:keepvar."=".a:setting
+elseif type(a:setting) == 1
+exe "let ".a:keepvar."= '".a:setting."'"
+else
+call netrw#ErrorMsg(s:ERROR,"(s:NetrwRestoreSetting) doesn't know how to restore ".a:keepvar." with a setting of type#".type(a:setting),105)
+endif
+endif
+elseif exists(a:keepvar)
+exe "let keepvarval= '".a:keepvar."'"
+if keepvarval != a:setting
+if type(a:setting) == 0
+exe "let ".a:keepvar."= ".a:setting
+elseif type(a:setting) == 1
+exe "let ".a:keepvar."= '".a:setting."'"
+else
+call netrw#ErrorMsg(s:ERROR,"(s:NetrwRestoreSetting) doesn't know how to restore ".a:keepvar." with a setting of type#".type(a:setting),105)
+endif
+endif
+exe "unlet ".a:keepvar
+endif
+"  call Dret("s:NetrwRestoreSetting")
+endfun
+" ---------------------------------------------------------------------
 " s:NetrwSafeOptions: sets options to help netrw do its job {{{2
 "                     Use  s:NetrwSaveOptions() to save user settings
 "                     Use  s:NetrwOptionRestore() to restore user settings
 fun! s:NetrwSafeOptions()
 "  call Dfunc("s:NetrwSafeOptions() win#".winnr()." buf#".bufnr("%")."<".bufname(bufnr("%"))."> winnr($)=".winnr("$"))
 "  call Decho("win#".winnr()."'s ft=".&ft,'~'.expand("<slnum>"))
 "  call Decho("settings buf#".bufnr("%")."<".bufname("%").">: ".((&l:ma == 0)? "no" : "")."ma ".((&l:mod == 0)? "no" : "")."mod ".((&l:bl == 0)? "no" : "")."bl ".((&l:ro == 0)? "no" : "")."ro fo=".&l:fo,'~'.expand("<slnum>"))
-if exists("+acd") | setl noacd | endif
+if exists("+acd") | call s:NetrwRestoreSetting("&l:acd",0)|endif
-setl noai
+call s:NetrwRestoreSetting("&l:ai",0)
-setl noaw
+call s:NetrwRestoreSetting("&l:aw",0)
-setl nobl
+call s:NetrwRestoreSetting("&l:bl",0)
-setl nobomb
+call s:NetrwRestoreSetting("&l:bomb",0)
-setl bt=nofile
+call s:NetrwRestoreSetting("&l:bt","nofile")
-setl noci
+call s:NetrwRestoreSetting("&l:ci",0)
-setl nocin
+call s:NetrwRestoreSetting("&l:cin",0)
-setl bh=hide
+call s:NetrwRestoreSetting("&l:bh","hide")
-setl cino=
+call s:NetrwRestoreSetting("&l:cino","")
-setl com=
+call s:NetrwRestoreSetting("&l:com","")
-setl cpo-=a
+if &cpo =~ 'a' | call s:NetrwRestoreSetting("&cpo",substitute(&cpo,'a','','g')) | endif
-setl cpo-=A
+if &cpo =~ 'A' | call s:NetrwRestoreSetting("&cpo",substitute(&cpo,'A','','g')) | endif
 setl fo=nroql2
-setl nohid
+call s:NetrwRestoreSetting("&l:hid",0)
-setl noim
+call s:NetrwRestoreSetting("&l:im",0)
 setl isk+=@ isk+=* isk+=/
-setl magic
+call s:NetrwRestoreSetting("&l:magic",1)
 if g:netrw_use_noswf
-setl noswf
+call s:NetrwRestoreSetting("swf",0)
 endif
-setl report=10000
+call s:NetrwRestoreSetting("&l:report",10000)
-setl sel=inclusive
+call s:NetrwRestoreSetting("&l:sel","inclusive")
-setl nospell
+call s:NetrwRestoreSetting("&l:spell",0)
-setl tw=0
+call s:NetrwRestoreSetting("&l:tw",0)
-setl wig=
+call s:NetrwRestoreSetting("&l:wig","")
 setl cedit&
 call s:NetrwCursor()
 " allow the user to override safe options
 "  call Decho("ft<".&ft."> ei=".&ei,'~'.expand("<slnum>"))
 if &ft == "netrw"
 "   call Decho("do any netrw FileType autocmds (doau FileType netrw)",'~'.expand("<slnum>"))
-sil! keepalt NetrwKeepj doau FileType netrw
+keepalt NetrwKeepj doau FileType netrw
 endif
 "  call Decho("fo=".&fo.(exists("+acd")? " acd=".&acd : " acd doesn't exist")." bh=".&l:bh." bt<".&bt.">",'~'.expand("<slnum>"))
 "  call Decho("settings buf#".bufnr("%")."<".bufname("%").">: ".((&l:ma == 0)? "no" : "")."ma ".((&l:mod == 0)? "no" : "")."mod ".((&l:bl == 0)? "no" : "")."bl ".((&l:ro == 0)? "no" : "")."ro fo=".&l:fo,'~'.expand("<slnum>"))
 "  call Dret("s:NetrwSafeOptions")
 else
 return "Match ".w:netrw_explore_mtchcnt." of ".w:netrw_explore_listlen
 endif
 endfun
-" ---------------------------------------------------------------------
+" ===============================
 "  Netrw Transfer Functions: {{{1
 " ===============================
 " ------------------------------------------------------------------------
 " netrw#NetRead: responsible for reading a file over the net {{{2
 let ichoice= ichoice + 1
 " NetRead: Determine method of read (ftp, rcp, etc) {{{3
 call s:NetrwMethod(choice)
 if !exists("b:netrw_method") || b:netrw_method < 0
-"    call Dfunc("netrw#NetRead : unsupported method")
+"    call Dret("netrw#NetRead : unsupported method")
 return
 endif
 let tmpfile= s:GetTempfile(b:netrw_fname) " apply correct suffix
 " Check whether or not NetrwBrowse() should be handling this request
 if g:netrw_scp_cmd =~ '^scp' && (has("win32") || has("win95") || has("win64") || has("win16"))
 let tmpfile_get = substitute(tr(tmpfile, '\', '/'), '^\(\a\):[/\\]\(.*\)$', '/\1/\2', '')
 else
 let tmpfile_get = tmpfile
 endif
-call s:NetrwExe(s:netrw_silentxfer."!".g:netrw_scp_cmd.useport." ".s:ShellEscape(g:netrw_machine.":".b:netrw_fname,1)." ".s:ShellEscape(tmpfile_get,1))
+call s:NetrwExe(s:netrw_silentxfer."!".g:netrw_scp_cmd.useport." ".escape(s:ShellEscape(g:netrw_machine.":".b:netrw_fname,1),' ')." ".s:ShellEscape(tmpfile_get,1))
 let result           = s:NetrwGetFile(readcmd, tmpfile, b:netrw_method)
 let b:netrw_lastfile = choice
 ".........................................
 " NetRead: (http) NetRead Method #5 (wget) {{{3
 ".........................................
 " NetRead: (rsync) NetRead Method #7 {{{3
 elseif     b:netrw_method  == 7
 "    call Decho("read via rsync (method #7)",'~'.expand("<slnum>"))
-call s:NetrwExe(s:netrw_silentxfer."!".g:netrw_rsync_cmd." ".s:ShellEscape(g:netrw_machine.":".b:netrw_fname,1)." ".s:ShellEscape(tmpfile,1))
+call s:NetrwExe(s:netrw_silentxfer."!".g:netrw_rsync_cmd." ".s:ShellEscape(g:netrw_machine.g:netrw_rsync_sep.b:netrw_fname,1)." ".s:ShellEscape(tmpfile,1))
 let result		 = s:NetrwGetFile(readcmd,tmpfile, b:netrw_method)
 let b:netrw_lastfile = choice
 ".........................................
 " NetRead: (fetch) NetRead Method #8 {{{3
 let curl= substitute(g:netrw_http_put_cmd,'\s\+.*$',"","")
 if executable(curl)
 let url= g:netrw_choice
 call s:NetrwExe(s:netrw_silentxfer."!".g:netrw_http_put_cmd." ".s:ShellEscape(tmpfile,1)." ".s:ShellEscape(url,1) )
 elseif !exists("g:netrw_quiet")
-call netrw#ErrorMsg(s:ERROR,"can't write to http using <".g:netrw_http_put_cmd".">".",16)
+call netrw#ErrorMsg(s:ERROR,"can't write to http using <".g:netrw_http_put_cmd.">".",16)
 endif
 ".........................................
 " NetWrite: (dav) NetWrite Method #6 (cadaver) {{{3
 elseif     b:netrw_method == 6
 ".........................................
 " NetWrite: (rsync) NetWrite Method #7 {{{3
 elseif     b:netrw_method == 7
 "    call Decho("write via rsync (method #7)",'~'.expand("<slnum>"))
-call s:NetrwExe(s:netrw_silentxfer."!".g:netrw_rsync_cmd." ".s:ShellEscape(tmpfile,1)." ".s:ShellEscape(g:netrw_machine.":".b:netrw_fname,1))
+call s:NetrwExe(s:netrw_silentxfer."!".g:netrw_rsync_cmd." ".s:ShellEscape(tmpfile,1)." ".s:ShellEscape(g:netrw_machine.g:netrw_rsync_sep.b:netrw_fname,1))
 let b:netrw_lastfile = choice
 ".........................................
 " NetWrite: (sftp) NetWrite Method #9 {{{3
 elseif     b:netrw_method == 9
 endfun
 " ---------------------------------------------------------------------
 " netrw#SetTreetop: resets the tree top to the current directory/specified directory {{{2
 "                   (implements the :Ntree command)
-fun! netrw#SetTreetop(...)
+fun! netrw#SetTreetop(iscmd,...)
-"  call Dfunc("netrw#SetTreetop(".((a:0 > 0)? a:1 : "").") a:0=".a:0)
+"  call Dfunc("netrw#SetTreetop(iscmd=".a:iscmd." ".((a:0 > 0)? a:1 : "").") a:0=".a:0)
+"  call Decho("w:netrw_treetop<".w:netrw_treetop.">")
+" iscmd==0: netrw#SetTreetop called using gn mapping
+" iscmd==1: netrw#SetTreetop called using :Ntree from the command line
+"  call Decho("(iscmd=".a:iscmd.": called using :Ntree from command line",'~'.expand("<slnum>"))
 " clear out the current tree
 if exists("w:netrw_treetop")
 "   call Decho("clearing out current tree",'~'.expand("<slnum>"))
 let inittreetop= w:netrw_treetop
 unlet w:netrw_treetop
 endif
 if exists("w:netrw_treedict")
 "   call Decho("freeing w:netrw_treedict",'~'.expand("<slnum>"))
 unlet w:netrw_treedict
 endif
+"  call Decho("inittreetop<".(exists("inittreetop")? inittreetop : "n/a").">")
-if a:1 == "" && exists("inittreetop")
+if (a:iscmd == 0 || a:1 == "") && exists("inittreetop")
 let treedir= s:NetrwTreePath(inittreetop)
 "   call Decho("treedir<".treedir.">",'~'.expand("<slnum>"))
 else
 if isdirectory(s:NetrwFile(a:1))
 "    call Decho("a:1<".a:1."> is a directory",'~'.expand("<slnum>"))
 let treedir= a:1
 elseif exists("b:netrw_curdir") && (isdirectory(s:NetrwFile(b:netrw_curdir."/".a:1)) || a:1 =~ '^\a\{3,}://')
 let treedir= b:netrw_curdir."/".a:1
-"    call Decho("a:1<".a:1."> is NOT a directory, trying treedir<".treedir.">",'~'.expand("<slnum>"))
+"    call Decho("a:1<".a:1."> is NOT a directory, using treedir<".treedir.">",'~'.expand("<slnum>"))
 else
 " normally the cursor is left in the message window.
 " However, here this results in the directory being listed in the message window, which is not wanted.
 let netrwbuf= bufnr("%")
 call netrw#ErrorMsg(s:ERROR,"sorry, ".a:1." doesn't seem to be a directory!",95)
 exe bufwinnr(netrwbuf)."wincmd w"
 let treedir= "."
 endif
 endif
 "  call Decho("treedir<".treedir.">",'~'.expand("<slnum>"))
+" determine if treedir is remote or local
 let islocal= expand("%") !~ '^\a\{3,}://'
 "  call Decho("islocal=".islocal,'~'.expand("<slnum>"))
+" browse the resulting directory
 if islocal
 call netrw#LocalBrowseCheck(s:NetrwBrowseChgDir(islocal,treedir))
 else
 call s:NetrwBrowse(islocal,s:NetrwBrowseChgDir(islocal,treedir))
 endif
 "  call Dret("netrw#SetTreetop")
 endfun
 " ===========================================
 " s:NetrwGetFile: Function to read temporary file "tfile" with command "readcmd". {{{2
 if g:netrw_cygwin
 let tfile= substitute(a:tfile,g:netrw_cygdrive.'/\(.\)','\1:','')
 else
 let tfile= a:tfile
 endif
-"   call Decho("exe sil! keepalt file ".fnameescape(tfile),'~'.expand("<slnum>"))
+call s:NetrwBufRename(tfile)
-exe "sil! keepalt file ".fnameescape(tfile)
 " edit temporary file (ie. read the temporary file in)
 if     rfile =~ '\.zip$'
 "    call Decho("handling remote zip file with zip#Browse(tfile<".tfile.">)",'~'.expand("<slnum>"))
 call zip#Browse(tfile)
 "    call Decho("edit temporary file",'~'.expand("<slnum>"))
 NetrwKeepj e!
 endif
 " rename buffer back to remote filename
-"   call Decho("exe sil! keepalt file ".fnameescape(rfile),'~'.expand("<slnum>"))
+call s:NetrwBufRename(rfile)
-exe "sil! NetrwKeepj keepalt file ".fnameescape(rfile)
 " Detect filetype of local version of remote file.
 " Note that isk must not include a "/" for scripts.vim
 " to process this detection correctly.
 "   call Decho("detect filetype of local version of remote file",'~'.expand("<slnum>"))
 let iskkeep= &l:isk
 setl isk-=/
 let &l:isk= iskkeep
-"   call Dredir("renamed buffer back to remote filename<".rfile."> : expand(%)<".expand("%").">","ls!")
+"   call Dredir("ls!","NetrwGetFile (renamed buffer back to remote filename<".rfile."> : expand(%)<".expand("%").">)")
 let line1 = 1
 let line2 = line("$")
 elseif !&ma
 " attempting to read a file after the current line in the file, but the buffer is not modifiable
 "  g:netrw_machine= hostname
 "  b:netrw_fname  = filename
 "  g:netrw_port   = optional port number (for ftp)
 "  g:netrw_choice = copy of input url (choice)
 fun! s:NetrwMethod(choice)
-"   call Dfunc("NetrwMethod(a:choice<".a:choice.">)")
+"   call Dfunc("s:NetrwMethod(a:choice<".a:choice.">)")
 " sanity check: choice should have at least three slashes in it
 if strlen(substitute(a:choice,'[^/]','','g')) < 3
 call netrw#ErrorMsg(s:ERROR,"not a netrw-style url; netrw uses protocol://[user@]hostname[:port]/[path])",78)
 let b:netrw_method = -1
-"    call Dret("NetrwMethod : incorrect url format<".a:choice.">")
+"    call Dret("s:NetrwMethod : incorrect url format<".a:choice.">")
 return
 endif
 " record current g:netrw_machine, if any
 " curmachine used if protocol == ftp and no .netrc
 if userid != ""
 let g:netrw_uid= userid
 endif
 if curmachine != g:netrw_machine
-if exists("s:netwr_hup[".g:netrw_machine."]")
+if exists("s:netrw_hup[".g:netrw_machine."]")
 call NetUserPass("ftp:".g:netrw_machine)
 elseif exists("s:netrw_passwd")
 " if there's a change in hostname, require password re-entry
 unlet s:netrw_passwd
 endif
 "  endif					"Decho
 "  if exists("s:netrw_passwd")		"Decho
 "   call Decho("s:netrw_passwd <".s:netrw_passwd.">",'~'.expand("<slnum>"))
 "  endif					"Decho
 "  call Decho("b:netrw_fname  <".b:netrw_fname.">",'~'.expand("<slnum>"))
-"  call Dret("NetrwMethod : b:netrw_method=".b:netrw_method." g:netrw_port=".g:netrw_port)
+"  call Dret("s:NetrwMethod : b:netrw_method=".b:netrw_method." g:netrw_port=".g:netrw_port)
 endfun
 " ------------------------------------------------------------------------
 " NetReadFixup: this sort of function is typically written by the user {{{2
 "               to handle extra junk that their system's ftp dumps
 endif
 " call Dret("NetUserPass : uid<".g:netrw_uid."> passwd<".s:netrw_passwd.">")
 endfun
-" ===========================================
+" =================================
 "  Shared Browsing Support:    {{{1
-" ===========================================
+" =================================
 " ---------------------------------------------------------------------
 " s:ExplorePatHls: converts an Explore pattern into a regular expression search pattern {{{2
 fun! s:ExplorePatHls(pattern)
 "  call Dfunc("s:ExplorePatHls(pattern<".a:pattern.">)")
 fun! s:NetrwBrowse(islocal,dirname)
 if !exists("w:netrw_liststyle")|let w:netrw_liststyle= g:netrw_liststyle|endif
 "  call Dfunc("s:NetrwBrowse(islocal=".a:islocal." dirname<".a:dirname.">) liststyle=".w:netrw_liststyle." ".g:loaded_netrw." buf#".bufnr("%")."<".bufname("%")."> win#".winnr())
 "  call Decho("modified=".&modified." modifiable=".&modifiable." readonly=".&readonly,'~'.expand("<slnum>"))
 "  call Decho("tab#".tabpagenr()." win#".winnr()." buf#".bufnr("%")."<".bufname("%")."> line#".line(".")." col#".col(".")." winline#".winline()." wincol#".wincol(),'~'.expand("<slnum>"))
-"  call Dredir("ls!")
+"  call Dredir("ls!","s:NetrwBrowse")
 " save alternate-file's filename if w:netrw_rexlocal doesn't exist
 " This is useful when one edits a local file, then :e ., then :Rex
 if a:islocal && !exists("w:netrw_rexfile") && bufname("#") != ""
 let w:netrw_rexfile= bufname("#")
 let dirname= simplify(a:dirname)
 else
 let dirname= a:dirname
 endif
+" repoint t:netrw_lexbufnr if appropriate
+if exists("t:netrw_lexbufnr") && bufnr("%") == t:netrw_lexbufnr
+"   call Decho("set repointlexbufnr to true!")
+let repointlexbufnr= 1
+endif
 if exists("s:netrw_skipbrowse")
 unlet s:netrw_skipbrowse
 "   call Decho(" ro=".&l:ro." ma=".&l:ma." mod=".&l:mod." wrap=".&l:wrap." filename<".expand("%")."> win#".winnr()." ft<".&ft.">",'~'.expand("<slnum>"))
 "   call Dret("s:NetrwBrowse : s:netrw_skipbrowse existed")
 return
 " s:NetrwBrowse : save options: {{{3
 call s:NetrwOptionSave("w:")
 " s:NetrwBrowse : re-instate any marked files {{{3
-if exists("s:netrwmarkfilelist_{bufnr('%')}")
+if has("syntax") && exists("g:syntax_on") && g:syntax_on
-"   call Decho("clearing marked files",'~'.expand("<slnum>"))
+if exists("s:netrwmarkfilelist_{bufnr('%')}")
-exe "2match netrwMarkFile /".s:netrwmarkfilemtch_{bufnr("%")}."/"
+"    call Decho("clearing marked files",'~'.expand("<slnum>"))
+exe "2match netrwMarkFile /".s:netrwmarkfilemtch_{bufnr("%")}."/"
+endif
 endif
 if a:islocal && exists("w:netrw_acdkeep") && w:netrw_acdkeep
 " s:NetrwBrowse : set up "safe" options for local directory/file {{{3
 "   call Decho("handle w:netrw_acdkeep:",'~'.expand("<slnum>"))
 "   call Decho("NetrwKeepj lcd ".fnameescape(dirname)." (due to w:netrw_acdkeep=".w:netrw_acdkeep." - acd=".&acd.")",'~'.expand("<slnum>"))
-call s:NetrwLcd(dirname)
+if s:NetrwLcd(dirname)
-call s:NetrwSafeOptions()
+"    call Dret("s:NetrwBrowse : lcd failure")
+return
+endif
+"   call s:NetrwSafeOptions() " tst953 failed with this enabled.
 "   call Decho("getcwd<".getcwd().">",'~'.expand("<slnum>"))
 elseif !a:islocal && dirname !~ '[\/]$' && dirname !~ '^"'
 " s:NetrwBrowse :  remote regular file handler {{{3
 "   call Decho("handle remote regular file: dirname<".dirname.">",'~'.expand("<slnum>"))
 call s:NetrwSafeOptions()
 setl ma noro
 "    call Decho("setl ma noro",'~'.expand("<slnum>"))
 let b:netrw_curdir = dirname
 let url            = s:method."://".((s:user == "")? "" : s:user."@").s:machine.(s:port ? ":".s:port : "")."/".s:path
-"    call Decho("exe sil! keepalt file ".fnameescape(url)." (bt=".&bt.")",'~'.expand("<slnum>"))
+call s:NetrwBufRename(url)
-exe "sil! NetrwKeepj keepalt file ".fnameescape(url)
 exe "sil! NetrwKeepj keepalt doau BufReadPre ".fnameescape(s:fname)
 sil call netrw#NetRead(2,url)
 " netrw.vim and tar.vim have already handled decompression of the tarball; avoiding gzip.vim error
 "    call Decho("url<".url.">",'~'.expand("<slnum>"))
 "    call Decho("s:path<".s:path.">",'~'.expand("<slnum>"))
 let svpos  = winsaveview()
 "  call Decho("saving posn to svpos<".string(svpos).">",'~'.expand("<slnum>"))
 let reusing= s:NetrwGetBuffer(a:islocal,dirname)
 " maintain markfile highlighting
-if exists("s:netrwmarkfilemtch_{bufnr('%')}") && s:netrwmarkfilemtch_{bufnr("%")} != ""
+if has("syntax") && exists("g:syntax_on") && g:syntax_on
-"   call Decho("bufnr(%)=".bufnr('%'),'~'.expand("<slnum>"))
+if exists("s:netrwmarkfilemtch_{bufnr('%')}") && s:netrwmarkfilemtch_{bufnr("%")} != ""
-"   call Decho("exe 2match netrwMarkFile /".s:netrwmarkfilemtch_{bufnr("%")}."/",'~'.expand("<slnum>"))
+" "   call Decho("bufnr(%)=".bufnr('%'),'~'.expand("<slnum>"))
-exe "2match netrwMarkFile /".s:netrwmarkfilemtch_{bufnr("%")}."/"
+" "   call Decho("exe 2match netrwMarkFile /".s:netrwmarkfilemtch_{bufnr("%")}."/",'~'.expand("<slnum>"))
-else
+exe "2match netrwMarkFile /".s:netrwmarkfilemtch_{bufnr("%")}."/"
-"   call Decho("2match none",'~'.expand("<slnum>"))
+else
-2match none
+" "   call Decho("2match none",'~'.expand("<slnum>"))
+2match none
+endif
 endif
 if reusing && line("$") > 1
 call s:NetrwOptionRestore("w:")
 "   call Decho("setl noma nomod nowrap",'~'.expand("<slnum>"))
 setl noma nomod nowrap
 " handle g:netrw_keepdir: set vim's current directory to netrw's notion of the current directory {{{3
 if !g:netrw_keepdir
 "    call Decho("handle g:netrw_keepdir=".g:netrw_keepdir.": getcwd<".getcwd()."> acd=".&acd,'~'.expand("<slnum>"))
 "    call Decho("l:acd".(exists("&l:acd")? "=".&l:acd : " doesn't exist"),'~'.expand("<slnum>"))
 if !exists("&l:acd") || !&l:acd
-call s:NetrwLcd(b:netrw_curdir)
+if s:NetrwLcd(b:netrw_curdir)
+"      call Dret("s:NetrwBrowse : lcd failure")
+return
+endif
 endif
 endif
 " --------------------------------
 " remote handling: {{{3
 endif
 if v:version >= 700 && has("balloon_eval") && &beval == 0 && &l:bexpr == "" && !exists("g:netrw_nobeval")
 let &l:bexpr= "netrw#BalloonHelp()"
 "   call Decho("set up balloon help: l:bexpr=".&l:bexpr,'~'.expand("<slnum>"))
 setl beval
+endif
+" repoint t:netrw_lexbufnr if appropriate
+if exists("repointlexbufnr")
+let t:netrw_lexbufnr= bufnr("%")
+"   call Decho("repoint t:netrw_lexbufnr to #".t:netrw_lexbufnr)
 endif
 " restore position
 if reusing
 "   call Decho("restoring posn to svpos<".string(svpos).">",'~'.expand("<slnum>"))
 "  " call Dret("s:NetrwFullPath <".filename.">")
 return filename
 endfun
 " ---------------------------------------------------------------------
-" s:NetrwGetBuffer: {{{2
+" s:NetrwGetBuffer: [get a new|find an old netrw] buffer for a netrw listing {{{2
 "   returns 0=cleared buffer
 "           1=re-used buffer (buffer not cleared)
 fun! s:NetrwGetBuffer(islocal,dirname)
 "  call Dfunc("s:NetrwGetBuffer(islocal=".a:islocal." dirname<".a:dirname.">) liststyle=".g:netrw_liststyle)
 "  call Decho("settings buf#".bufnr("%")."<".bufname("%").">: ".((&l:ma == 0)? "no" : "")."ma ".((&l:mod == 0)? "no" : "")."mod ".((&l:bl == 0)? "no" : "")."bl ".((&l:ro == 0)? "no" : "")."ro fo=".&l:fo,'~'.expand("<slnum>"))
-"  call Decho("netrwbuf dictionary=".string(s:netrwbuf),'~'.expand("<slnum>"))
+"  call Decho("netrwbuf dictionary=".(exists("s:netrwbuf")? string(s:netrwbuf) : 'n/a'),'~'.expand("<slnum>"))
 let dirname= a:dirname
 " re-use buffer if possible {{{3
 "  call Decho("--re-use a buffer if possible--",'~'.expand("<slnum>"))
 if !exists("s:netrwbuf")
+"   call Decho("  s:netrwbuf initialized to {}",'~'.expand("<slnum>"))
 let s:netrwbuf= {}
 endif
-if has_key(s:netrwbuf,s:NetrwFullPath(dirname))
+"  call Decho("  s:netrwbuf         =".string(s:netrwbuf),'~'.expand("<slnum>"))
+"  call Decho("  w:netrw_liststyle  =".(exists("w:netrw_liststyle")? w:netrw_liststyle : "n/a"),'~'.expand("<slnum>"))
+if exists("w:netrw_liststyle") && w:netrw_liststyle == s:TREELIST
+let bufnum = -1
+if !empty(s:netrwbuf) && has_key(s:netrwbuf,s:NetrwFullPath(dirname))
+if has_key(s:netrwbuf,"NetrwTreeListing")
+let bufnum= s:netrwbuf["NetrwTreeListing"]
+else
+let bufnum= s:netrwbuf[s:NetrwFullPath(dirname)]
+endif
+"    call Decho("  NetrwTreeListing: bufnum#".bufnum,'~'.expand("<slnum>"))
+if !bufexists(bufnum)
+call remove(s:netrwbuf,"NetrwTreeListing"])
+let bufnum= -1
+endif
+elseif bufnr("NetrwTreeListing") != -1
+let bufnum= bufnr("NetrwTreeListing")
+"    call Decho("  NetrwTreeListing".": bufnum#".bufnum,'~'.expand("<slnum>"))
+else
+"    call Decho("  did not find a NetrwTreeListing buffer",'~'.expand("<slnum>"))
+let bufnum= -1
+endif
+elseif has_key(s:netrwbuf,s:NetrwFullPath(dirname))
 let bufnum= s:netrwbuf[s:NetrwFullPath(dirname)]
-"   call Decho("lookup netrwbuf dictionary: s:netrwbuf[".s:NetrwFullPath(dirname)."]=".bufnum)
+"   call Decho("  lookup netrwbuf dictionary: s:netrwbuf[".s:NetrwFullPath(dirname)."]=".bufnum,'~'.expand("<slnum>"))
 if !bufexists(bufnum)
 call remove(s:netrwbuf,s:NetrwFullPath(dirname))
 let bufnum= -1
 endif
-else
-"   call Decho("lookup netrwbuf dictionary: s:netrwbuf[".s:NetrwFullPath(dirname)."] not a key")
+else
+"   call Decho("  lookup netrwbuf dictionary: s:netrwbuf[".s:NetrwFullPath(dirname)."] not a key",'~'.expand("<slnum>"))
 let bufnum= -1
 endif
+"  call Decho("  bufnum#".bufnum,'~'.expand("<slnum>"))
 " get enew buffer and name it -or- re-use buffer {{{3
 if bufnum < 0      " get enew buffer and name it
 "   call Decho("--get enew buffer and name it  (bufnum#".bufnum."<0 OR bufexists(".bufnum.")=".bufexists(bufnum)."==0)",'~'.expand("<slnum>"))
 call s:NetrwEnew(dirname)
 "   call Decho("  got enew buffer#".bufnr("%")." (altbuf<".expand("#").">)",'~'.expand("<slnum>"))
 " name the buffer
 if exists("w:netrw_liststyle") && w:netrw_liststyle == s:TREELIST
 " Got enew buffer; transform into a NetrwTreeListing
 "    call Decho("--transform enew buffer#".bufnr("%")." into a NetrwTreeListing --",'~'.expand("<slnum>"))
-if !exists("s:netrw_treelistnum")
+let w:netrw_treebufnr = bufnr("%")
-let s:netrw_treelistnum= 1
+call s:NetrwBufRename("NetrwTreeListing")
-else
-let s:netrw_treelistnum= s:netrw_treelistnum + 1
-endif
-let w:netrw_treebufnr= bufnr("%")
-"    call Decho("  exe sil! keepalt file NetrwTreeListing ".fnameescape(s:netrw_treelistnum),'~'.expand("<slnum>"))
-exe 'sil! keepalt file NetrwTreeListing\ '.fnameescape(s:netrw_treelistnum)
 if g:netrw_use_noswf
 setl nobl bt=nofile noswf
 else
 setl nobl bt=nofile
 endif
 nnoremap <silent> <buffer> [[       :sil call <SID>TreeListMove('[[')<cr>
 nnoremap <silent> <buffer> ]]       :sil call <SID>TreeListMove(']]')<cr>
 nnoremap <silent> <buffer> []       :sil call <SID>TreeListMove('[]')<cr>
 nnoremap <silent> <buffer> ][       :sil call <SID>TreeListMove('][')<cr>
-"    call Decho("  tree listing#".s:netrw_treelistnum." bufnr=".w:netrw_treebufnr,'~'.expand("<slnum>"))
+"    call Decho("  tree listing bufnr=".w:netrw_treebufnr,'~'.expand("<slnum>"))
 else
-"    let v:errmsg   = "" " Decho
+call s:NetrwBufRename(dirname)
-let escdirname = fnameescape(dirname)
-"    call Decho("  errmsg<".v:errmsg."> bufnr(escdirname<".escdirname.">)=".bufnr(escdirname)." bufname()<".bufname(bufnr(escdirname)).">",'~'.expand("<slnum>"))
-"    call Decho('  exe sil! keepalt file '.escdirname,'~'.expand("<slnum>"))
-"    let v:errmsg= "" " Decho
-exe 'sil! keepj keepalt file '.escdirname
-"    call Decho("  errmsg<".v:errmsg."> bufnr(".escdirname.")=".bufnr(escdirname)."<".bufname(bufnr(escdirname)).">",'~'.expand("<slnum>"))
 " enter the new buffer into the s:netrwbuf dictionary
 let s:netrwbuf[s:NetrwFullPath(dirname)]= bufnr("%")
 "    call Decho("update netrwbuf dictionary: s:netrwbuf[".s:NetrwFullPath(dirname)."]=".bufnr("%"),'~'.expand("<slnum>"))
 "    call Decho("netrwbuf dictionary=".string(s:netrwbuf),'~'.expand("<slnum>"))
 endif
 "    call Decho("  getline(2)<".getline(2).'> does not match "Netrw Directory Listing" : using b '.bufnum,'~'.expand("<slnum>"))
 exe "sil! NetrwKeepj noswapfile keepalt b ".bufnum
 endif
 "   call Decho("  line($)=".line("$"),'~'.expand("<slnum>"))
 if bufname("%") == '.'
-"    call Decho("exe sil! keepalt file ".fnameescape(getcwd()),'~'.expand("<slnum>"))
+call s:NetrwBufRename(getcwd())
-exe "sil! NetrwKeepj keepalt file ".fnameescape(getcwd())
 endif
 let &ei= eikeep
 if line("$") <= 1 && getline(1) == ""
 " empty buffer
 return 0
 elseif exists("w:netrw_liststyle") && w:netrw_liststyle == s:TREELIST
 "    call Decho("--re-use tree listing--",'~'.expand("<slnum>"))
 "    call Decho("  clear buffer<".expand("%")."> with :%d",'~'.expand("<slnum>"))
+setl ma
 sil NetrwKeepj %d _
 NetrwKeepj call s:NetrwListSettings(a:islocal)
 "    call Decho("settings buf#".bufnr("%")."<".bufname("%").">: ".((&l:ma == 0)? "no" : "")."ma ".((&l:mod == 0)? "no" : "")."mod ".((&l:bl == 0)? "no" : "")."bl ".((&l:ro == 0)? "no" : "")."ro fo=".&l:fo,'~'.expand("<slnum>"))
 "    call Decho("tab#".tabpagenr()." win#".winnr()." buf#".bufnr("%")."<".bufname("%")."> line#".line(".")." col#".col(".")." winline#".winline()." wincol#".wincol(),'~'.expand("<slnum>"))
 "    call Dret("s:NetrwGetBuffer 0<cleared buffer> : re-using buffer#".bufnr("%").", but treelist mode always needs a refresh")
 "  med    1         D      H
 "  fast   2         H      H
 "  call Decho("--do netrw settings: make this buffer#".bufnr("%")." not-a-file, modifiable, not line-numbered, etc--",'~'.expand("<slnum>"))
 let fname= expand("%")
 NetrwKeepj call s:NetrwListSettings(a:islocal)
-"  call Decho("exe sil! keepalt file ".fnameescape(fname),'~'.expand("<slnum>"))
+call s:NetrwBufRename(fname)
-exe "sil! NetrwKeepj keepalt file ".fnameescape(fname)
 " delete all lines from buffer {{{3
 "  call Decho("--delete all lines from buffer--",'~'.expand("<slnum>"))
 "  call Decho("  clear buffer<".expand("%")."> with :%d",'~'.expand("<slnum>"))
 sil! keepalt NetrwKeepj %d _
 "  call Dret("s:NetrwGetWord <".dirname.">")
 return dirname
 endfun
 " ---------------------------------------------------------------------
-" s:NetrwListSettings: make standard settings for a netrw listing {{{2
+" s:NetrwListSettings: make standard settings for making a netrw listing {{{2
+"                      g:netrw_bufsettings will be used after the listing is produced.
+"                      Called by s:NetrwGetBuffer()
 fun! s:NetrwListSettings(islocal)
 "  call Dfunc("s:NetrwListSettings(islocal=".a:islocal.")")
 "  call Decho("settings buf#".bufnr("%")."<".bufname("%").">: ".((&l:ma == 0)? "no" : "")."ma ".((&l:mod == 0)? "no" : "")."mod ".((&l:bl == 0)? "no" : "")."bl ".((&l:ro == 0)? "no" : "")."ro fo=".&l:fo,'~'.expand("<slnum>"))
 let fname= bufname("%")
 "  "  call Decho("(NetrwListSettings) setl bt=nofile nobl ma nonu nowrap noro nornu",'~'.expand("<slnum>"))
-setl bt=nofile nobl ma nonu nowrap noro nornu
+"              nobl noma nomod nonu noma nowrap ro   nornu  (std g:netrw_bufsettings)
-"  call Decho("(NetrwListSettings) exe sil! keepalt file ".fnameescape(fname),'~'.expand("<slnum>"))
+setl bt=nofile nobl ma         nonu      nowrap noro nornu
-exe "sil! keepalt file ".fnameescape(fname)
+call s:NetrwBufRename(fname)
 if g:netrw_use_noswf
 setl noswf
 endif
-"  call Dredir("ls!")
+"  call Dredir("ls!","s:NetrwListSettings")
 "  call Decho("(NetrwListSettings) exe setl ts=".(g:netrw_maxfilenamelen+1),'~'.expand("<slnum>"))
 exe "setl ts=".(g:netrw_maxfilenamelen+1)
 setl isk+=.,~,-
 if g:netrw_fastbrowse > a:islocal
 setl bh=hide
 "  call Decho("settings buf#".bufnr("%")."<".bufname("%").">: ".((&l:ma == 0)? "no" : "")."ma ".((&l:mod == 0)? "no" : "")."mod ".((&l:bl == 0)? "no" : "")."bl ".((&l:ro == 0)? "no" : "")."ro fo=".&l:fo,'~'.expand("<slnum>"))
 "  call Dret("s:NetrwListSettings")
 endfun
 " ---------------------------------------------------------------------
-"  s:NetrwListStyle: {{{2
+"  s:NetrwListStyle: change list style (thin - long - wide - tree) {{{2
 "  islocal=0: remote browsing
 "         =1: local browsing
 fun! s:NetrwListStyle(islocal)
 "  call Dfunc("NetrwListStyle(islocal=".a:islocal.") w:netrw_liststyle=".w:netrw_liststyle)
 let w:netrw_liststyle = (w:netrw_liststyle + 1) % s:MAXLIST
 "  call Decho("fname<".fname.">",'~'.expand("<slnum>"))
 "  call Decho("chgd w:netrw_liststyle to ".w:netrw_liststyle,'~'.expand("<slnum>"))
 "  call Decho("b:netrw_curdir<".(exists("b:netrw_curdir")? b:netrw_curdir : "doesn't exist").">",'~'.expand("<slnum>"))
+" repoint t:netrw_lexbufnr if appropriate
+if exists("t:netrw_lexbufnr") && bufnr("%") == t:netrw_lexbufnr
+"   call Decho("set repointlexbufnr to true!")
+let repointlexbufnr= 1
+endif
 if w:netrw_liststyle == s:THINLIST
 " use one column listing
 "   call Decho("use one column list",'~'.expand("<slnum>"))
 let g:netrw_list_cmd = substitute(g:netrw_list_cmd,' -l','','ge')
 " refresh the listing
 "  call Decho("refresh the listing",'~'.expand("<slnum>"))
 NetrwKeepj call s:NetrwRefresh(a:islocal,s:NetrwBrowseChgDir(a:islocal,'./'))
 NetrwKeepj call s:NetrwCursor()
+" repoint t:netrw_lexbufnr if appropriate
+if exists("repointlexbufnr")
+let t:netrw_lexbufnr= bufnr("%")
+"   call Decho("repoint t:netrw_lexbufnr to #".t:netrw_lexbufnr)
+endif
 " restore position; keep cursor on the filename
 "  call Decho("restoring posn to svpos<".string(svpos).">",'~'.expand("<slnum>"))
 NetrwKeepj call winrestview(svpos)
 let @@= ykeep
 let svpos= winsaveview()
 "  call Decho("saving posn to svpos<".string(svpos).">",'~'.expand("<slnum>"))
 call s:NetrwRefresh(a:islocal,s:NetrwBrowseChgDir(a:islocal,'./'))
 " keep cursor on the filename
-let fname= s:NetrwGetWord()
+if g:netrw_banner && exists("w:netrw_bannercnt") && line(".") >= w:netrw_bannercnt
-sil NetrwKeepj $
+let fname= s:NetrwGetWord()
-let result= search('\%(^\%(|\+\s\)\=\|\s\{2,}\)\zs'.escape(fname,'.\[]*$^').'\%(\s\{2,}\|$\)','bc')
+sil NetrwKeepj $
-"  call Decho("search result=".result." w:netrw_bannercnt=".(exists("w:netrw_bannercnt")? w:netrw_bannercnt : 'N/A'),'~'.expand("<slnum>"))
+let result= search('\%(^\%(|\+\s\)\=\|\s\{2,}\)\zs'.escape(fname,'.\[]*$^').'\%(\s\{2,}\|$\)','bc')
-if result <= 0 && exists("w:netrw_bannercnt")
+" "  call Decho("search result=".result." w:netrw_bannercnt=".(exists("w:netrw_bannercnt")? w:netrw_bannercnt : 'N/A'),'~'.expand("<slnum>"))
-exe "NetrwKeepj ".w:netrw_bannercnt
+if result <= 0 && exists("w:netrw_bannercnt")
+exe "NetrwKeepj ".w:netrw_bannercnt
+endif
 endif
 let @@= ykeep
 "  call Dret("s:NetrwBannerCtrl : g:netrw_banner=".g:netrw_banner)
 endfun
 " Don't try to change-directory: this can happen, for example, when netrw#ErrorMsg has been called
 " and the current window is the NetrwMessage window.
 let @@= ykeep
 "   call Decho("b:netrw_curdir doesn't exist!",'~'.expand("<slnum>"))
 "   call Decho("getcwd<".getcwd().">",'~'.expand("<slnum>"))
-"   call Dredir("ls!")
+"   call Dredir("ls!","s:NetrwBrowseChgDir")
 "   call Dret("s:NetrwBrowseChgDir")
 return
 endif
 "  call Decho("b:netrw_curdir<".b:netrw_curdir.">")
 " NetrwBrowseChgDir: save options and initialize {{{3
 "  call Decho("saving options",'~'.expand("<slnum>"))
-call s:SavePosn(s:netrw_nbcd)
+call s:SavePosn(s:netrw_posn)
 NetrwKeepj call s:NetrwOptionSave("s:")
 NetrwKeepj call s:NetrwSafeOptions()
 if (has("win32") || has("win95") || has("win64") || has("win16"))
 let dirname = substitute(b:netrw_curdir,'\\','/','ge')
 else
 let g:netrw_quickhelp= (g:netrw_quickhelp + 1)%len(s:QuickHelp)
 "     call Decho("#2: quickhelp=".g:netrw_quickhelp." ro=".&l:ro." ma=".&l:ma." mod=".&l:mod." wrap=".&l:wrap." (filename<".expand("%")."> win#".winnr()." ft<".&ft.">)",'~'.expand("<slnum>"))
 setl ma noro nowrap
 NetrwKeepj call setline(line('.'),'"   Quick Help: <F1>:help  '.s:QuickHelp[g:netrw_quickhelp])
 setl noma nomod nowrap
-call s:RestorePosn(s:netrw_nbcd)
 NetrwKeepj call s:NetrwOptionRestore("s:")
 "     call Decho("ro=".&l:ro." ma=".&l:ma." mod=".&l:mod." wrap=".&l:wrap." (filename<".expand("%")."> win#".winnr()." ft<".&ft.">)",'~'.expand("<slnum>"))
 endif
 endif
 "  else " Decho
 "   call Decho("doing option restore (dorestore=".dorestore.")",'~'.expand("<slnum>"))
 NetrwKeepj call s:NetrwOptionRestore("s:")
 "  else " Decho
 "   call Decho("skipping option restore (dorestore==0): hidden=".&hidden." bufhidden=".&bufhidden." mod=".&mod,'~'.expand("<slnum>"))
 endif
-call s:RestorePosn(s:netrw_nbcd)
 if dolockout && dorestore
 "   call Decho("restore: filewritable(dirname<".dirname.">)=".filewritable(dirname),'~'.expand("<slnum>"))
 if filewritable(dirname)
 "    call Decho("restore: doing modification lockout settings: ma nomod noro",'~'.expand("<slnum>"))
 "    call Decho("restore: setl ma nomod noro",'~'.expand("<slnum>"))
 "    call Decho("restore: setl ma nomod noro",'~'.expand("<slnum>"))
 setl ma ro nomod
 "    call Decho("restore: ro=".&l:ro." ma=".&l:ma." mod=".&l:mod." wrap=".&l:wrap." (filename<".expand("%")."> win#".winnr()." ft<".&ft.">)",'~'.expand("<slnum>"))
 endif
 endif
+call s:RestorePosn(s:netrw_posn)
 let @@= ykeep
 "  call Dret("s:NetrwBrowseChgDir <".dirname."> : curpos<".string(getpos(".")).">")
 return dirname
 endfun
 " directories.
 "   call Dret("s:NetrwBrowseUpDir : cursor not in file area")
 return
 endif
-if !exists("w:netrw_liststyle") || w:netrw_liststyle != s:TREELIST
-call s:SavePosn(s:netrw_nbcd)
-endif
 norm! 0
 if exists("w:netrw_liststyle") && w:netrw_liststyle == s:TREELIST && exists("w:netrw_treedict")
 "   call Decho("case: treestyle",'~'.expand("<slnum>"))
 let curline= getline(".")
 let swwline= winline() - 1
 if exists("w:netrw_treetop")
 let b:netrw_curdir= w:netrw_treetop
-endif
+elseif exists("b:netrw_curdir")
-let curdir= b:netrw_curdir
+let w:netrw_treetop= b:netrw_curdir
+else
+let w:netrw_treetop= getcwd()
+let b:netrw_curdir = w:netrw_treetop
+endif
+let curfile = getline(".")
+let curpath = s:NetrwTreePath(w:netrw_treetop)
 if a:islocal
 call netrw#LocalBrowseCheck(s:NetrwBrowseChgDir(1,'../'))
 else
 call s:NetrwBrowse(0,s:NetrwBrowseChgDir(0,'../'))
 endif
-if !search('\c^'.s:treedepthstring.curline,'cw')
+"   call Decho("looking for curfile<^".s:treedepthstring.curfile.">",'~'.expand("<slnum>"))
-if !search('\c^'.curline,'cw')
+"   call Decho("having      curpath<".curpath.">",'~'.expand("<slnum>"))
-sil! NetrwKeepj 1
+if w:netrw_treetop == '/'
-endif
+keepj call search('^\M'.curfile,"w")
-endif
+elseif curfile == '../'
-exe "sil! NetrwKeepj norm! z\<cr>"
+keepj call search('^\M'.curfile,"wb")
-while winline() < swwline
+else
-let curwinline= winline()
+"    call Decho("search(^\\M".s:treedepthstring.curfile.") backwards"))
-exe "sil! NetrwKeepj norm! \<c-y>"
+while 1
-if curwinline == winline()
+keepj call search('^\M'.s:treedepthstring.curfile,"wb")
-break
+let treepath= s:NetrwTreePath(w:netrw_treetop)
-endif
+"     call Decho("..current treepath<".treepath.">",'~'.expand("<slnum>"))
-endwhile
+if treepath == curpath
+break
+endif
+endwhile
+endif
 else
 "   call Decho("case: not treestyle",'~'.expand("<slnum>"))
+call s:SavePosn(s:netrw_posn)
 if exists("b:netrw_curdir")
 let curdir= b:netrw_curdir
 else
 let curdir= expand(getcwd())
 endif
 if a:islocal
 call netrw#LocalBrowseCheck(s:NetrwBrowseChgDir(1,'../'))
 else
 call s:NetrwBrowse(0,s:NetrwBrowseChgDir(0,'../'))
 endif
-if has_key(s:netrw_nbcd,bufnr("%"))
+call s:RestorePosn(s:netrw_posn)
-call s:RestorePosn(s:netrw_nbcd)
+let curdir= substitute(curdir,'^.*[\/]','','')
-elseif exists("w:netrw_bannercnt")
+call search('\<'.curdir.'/','wc')
-"    call Decho("moving to line#".w:netrw_bannercnt,'~'.expand("<slnum>"))
+endif
-exe w:netrw_bannercnt
-else
-1
-endif
-endif
-let curdir= substitute(curdir,'^.*[\/]','','')
-call search('\<'.curdir.'\>','wc')
 "  call Dret("s:NetrwBrowseUpDir")
 endfun
 " ---------------------------------------------------------------------
 " netrw#BrowseX:  (implements "x") executes a special "viewer" script or program for the {{{2
 "              given filename; typically this means given their extension.
 "              0=local, 1=remote
 fun! netrw#BrowseX(fname,remote)
 "  call Dfunc("netrw#BrowseX(fname<".a:fname."> remote=".a:remote.")")
-" if its really just a directory, then do a "gf" instead
+" if its really just a local directory, then do a "gf" instead
-if (a:remote == 0 && isdirectory(a:fname)) || (a:remote == 1 && fname =~ '/$' && fname !~ '^https\=:')
+if (a:remote == 0 && isdirectory(a:fname)) || (a:remote == 1 && a:fname =~ '/$' && a:fname !~ '^https\=:')
 norm! gf
-"   call Dret("netrw#BrowseX : did gf instead")
+"   call Dret("(netrw#BrowseX) did gf instead")
 endif
 let ykeep      = @@
 let screenposn = winsaveview()
-"  call Decho("saving posn to screenposn<".string(screenposn).">",'~'.expand("<slnum>"))
+"  call Decho("(netrw#BrowseX) saving posn to screenposn<".string(screenposn).">",'~'.expand("<slnum>"))
 " need to save and restore aw setting as gx can invoke this function from non-netrw buffers
 let awkeep     = &aw
 set noaw
 " special core dump handler
 if a:fname =~ '/core\(\.\d\+\)\=$'
 if exists("g:Netrw_corehandler")
 if type(g:Netrw_corehandler) == 2
 " g:Netrw_corehandler is a function reference (see :help Funcref)
-"     call Decho("g:Netrw_corehandler is a funcref",'~'.expand("<slnum>"))
+"     call Decho("(netrw#BrowseX) g:Netrw_corehandler is a funcref",'~'.expand("<slnum>"))
 call g:Netrw_corehandler(s:NetrwFile(a:fname))
 elseif type(g:Netrw_corehandler) == 3
 " g:Netrw_corehandler is a List of function references (see :help Funcref)
-"     call Decho("g:Netrw_corehandler is a List",'~'.expand("<slnum>"))
+"     call Decho("(netrw#BrowseX) g:Netrw_corehandler is a List",'~'.expand("<slnum>"))
 for Fncref in g:Netrw_corehandler
 if type(FncRef) == 2
 call FncRef(a:fname)
 endif
 endfor
 endif
-"    call Decho("restoring posn to screenposn<".string(screenposn).">,'~'.expand("<slnum>"))"
+"    call Decho("(netrw#BrowseX) restoring posn: screenposn<".string(screenposn).">,'~'.expand("<slnum>"))"
 call winrestview(screenposn)
 let @@= ykeep
 let &aw= awkeep
 "    call Dret("netrw#BrowseX : coredump handler invoked")
 return
 " (lower case the extension, make a local copy of a remote file)
 let exten= substitute(a:fname,'.*\.\(.\{-}\)','\1','e')
 if has("win32") || has("win95") || has("win64") || has("win16")
 let exten= substitute(exten,'^.*$','\L&\E','')
 endif
-"  call Decho("exten<".exten.">",'~'.expand("<slnum>"))
+if exten =~ "[\\/]"
+let exten= ""
+endif
+"  call Decho("(netrw#BrowseX) exten<".exten.">",'~'.expand("<slnum>"))
 if a:remote == 1
 " create a local copy
-"   call Decho("remote: a:remote=".a:remote.": create a local copy of <".a:fname.">",'~'.expand("<slnum>"))
+"   call Decho("(netrw#BrowseX) remote: a:remote=".a:remote.": create a local copy of <".a:fname.">",'~'.expand("<slnum>"))
 setl bh=delete
 call netrw#NetRead(3,a:fname)
 " attempt to rename tempfile
 let basename= substitute(a:fname,'^\(.*\)/\(.*\)\.\([^.]*\)$','\2','')
 let newname = substitute(s:netrw_tmpfile,'^\(.*\)/\(.*\)\.\([^.]*\)$','\1/'.basename.'.\3','')
-"   call Decho("basename<".basename.">",'~'.expand("<slnum>"))
+"   call Decho("(netrw#BrowseX) basename<".basename.">",'~'.expand("<slnum>"))
-"   call Decho("newname <".newname.">",'~'.expand("<slnum>"))
+"   call Decho("(netrw#BrowseX) newname <".newname.">",'~'.expand("<slnum>"))
-if rename(s:netrw_tmpfile,newname) == 0
+if s:netrw_tmpfile != newname && newname != ""
-" renaming succeeded
+if rename(s:netrw_tmpfile,newname) == 0
-let fname= newname
+" renaming succeeded
-else
+"     call Decho("(netrw#BrowseX) renaming succeeded (tmpfile<".s:netrw_tmpfile."> to <".newname.">)")
-" renaming failed
+let fname= newname
+else
+" renaming failed
+"     call Decho("(netrw#BrowseX) renaming failed (tmpfile<".s:netrw_tmpfile."> to <".newname.">)")
+let fname= s:netrw_tmpfile
+endif
+else
 let fname= s:netrw_tmpfile
 endif
 else
-"   call Decho("local: a:remote=".a:remote.": handling local copy of <".a:fname.">",'~'.expand("<slnum>"))
+"   call Decho("(netrw#BrowseX) local: a:remote=".a:remote.": handling local copy of <".a:fname.">",'~'.expand("<slnum>"))
 let fname= a:fname
 " special ~ handler for local
 if fname =~ '^\~' && expand("$HOME") != ""
 "    call Decho('invoking special ~ handler','~'.expand("<slnum>"))
 let fname= s:NetrwFile(substitute(fname,'^\~',expand("$HOME"),''))
 endif
 endif
-"  call Decho("fname<".fname.">",'~'.expand("<slnum>"))
+"  call Decho("(netrw#BrowseX) fname<".fname.">",'~'.expand("<slnum>"))
-"  call Decho("exten<".exten."> "."netrwFileHandlers#NFH_".exten."():exists=".exists("*netrwFileHandlers#NFH_".exten),'~'.expand("<slnum>"))
+"  call Decho("(netrw#BrowseX) exten<".exten."> "."netrwFileHandlers#NFH_".exten."():exists=".exists("*netrwFileHandlers#NFH_".exten),'~'.expand("<slnum>"))
 " set up redirection (avoids browser messages)
 " by default, g:netrw_suppress_gx_mesg is true
 if g:netrw_suppress_gx_mesg
 if &srr =~ "%s"
 let redir= &srr . "nul"
 else
 let redir= &srr . "/dev/null"
 endif
 endif
-"  call Decho("set up redirection: redir{".redir."} srr{".&srr."}",'~'.expand("<slnum>"))
+"  call Decho("(netrw#BrowseX) set up redirection: redir{".redir."} srr{".&srr."}",'~'.expand("<slnum>"))
 " extract any viewing options.  Assumes that they're set apart by quotes.
-"  call Decho("extract any viewing options",'~'.expand("<slnum>"))
+"  call Decho("(netrw#BrowseX) extract any viewing options",'~'.expand("<slnum>"))
 if exists("g:netrw_browsex_viewer")
-"   call Decho("g:netrw_browsex_viewer<".g:netrw_browsex_viewer.">",'~'.expand("<slnum>"))
+"   call Decho("(netrw#BrowseX) g:netrw_browsex_viewer<".g:netrw_browsex_viewer.">",'~'.expand("<slnum>"))
 if g:netrw_browsex_viewer =~ '\s'
 let viewer  = substitute(g:netrw_browsex_viewer,'\s.*$','','')
 let viewopt = substitute(g:netrw_browsex_viewer,'^\S\+\s*','','')." "
 let oviewer = ''
 let cnt     = 1
 while !executable(viewer) && viewer != oviewer
 let viewer  = substitute(g:netrw_browsex_viewer,'^\(\(^\S\+\s\+\)\{'.cnt.'}\S\+\)\(.*\)$','\1','')
 let viewopt = substitute(g:netrw_browsex_viewer,'^\(\(^\S\+\s\+\)\{'.cnt.'}\S\+\)\(.*\)$','\3','')." "
 let cnt     = cnt + 1
 let oviewer = viewer
-"     call Decho("!exe: viewer<".viewer.">  viewopt<".viewopt.">",'~'.expand("<slnum>"))
+"     call Decho("(netrw#BrowseX) !exe: viewer<".viewer.">  viewopt<".viewopt.">",'~'.expand("<slnum>"))
 endwhile
 else
 let viewer  = g:netrw_browsex_viewer
 let viewopt = ""
 endif
-"   call Decho("viewer<".viewer.">  viewopt<".viewopt.">",'~'.expand("<slnum>"))
+"   call Decho("(netrw#BrowseX) viewer<".viewer.">  viewopt<".viewopt.">",'~'.expand("<slnum>"))
 endif
 " execute the file handler
-"  call Decho("execute the file handler (if any)",'~'.expand("<slnum>"))
+"  call Decho("(netrw#BrowseX) execute the file handler (if any)",'~'.expand("<slnum>"))
 if exists("g:netrw_browsex_viewer") && g:netrw_browsex_viewer == '-'
-"   call Decho("g:netrw_browsex_viewer<".g:netrw_browsex_viewer.">",'~'.expand("<slnum>"))
+"   call Decho("(netrw#BrowseX) g:netrw_browsex_viewer<".g:netrw_browsex_viewer.">",'~'.expand("<slnum>"))
 let ret= netrwFileHandlers#Invoke(exten,fname)
 elseif exists("g:netrw_browsex_viewer") && executable(viewer)
-"   call Decho("g:netrw_browsex_viewer<".g:netrw_browsex_viewer.">",'~'.expand("<slnum>"))
+"   call Decho("(netrw#BrowseX) g:netrw_browsex_viewer<".g:netrw_browsex_viewer.">",'~'.expand("<slnum>"))
 call s:NetrwExe("sil !".viewer." ".viewopt.s:ShellEscape(fname,1).redir)
 let ret= v:shell_error
 elseif has("win32") || has("win64")
-"   call Decho("windows",'~'.expand("<slnum>"))
+"   call Decho("(netrw#BrowseX) win".(has("win32")? "32" : "64")",'~'.expand("<slnum>"))
 if executable("start")
 call s:NetrwExe('sil! !start rundll32 url.dll,FileProtocolHandler '.s:ShellEscape(fname,1))
 elseif executable("rundll32")
 call s:NetrwExe('sil! !rundll32 url.dll,FileProtocolHandler '.s:ShellEscape(fname,1))
 else
 call netrw#ErrorMsg(s:WARNING,"rundll32 not on path",74)
 endif
-call inputsave()|call input("Press <cr> to continue")|call inputrestore()
+" call inputsave()|call input("Press <cr> to continue")|call inputrestore()
 let ret= v:shell_error
 elseif has("win32unix")
 let winfname= 'c:\cygwin'.substitute(fname,'/','\\','g')
-"   call Decho("cygwin: winfname<".s:ShellEscape(winfname,1).">",'~'.expand("<slnum>"))
+"   call Decho("(netrw#BrowseX) cygwin: winfname<".s:ShellEscape(winfname,1).">",'~'.expand("<slnum>"))
 if executable("start")
 call s:NetrwExe('sil !start rundll32 url.dll,FileProtocolHandler '.s:ShellEscape(winfname,1))
 elseif executable("rundll32")
 call s:NetrwExe('sil !rundll32 url.dll,FileProtocolHandler '.s:ShellEscape(winfname,1))
 elseif executable("cygstart")
 call s:NetrwExe('sil !cygstart '.s:ShellEscape(fname,1))
 else
 call netrw#ErrorMsg(s:WARNING,"rundll32 not on path",74)
 endif
-call inputsave()|call input("Press <cr> to continue")|call inputrestore()
+" call inputsave()|call input("Press <cr> to continue")|call inputrestore()
 let ret= v:shell_error
 elseif has("unix") && executable("kfmclient") && s:CheckIfKde()
-"   call Decho("unix and kfmclient",'~'.expand("<slnum>"))
+"   call Decho("(netrw#BrowseX) unix and kfmclient",'~'.expand("<slnum>"))
 call s:NetrwExe("sil !kfmclient exec ".s:ShellEscape(fname,1)." ".redir)
 let ret= v:shell_error
 elseif has("unix") && executable("exo-open") && executable("xdg-open") && executable("setsid")
-"   call Decho("unix, exo-open, xdg-open",'~'.expand("<slnum>"))
+"   call Decho("(netrw#BrowseX) unix, exo-open, xdg-open",'~'.expand("<slnum>"))
 call s:NetrwExe("sil !setsid xdg-open ".s:ShellEscape(fname,1).redir)
 let ret= v:shell_error
+elseif has("unix") && $DESKTOP_SESSION == "mate" && executable("atril")
+"   call Decho("(netrw#BrowseX) unix and atril",'~'.expand("<slnum>"))
+call s:NetrwExe("sil !atril ".s:ShellEscape(fname,1).redir)
+let ret= v:shell_error
 elseif has("unix") && executable("xdg-open")
-"   call Decho("unix and xdg-open",'~'.expand("<slnum>"))
+"   call Decho("(netrw#BrowseX) unix and xdg-open",'~'.expand("<slnum>"))
 call s:NetrwExe("sil !xdg-open ".s:ShellEscape(fname,1).redir)
 let ret= v:shell_error
 elseif has("macunix") && executable("open")
-"   call Decho("macunix and open",'~'.expand("<slnum>"))
+"   call Decho("(netrw#BrowseX) macunix and open",'~'.expand("<slnum>"))
 call s:NetrwExe("sil !open ".s:ShellEscape(fname,1)." ".redir)
 let ret= v:shell_error
 else
 " netrwFileHandlers#Invoke() always returns 0
 setl noswf
 endif
 exe "sil! NetrwKeepj norm! \<c-o>"
 "   redraw!
 endif
-"  call Decho("restoring posn to screenposn<".string(screenposn).">",'~'.expand("<slnum>"))
+"  call Decho("(netrw#BrowseX) restoring posn to screenposn<".string(screenposn).">",'~'.expand("<slnum>"))
 call winrestview(screenposn)
 let @@ = ykeep
 let &aw= awkeep
 "  call Dret("netrw#BrowseX")
+endfun
+" ---------------------------------------------------------------------
+" netrw#GX: gets word under cursor for gx support {{{2
+"           See also: netrw#BrowseXVis
+"                     netrw#BrowseX
+fun! netrw#GX()
+"  call Dfunc("netrw#GX()")
+if &ft == "netrw"
+let fname= s:NetrwGetWord()
+else
+let fname= expand((exists("g:netrw_gx")? g:netrw_gx : '<cfile>'))
+endif
+"  call Dret("netrw#GX <".fname.">")
+return fname
 endfun
 " ---------------------------------------------------------------------
 " netrw#BrowseXVis: used by gx in visual mode to select a file for browsing {{{2
 fun! netrw#BrowseXVis()
 "  call Dfunc("netrw#BrowseXVis()")
 let atkeep = @@
 norm! gvy
 "  call Decho("@@<".@@.">",'~'.expand("<slnum>"))
-call netrw#BrowseX(@@,netrw#CheckIfRemote())
+call netrw#BrowseX(@@,netrw#CheckIfRemote(@@))
 let @@     = atkeep
 "  call Dret("netrw#BrowseXVis")
 endfun
 " ---------------------------------------------------------------------
+" s:NetrwBufRename: renames a buffer without the side effect of retaining an unlisted buffer having the old name {{{2
+"                   Using the file command on a "[No Name]" buffer does not seem to cause the old "[No Name]" buffer
+"                   to become an unlisted buffer, so in that case don't bwipe it.
+fun! s:NetrwBufRename(newname)
+"  call Dfunc("s:NetrwBufRename(newname<".a:newname.">) buf(%)#".bufnr("%")."<".bufname(bufnr("%")).">")
+"  call Dredir("ls!","s:NetrwBufRename (before rename)")
+let oldbufname= bufname(bufnr("%"))
+"  call Decho("buf#".bufnr("%").": oldbufname<".oldbufname.">",'~'.expand("<slnum>"))
+if oldbufname != a:newname
+"   call Decho("do renaming (oldbufname != a:newname)",'~'.expand("<slnum>"))
+exe 'sil! keepj keepalt file '.fnameescape(a:newname)
+let oldbufnr= bufnr(oldbufname)
+if oldbufname != "" && oldbufnr != -1
+exe "bwipe! ".oldbufnr
+endif
+endif
+"  call Dredir("ls!","s:NetrwBufRename (after rename)")
+"  call Dret("s:NetrwBufRename : buf#".bufnr("%").": oldname<".oldbufname."> newname<".a:newname."> expand(%)<".expand("%").">")
+endfun
+" ---------------------------------------------------------------------
 " netrw#CheckIfRemote: returns 1 if current file looks like an url, 0 else {{{2
-fun! netrw#CheckIfRemote()
+fun! netrw#CheckIfRemote(...)
-"  call Dfunc("netrw#CheckIfRemote()")
+"  call Dfunc("netrw#CheckIfRemote() a:0=".a:0)
-if expand("%") =~ '^\a\{3,}://'
+if a:0 > 0
+let curfile= a:1
+else
+let curfile= expand("%")
+endif
+"  call Decho("curfile<".curfile.">")
+if curfile =~ '^\a\{3,}://'
 "   call Dret("netrw#CheckIfRemote 1")
 return 1
 else
 "   call Dret("netrw#CheckIfRemote 0")
 return 0
 " s:NetrwHidden: invoked by "gh" {{{2
 fun! s:NetrwHidden(islocal)
 "  call Dfunc("s:NetrwHidden()")
 let ykeep= @@
 "  save current position
-let svpos= winsaveview()
+let svpos  = winsaveview()
 "  call Decho("saving posn to svpos<".string(svpos).">",'~'.expand("<slnum>"))
 if g:netrw_list_hide =~ '\(^\|,\)\\(^\\|\\s\\s\\)\\zs\\.\\S\\+'
-" remove pattern from hiding list
+" remove .file pattern from hiding list
+"   call Decho("remove .file pattern from hiding list",'~'.expand("<slnum>"))
 let g:netrw_list_hide= substitute(g:netrw_list_hide,'\(^\|,\)\\(^\\|\\s\\s\\)\\zs\\.\\S\\+','','')
 elseif s:Strlen(g:netrw_list_hide) >= 1
+"   call Decho("add .file pattern from hiding list",'~'.expand("<slnum>"))
 let g:netrw_list_hide= g:netrw_list_hide . ',\(^\|\s\s\)\zs\.\S\+'
 else
+"   call Decho("set .file pattern as hiding list",'~'.expand("<slnum>"))
 let g:netrw_list_hide= '\(^\|\s\s\)\zs\.\S\+'
+endif
+if g:netrw_list_hide =~ '^,'
+let g:netrw_list_hide= strpart(g:netrw_list_hide,1)
 endif
 " refresh screen and return to saved position
 NetrwKeepj call s:NetrwRefresh(a:islocal,s:NetrwBrowseChgDir(a:islocal,'./'))
 "  call Decho("restoring posn to svpos<".string(svpos).">",'~'.expand("<slnum>"))
 " ---------------------------------------------------------------------
 "  s:NetrwHome: this function determines a "home" for saving bookmarks and history {{{2
 fun! s:NetrwHome()
 if exists("g:netrw_home")
-let home= g:netrw_home
+let home= expand(g:netrw_home)
 else
 " go to vim plugin home
 for home in split(&rtp,',') + ['']
 if isdirectory(s:NetrwFile(home)) && filewritable(s:NetrwFile(home)) | break | endif
 let basehome= substitute(home,'[/\\]\.vim$','','')
 let home= substitute(home,'/','\\','g')
 endif
 endif
 " insure that the home directory exists
 if g:netrw_dirhistmax > 0 && !isdirectory(s:NetrwFile(home))
+"   call Decho("insure that the home<".home."> directory exists")
 if exists("g:netrw_mkdir")
+"    call Decho("call system(".g:netrw_mkdir." ".s:ShellEscape(s:NetrwFile(home)).")")
 call system(g:netrw_mkdir." ".s:ShellEscape(s:NetrwFile(home)))
 else
+"    call Decho("mkdir(".home.")")
 call mkdir(home)
 endif
 endif
 let g:netrw_home= home
 return home
 " ---------------------------------------------------------------------
 " s:NetrwLeftmouse: handles the <leftmouse> when in a netrw browsing window {{{2
 fun! s:NetrwLeftmouse(islocal)
 if exists("s:netrwdrag")
+return
+endif
+if &ft != "netrw"
 return
 endif
 "  call Dfunc("s:NetrwLeftmouse(islocal=".a:islocal.")")
 let ykeep= @@
 endfun
 " ---------------------------------------------------------------------
 " s:NetrwCLeftmouse: used to select a file/directory for a target {{{2
 fun! s:NetrwCLeftmouse(islocal)
+if &ft != "netrw"
+return
+endif
 "  call Dfunc("s:NetrwCLeftmouse(islocal=".a:islocal.")")
 call s:NetrwMarkFileTgt(a:islocal)
 "  call Dret("s:NetrwCLeftmouse")
 endfun
 " ---------------------------------------------------------------------
 " s:NetrwServerEdit: edit file in a server gvim, usually NETRWSERVER  (implements <c-r>){{{2
 "   a:islocal=0 : <c-r> not used, remote
-"   a:islocal=1 : <c-r> no  used, local
+"   a:islocal=1 : <c-r> not used, local
 "   a:islocal=2 : <c-r>     used, remote
 "   a:islocal=3 : <c-r>     used, local
 fun! s:NetrwServerEdit(islocal,fname)
 "  call Dfunc("s:NetrwServerEdit(islocal=".a:islocal.",fname<".a:fname.">)")
 let islocal = a:islocal%2      " =0: remote           =1: local
 endfun
 " ---------------------------------------------------------------------
 " s:NetrwSLeftmouse: marks the file under the cursor.  May be dragged to select additional files {{{2
 fun! s:NetrwSLeftmouse(islocal)
+if &ft != "netrw"
+return
+endif
 "  call Dfunc("s:NetrwSLeftmouse(islocal=".a:islocal.")")
 let s:ngw= s:NetrwGetWord()
 call s:NetrwMarkFile(a:islocal,s:ngw)
 " ---------------------------------------------------------------------
 " s:NetrwListHide: uses [range]g~...~d to delete files that match comma {{{2
 " separated patterns given in g:netrw_list_hide
 fun! s:NetrwListHide()
 "  call Dfunc("s:NetrwListHide() g:netrw_hide=".g:netrw_hide." g:netrw_list_hide<".g:netrw_list_hide.">")
+"  call Decho("initial: ".string(getline(w:netrw_bannercnt,'$')))
 let ykeep= @@
 " find a character not in the "hide" string to use as a separator for :g and :v commands
 " How-it-works: take the hiding command, convert it into a range.  Duplicate
 " characters don't matter.  Remove all such characters from the '/~...90'
 let listhide = substitute(listhide,'^.\{-},\(.*\)$','\1','e')
 else
 let hide     = listhide
 let listhide = ""
 endif
+"   call Decho("hide<".hide."> listhide<".listhide.'>','~'.expand("<slnum>"))
 " Prune the list by hiding any files which match
 if g:netrw_hide == 1
-"    call Decho("hiding<".hide."> listhide<".listhide.">",'~'.expand("<slnum>"))
+"    call Decho("..hiding<".hide.">",'~'.expand("<slnum>"))
 exe 'sil! NetrwKeepj '.w:netrw_bannercnt.',$g'.sep.hide.sep.'d'
 elseif g:netrw_hide == 2
-"    call Decho("showing<".hide."> listhide<".listhide.">",'~'.expand("<slnum>"))
+"    call Decho("..showing<".hide.">",'~'.expand("<slnum>"))
 exe 'sil! NetrwKeepj '.w:netrw_bannercnt.',$g'.sep.hide.sep.'s@^@ /-KEEP-/ @'
 endif
+"   call Decho("..result: ".string(getline(w:netrw_bannercnt,'$')),'~'.expand("<slnum>"))
 endwhile
 if g:netrw_hide == 2
 exe 'sil! NetrwKeepj '.w:netrw_bannercnt.',$v@^ /-KEEP-/ @d'
+"   call Decho("..v KEEP: ".string(getline(w:netrw_bannercnt,'$')),'~'.expand("<slnum>"))
 exe 'sil! NetrwKeepj '.w:netrw_bannercnt.',$s@^\%( /-KEEP-/ \)\+@@e'
+"   call Decho("..g KEEP: ".string(getline(w:netrw_bannercnt,'$')),'~'.expand("<slnum>"))
 endif
 " remove any blank lines that have somehow remained.
 " This seems to happen under Windows.
 exe 'sil! NetrwKeepj 1,$g@^\s*$@d'
 else
 call mkdir(fullnewdir,"p")
 endif
 else
 let netrw_origdir= s:NetrwGetcwd(1)
-call s:NetrwLcd(b:netrw_curdir)
+if s:NetrwLcd(b:netrw_curdir)
+"    call Dret("s:NetrwMakeDir : lcd failure")
+return
+endif
 "    call Decho("netrw_origdir<".netrw_origdir.">: lcd b:netrw_curdir<".fnameescape(b:netrw_curdir).">",'~'.expand("<slnum>"))
-call s:NetrwExe("sil! !".g:netrw_localmkdir.' '.s:ShellEscape(newdirname,1))
+call s:NetrwExe("sil! !".g:netrw_localmkdir.g:netrw_localmkdiropt.' '.s:ShellEscape(newdirname,1))
 if v:shell_error != 0
 let @@= ykeep
 call netrw#ErrorMsg(s:ERROR,"consider setting g:netrw_localmkdir<".g:netrw_localmkdir."> to something that works",80)
 "     call Dret("s:NetrwMakeDir : failed: sil! !".g:netrw_localmkdir.' '.s:ShellEscape(newdirname,1))
 return
 endif
 if !g:netrw_keepdir
 "     call Decho("restoring netrw_origdir since g:netrw_keepdir=".g:netrw_keepdir,'~'.expand("<slnum>"))
-call s:NetrwLcd(netrw_origdir)
+if s:NetrwLcd(netrw_origdir)
+"     call Dret("s:NetrwBrowse : lcd failure")
+return
+endif
 endif
 endif
 if v:shell_error == 0
 " refresh listing
 " ---------------------------------------------------------------------
 " s:NetrwMaps: {{{2
 fun! s:NetrwMaps(islocal)
 "  call Dfunc("s:NetrwMaps(islocal=".a:islocal.") b:netrw_curdir<".b:netrw_curdir.">")
+" mouse <Plug> maps: {{{3
 if g:netrw_mousemaps && g:netrw_retmap
 "   call Decho("set up Rexplore 2-leftmouse",'~'.expand("<slnum>"))
 if !hasmapto("<Plug>NetrwReturn")
 if maparg("<2-leftmouse>","n") == "" || maparg("<2-leftmouse>","n") =~ '^-$'
 "     call Decho("making map for 2-leftmouse",'~'.expand("<slnum>"))
 endif
 nno <silent> <Plug>NetrwReturn	:Rexplore<cr>
 "   call Decho("made <Plug>NetrwReturn map",'~'.expand("<slnum>"))
 endif
+" generate default <Plug> maps {{{3
+if !hasmapto('<Plug>NetrwHide')              |nmap <buffer> <silent> <nowait> a	<Plug>NetrwHide_a|endif
+if !hasmapto('<Plug>NetrwBrowseUpDir')       |nmap <buffer> <silent> <nowait> -	<Plug>NetrwBrowseUpDir |endif
+if !hasmapto('<Plug>NetrwOpenFile')          |nmap <buffer> <silent> <nowait> %	<Plug>NetrwOpenFile|endif
+if !hasmapto('<Plug>NetrwBadd_cb')           |nmap <buffer> <silent> <nowait> cb	<Plug>NetrwBadd_cb|endif
+if !hasmapto('<Plug>NetrwBadd_cB')           |nmap <buffer> <silent> <nowait> cB	<Plug>NetrwBadd_cB|endif
+if !hasmapto('<Plug>NetrwLcd')               |nmap <buffer> <silent> <nowait> cd	<Plug>NetrwLcd|endif
+if !hasmapto('<Plug>NetrwSetChgwin')         |nmap <buffer> <silent> <nowait> C	<Plug>NetrwSetChgwin|endif
+if !hasmapto('<Plug>NetrwRefresh')           |nmap <buffer> <silent> <nowait> <c-l>	<Plug>NetrwRefresh|endif
+if !hasmapto('<Plug>NetrwLocalBrowseCheck')  |nmap <buffer> <silent> <nowait> <cr>	<Plug>NetrwLocalBrowseCheck|endif
+if !hasmapto('<Plug>NetrwServerEdit')        |nmap <buffer> <silent> <nowait> <c-r>	<Plug>NetrwServerEdit|endif
+if !hasmapto('<Plug>NetrwMakeDir')           |nmap <buffer> <silent> <nowait> d	<Plug>NetrwMakeDir|endif
+if !hasmapto('<Plug>NetrwBookHistHandler_gb')|nmap <buffer> <silent> <nowait> gb	<Plug>NetrwBookHistHandler_gb|endif
+" ---------------------------------------------------------------------
+"  if !hasmapto('<Plug>NetrwForceChgDir')       |nmap <buffer> <silent> <nowait> gd	<Plug>NetrwForceChgDir|endif
+"  if !hasmapto('<Plug>NetrwForceFile')         |nmap <buffer> <silent> <nowait> gf	<Plug>NetrwForceFile|endif
+"  if !hasmapto('<Plug>NetrwHidden')            |nmap <buffer> <silent> <nowait> gh	<Plug>NetrwHidden|endif
+"  if !hasmapto('<Plug>NetrwSetTreetop')        |nmap <buffer> <silent> <nowait> gn	<Plug>NetrwSetTreetop|endif
+"  if !hasmapto('<Plug>NetrwChgPerm')           |nmap <buffer> <silent> <nowait> gp	<Plug>NetrwChgPerm|endif
+"  if !hasmapto('<Plug>NetrwBannerCtrl')        |nmap <buffer> <silent> <nowait> I	<Plug>NetrwBannerCtrl|endif
+"  if !hasmapto('<Plug>NetrwListStyle')         |nmap <buffer> <silent> <nowait> i	<Plug>NetrwListStyle|endif
+"  if !hasmapto('<Plug>NetrwMarkMoveMF2Arglist')|nmap <buffer> <silent> <nowait> ma	<Plug>NetrwMarkMoveMF2Arglist|endif
+"  if !hasmapto('<Plug>NetrwMarkMoveArglist2MF')|nmap <buffer> <silent> <nowait> mA	<Plug>NetrwMarkMoveArglist2MF|endif
+"  if !hasmapto('<Plug>NetrwBookHistHandler_mA')|nmap <buffer> <silent> <nowait> mb	<Plug>NetrwBookHistHandler_mA|endif
+"  if !hasmapto('<Plug>NetrwBookHistHandler_mB')|nmap <buffer> <silent> <nowait> mB	<Plug>NetrwBookHistHandler_mB|endif
+"  if !hasmapto('<Plug>NetrwMarkFileCopy')      |nmap <buffer> <silent> <nowait> mc	<Plug>NetrwMarkFileCopy|endif
+"  if !hasmapto('<Plug>NetrwMarkFileDiff')      |nmap <buffer> <silent> <nowait> md	<Plug>NetrwMarkFileDiff|endif
+"  if !hasmapto('<Plug>NetrwMarkFileEdit')      |nmap <buffer> <silent> <nowait> me	<Plug>NetrwMarkFileEdit|endif
+"  if !hasmapto('<Plug>NetrwMarkFile')          |nmap <buffer> <silent> <nowait> mf	<Plug>NetrwMarkFile|endif
+"  if !hasmapto('<Plug>NetrwUnmarkList')        |nmap <buffer> <silent> <nowait> mF	<Plug>NetrwUnmarkList|endif
+"  if !hasmapto('<Plug>NetrwMarkFileGrep')      |nmap <buffer> <silent> <nowait> mg	<Plug>NetrwMarkFileGrep|endif
+"  if !hasmapto('<Plug>NetrwMarkHideSfx')       |nmap <buffer> <silent> <nowait> mh	<Plug>NetrwMarkHideSfx|endif
+"  if !hasmapto('<Plug>NetrwMarkFileMove')      |nmap <buffer> <silent> <nowait> mm	<Plug>NetrwMarkFileMove|endif
+"  if !hasmapto('<Plug>NetrwMarkFilePrint')     |nmap <buffer> <silent> <nowait> mp	<Plug>NetrwMarkFilePrint|endif
+"  if !hasmapto('<Plug>NetrwMarkFileRegexp')    |nmap <buffer> <silent> <nowait> mr	<Plug>NetrwMarkFileRegexp|endif
+"  if !hasmapto('<Plug>NetrwMarkFileSource')    |nmap <buffer> <silent> <nowait> ms	<Plug>NetrwMarkFileSource|endif
+"  if !hasmapto('<Plug>NetrwMarkFileTag')       |nmap <buffer> <silent> <nowait> mT	<Plug>NetrwMarkFileTag|endif
+"  if !hasmapto('<Plug>NetrwMarkFileTgt')       |nmap <buffer> <silent> <nowait> mt	<Plug>NetrwMarkFileTgt|endif
+"  if !hasmapto('<Plug>NetrwUnMarkFile')        |nmap <buffer> <silent> <nowait> mu	<Plug>NetrwUnMarkFile|endif
+"  if !hasmapto('<Plug>NetrwMarkFileVimCmd')    |nmap <buffer> <silent> <nowait> mv	<Plug>NetrwMarkFileVimCmd|endif
+"  if !hasmapto('<Plug>NetrwMarkFileExe_mx')    |nmap <buffer> <silent> <nowait> mx	<Plug>NetrwMarkFileExe_mx|endif
+"  if !hasmapto('<Plug>NetrwMarkFileExe_mX')    |nmap <buffer> <silent> <nowait> mX	<Plug>NetrwMarkFileExe_mX|endif
+"  if !hasmapto('<Plug>NetrwMarkFileCompress')  |nmap <buffer> <silent> <nowait> mz	<Plug>NetrwMarkFileCompress|endif
+"  if !hasmapto('<Plug>NetrwObtain')            |nmap <buffer> <silent> <nowait> O	<Plug>NetrwObtain|endif
+"  if !hasmapto('<Plug>NetrwSplit_o')           |nmap <buffer> <silent> <nowait> o	<Plug>NetrwSplit_o|endif
+"  if !hasmapto('<Plug>NetrwPreview')           |nmap <buffer> <silent> <nowait> p	<Plug>NetrwPreview|endif
+"  if !hasmapto('<Plug>NetrwPrevWinOpen')       |nmap <buffer> <silent> <nowait> P	<Plug>NetrwPrevWinOpen|endif
+"  if !hasmapto('<Plug>NetrwBookHistHandler_qb')|nmap <buffer> <silent> <nowait> qb	<Plug>NetrwBookHistHandler_qb|endif
+"  if !hasmapto('<Plug>NetrwFileInfo')          |nmap <buffer> <silent> <nowait> qf	<Plug>NetrwFileInfo|endif
+"  if !hasmapto('<Plug>NetrwMarkFileQFEL_qF')   |nmap <buffer> <silent> <nowait> qF	<Plug>NetrwMarkFileQFEL_qF|endif
+"  if !hasmapto('<Plug>NetrwMarkFileQFEL_qL')   |nmap <buffer> <silent> <nowait> qL	<Plug>NetrwMarkFileQFEL_qL|endif
+"  if !hasmapto('<Plug>NetrwSortStyle')         |nmap <buffer> <silent> <nowait> s	<Plug>NetrwSortStyle|endif
+"  if !hasmapto('<Plug>NetSortSequence')        |nmap <buffer> <silent> <nowait> S	<Plug>NetSortSequence|endif
+"  if !hasmapto('<Plug>NetrwSetTgt_Tb')         |nmap <buffer> <silent> <nowait> Tb	<Plug>NetrwSetTgt_Tb|endif
+"  if !hasmapto('<Plug>NetrwSetTgt_Th')         |nmap <buffer> <silent> <nowait> Th	<Plug>NetrwSetTgt_Th|endif
+"  if !hasmapto('<Plug>NetrwSplit_t')           |nmap <buffer> <silent> <nowait> t	<Plug>NetrwSplit_t|endif
+"  if !hasmapto('<Plug>NetrwBookHistHandler_u') |nmap <buffer> <silent> <nowait> u	<Plug>NetrwBookHistHandler_u|endif
+"  if !hasmapto('<Plug>NetrwBookHistHandler_U') |nmap <buffer> <silent> <nowait> U	<Plug>NetrwBookHistHandler_U|endif
+"  if !hasmapto('<Plug>NetrwSplit_v')           |nmap <buffer> <silent> <nowait> v	<Plug>NetrwSplit_v|endif
+"  if !hasmapto('<Plug>NetrwBrowseX')           |nmap <buffer> <silent> <nowait> x	<Plug>NetrwBrowseX|endif
+"  if !hasmapto('<Plug>NetrwLocalExecute')      |nmap <buffer> <silent> <nowait> X	<Plug>NetrwLocalExecute|endif
 if a:islocal
 "   call Decho("make local maps",'~'.expand("<slnum>"))
-" local normal-mode maps
+" local normal-mode maps {{{3
-nnoremap <buffer> <silent> <nowait> a	:<c-u>call <SID>NetrwHide(1)<cr>
+nnoremap <buffer> <silent> <Plug>NetrwHide_a			:<c-u>call <SID>NetrwHide(1)<cr>
-nnoremap <buffer> <silent> <nowait> -	:<c-u>call <SID>NetrwBrowseUpDir(1)<cr>
+nnoremap <buffer> <silent> <Plug>NetrwBrowseUpDir		:<c-u>call <SID>NetrwBrowseUpDir(1)<cr>
-nnoremap <buffer> <silent> <nowait> %	:<c-u>call <SID>NetrwOpenFile(1)<cr>
+nnoremap <buffer> <silent> <Plug>NetrwOpenFile		:<c-u>call <SID>NetrwOpenFile(1)<cr>
-nnoremap <buffer> <silent> <nowait> c	:<c-u>call <SID>NetrwLcd(b:netrw_curdir)<cr>
+nnoremap <buffer> <silent> <Plug>NetrwBadd_cb		:<c-u>call <SID>NetrwBadd(1,0)<cr>
-nnoremap <buffer> <silent> <nowait> C	:<c-u>call <SID>NetrwSetChgwin()<cr>
+nnoremap <buffer> <silent> <Plug>NetrwBadd_cB		:<c-u>call <SID>NetrwBadd(1,1)<cr>
-nnoremap <buffer> <silent> <nowait> <cr>	:<c-u>call netrw#LocalBrowseCheck(<SID>NetrwBrowseChgDir(1,<SID>NetrwGetWord()))<cr>
+nnoremap <buffer> <silent> <Plug>NetrwLcd			:<c-u>call <SID>NetrwLcd(b:netrw_curdir)<cr>
-nnoremap <buffer> <silent> <nowait> <c-r>	:<c-u>call <SID>NetrwServerEdit(3,<SID>NetrwGetWord())<cr>
+nnoremap <buffer> <silent> <Plug>NetrwSetChgwin		:<c-u>call <SID>NetrwSetChgwin()<cr>
-nnoremap <buffer> <silent> <nowait> d	:<c-u>call <SID>NetrwMakeDir("")<cr>
+nnoremap <buffer> <silent> <Plug>NetrwLocalBrowseCheck	:<c-u>call netrw#LocalBrowseCheck(<SID>NetrwBrowseChgDir(1,<SID>NetrwGetWord()))<cr>
-nnoremap <buffer> <silent> <nowait> gb	:<c-u>call <SID>NetrwBookHistHandler(1,b:netrw_curdir)<cr>
+nnoremap <buffer> <silent> <Plug>NetrwServerEdit		:<c-u>call <SID>NetrwServerEdit(3,<SID>NetrwGetWord())<cr>
+nnoremap <buffer> <silent> <Plug>NetrwMakeDir		:<c-u>call <SID>NetrwMakeDir("")<cr>
+nnoremap <buffer> <silent> <Plug>NetrwBookHistHandler_gb	:<c-u>call <SID>NetrwBookHistHandler(1,b:netrw_curdir)<cr>
+" ---------------------------------------------------------------------
 nnoremap <buffer> <silent> <nowait> gd	:<c-u>call <SID>NetrwForceChgDir(1,<SID>NetrwGetWord())<cr>
 nnoremap <buffer> <silent> <nowait> gf	:<c-u>call <SID>NetrwForceFile(1,<SID>NetrwGetWord())<cr>
 nnoremap <buffer> <silent> <nowait> gh	:<c-u>call <SID>NetrwHidden(1)<cr>
-nnoremap <buffer> <silent> <nowait> gn	:<c-u>call netrw#SetTreetop(<SID>NetrwGetWord())<cr>
+nnoremap <buffer> <silent> <nowait> gn	:<c-u>call netrw#SetTreetop(0,<SID>NetrwGetWord())<cr>
 nnoremap <buffer> <silent> <nowait> gp	:<c-u>call <SID>NetrwChgPerm(1,b:netrw_curdir)<cr>
 nnoremap <buffer> <silent> <nowait> I	:<c-u>call <SID>NetrwBannerCtrl(1)<cr>
 nnoremap <buffer> <silent> <nowait> i	:<c-u>call <SID>NetrwListStyle(1)<cr>
 nnoremap <buffer> <silent> <nowait> ma	:<c-u>call <SID>NetrwMarkFileArgList(1,0)<cr>
 nnoremap <buffer> <silent> <nowait> mA	:<c-u>call <SID>NetrwMarkFileArgList(1,1)<cr>
 nnoremap <buffer> <silent> <nowait> P	:<c-u>call <SID>NetrwPrevWinOpen(1)<cr>
 nnoremap <buffer> <silent> <nowait> qb	:<c-u>call <SID>NetrwBookHistHandler(2,b:netrw_curdir)<cr>
 nnoremap <buffer> <silent> <nowait> qf	:<c-u>call <SID>NetrwFileInfo(1,<SID>NetrwGetWord())<cr>
 nnoremap <buffer> <silent> <nowait> qF	:<c-u>call <SID>NetrwMarkFileQFEL(1,getqflist())<cr>
 nnoremap <buffer> <silent> <nowait> qL	:<c-u>call <SID>NetrwMarkFileQFEL(1,getloclist(v:count))<cr>
-nnoremap <buffer> <silent> <nowait> r	:<c-u>let g:netrw_sort_direction= (g:netrw_sort_direction =~# 'n')? 'r' : 'n'<bar>exe "norm! 0"<bar>call <SID>NetrwRefresh(1,<SID>NetrwBrowseChgDir(1,'./'))<cr>
 nnoremap <buffer> <silent> <nowait> s	:call <SID>NetrwSortStyle(1)<cr>
 nnoremap <buffer> <silent> <nowait> S	:<c-u>call <SID>NetSortSequence(1)<cr>
 nnoremap <buffer> <silent> <nowait> Tb	:<c-u>call <SID>NetrwSetTgt(1,'b',v:count1)<cr>
 nnoremap <buffer> <silent> <nowait> t	:call <SID>NetrwSplit(4)<cr>
 nnoremap <buffer> <silent> <nowait> Th	:<c-u>call <SID>NetrwSetTgt(1,'h',v:count)<cr>
 nnoremap <buffer> <silent> <nowait> u	:<c-u>call <SID>NetrwBookHistHandler(4,expand("%"))<cr>
 nnoremap <buffer> <silent> <nowait> U	:<c-u>call <SID>NetrwBookHistHandler(5,expand("%"))<cr>
 nnoremap <buffer> <silent> <nowait> v	:call <SID>NetrwSplit(5)<cr>
 nnoremap <buffer> <silent> <nowait> x	:<c-u>call netrw#BrowseX(<SID>NetrwBrowseChgDir(1,<SID>NetrwGetWord(),0),0)"<cr>
 nnoremap <buffer> <silent> <nowait> X	:<c-u>call <SID>NetrwLocalExecute(expand("<cword>"))"<cr>
-"   " local insert-mode maps
-"   inoremap <buffer> <silent> <nowait> a	<c-o>:call <SID>NetrwHide(1)<cr>
+nnoremap <buffer> <silent> <nowait> r	:<c-u>let g:netrw_sort_direction= (g:netrw_sort_direction =~# 'n')? 'r' : 'n'<bar>exe "norm! 0"<bar>call <SID>NetrwRefresh(1,<SID>NetrwBrowseChgDir(1,'./'))<cr>
-"   inoremap <buffer> <silent> <nowait> c	<c-o>:exe "NetrwKeepj lcd ".fnameescape(b:netrw_curdir)<cr>
-"   inoremap <buffer> <silent> <nowait> c	<c-o>:call <SID>NetrwLcd(b:netrw_curdir)<cr>
-"   inoremap <buffer> <silent> <nowait> C	<c-o>:call <SID>NetrwSetChgwin()<cr>
-"   inoremap <buffer> <silent> <nowait> %	<c-o>:call <SID>NetrwOpenFile(1)<cr>
-"   inoremap <buffer> <silent> <nowait> -	<c-o>:call <SID>NetrwBrowseUpDir(1)<cr>
-"   inoremap <buffer> <silent> <nowait> <cr>	<c-o>:call netrw#LocalBrowseCheck(<SID>NetrwBrowseChgDir(1,<SID>NetrwGetWord()))<cr>
-"   inoremap <buffer> <silent> <nowait> d	<c-o>:call <SID>NetrwMakeDir("")<cr>
-"   inoremap <buffer> <silent> <nowait> gb	<c-o>:<c-u>call <SID>NetrwBookHistHandler(1,b:netrw_curdir)<cr>
-"   inoremap <buffer> <silent> <nowait> gh	<c-o>:<c-u>call <SID>NetrwHidden(1)<cr>
-"   nnoremap <buffer> <silent> <nowait> gn	:<c-u>call netrw#SetTreetop(<SID>NetrwGetWord())<cr>
-"   inoremap <buffer> <silent> <nowait> gp	<c-o>:<c-u>call <SID>NetrwChgPerm(1,b:netrw_curdir)<cr>
-"   inoremap <buffer> <silent> <nowait> I	<c-o>:call <SID>NetrwBannerCtrl(1)<cr>
-"   inoremap <buffer> <silent> <nowait> i	<c-o>:call <SID>NetrwListStyle(1)<cr>
-"   inoremap <buffer> <silent> <nowait> mb	<c-o>:<c-u>call <SID>NetrwBookHistHandler(0,b:netrw_curdir)<cr>
-"   inoremap <buffer> <silent> <nowait> mB	<c-o>:<c-u>call <SID>NetrwBookHistHandler(6,b:netrw_curdir)<cr>
-"   inoremap <buffer> <silent> <nowait> mc	<c-o>:<c-u>call <SID>NetrwMarkFileCopy(1)<cr>
-"   inoremap <buffer> <silent> <nowait> md	<c-o>:<c-u>call <SID>NetrwMarkFileDiff(1)<cr>
-"   inoremap <buffer> <silent> <nowait> me	<c-o>:<c-u>call <SID>NetrwMarkFileEdit(1)<cr>
-"   inoremap <buffer> <silent> <nowait> mf	<c-o>:<c-u>call <SID>NetrwMarkFile(1,<SID>NetrwGetWord())<cr>
-"   inoremap <buffer> <silent> <nowait> mg	<c-o>:<c-u>call <SID>NetrwMarkFileGrep(1)<cr>
-"   inoremap <buffer> <silent> <nowait> mh	<c-o>:<c-u>call <SID>NetrwMarkHideSfx(1)<cr>
-"   inoremap <buffer> <silent> <nowait> mm	<c-o>:<c-u>call <SID>NetrwMarkFileMove(1)<cr>
-"   inoremap <buffer> <silent> <nowait> mp	<c-o>:<c-u>call <SID>NetrwMarkFilePrint(1)<cr>
-"   inoremap <buffer> <silent> <nowait> mr	<c-o>:<c-u>call <SID>NetrwMarkFileRegexp(1)<cr>
-"   inoremap <buffer> <silent> <nowait> ms	<c-o>:<c-u>call <SID>NetrwMarkFileSource(1)<cr>
-"   inoremap <buffer> <silent> <nowait> mT	<c-o>:<c-u>call <SID>NetrwMarkFileTag(1)<cr>
-"   inoremap <buffer> <silent> <nowait> mt	<c-o>:<c-u>call <SID>NetrwMarkFileTgt(1)<cr>
-"   inoremap <buffer> <silent> <nowait> mu	<c-o>:<c-u>call <SID>NetrwUnMarkFile(1)<cr>
-"   inoremap <buffer> <silent> <nowait> mv	<c-o>:<c-u>call <SID>NetrwMarkFileVimCmd(1)<cr>
-"   inoremap <buffer> <silent> <nowait> mx	<c-o>:<c-u>call <SID>NetrwMarkFileExe(1,0)<cr>
-"   inoremap <buffer> <silent> <nowait> mX	<c-o>:<c-u>call <SID>NetrwMarkFileExe(1,1)<cr>
-"   inoremap <buffer> <silent> <nowait> mz	<c-o>:<c-u>call <SID>NetrwMarkFileCompress(1)<cr>
-"   inoremap <buffer> <silent> <nowait> O	<c-o>:call <SID>NetrwObtain(1)<cr>
-"   inoremap <buffer> <silent> <nowait> o	<c-o>:call <SID>NetrwSplit(3)<cr>
-"   inoremap <buffer> <silent> <nowait> p	<c-o>:call <SID>NetrwPreview(<SID>NetrwBrowseChgDir(1,<SID>NetrwGetWord(),1))<cr>
-"   inoremap <buffer> <silent> <nowait> P	<c-o>:call <SID>NetrwPrevWinOpen(1)<cr>
-"   inoremap <buffer> <silent> <nowait> qb	<c-o>:<c-u>call <SID>NetrwBookHistHandler(2,b:netrw_curdir)<cr>
-"   inoremap <buffer> <silent> <nowait> qf	<c-o>:<c-u>call <SID>NetrwFileInfo(1,<SID>NetrwGetWord())<cr>
-"   inoremap <buffer> <silent> <nowait> qF	:<c-u>call <SID>NetrwMarkFileQFEL(1,getqflist())<cr>
-"   inoremap <buffer> <silent> <nowait> qL	:<c-u>call <SID>NetrwMarkFileQFEL(1,getloclist(v:count))<cr>
-"   inoremap <buffer> <silent> <nowait> r	<c-o>:let g:netrw_sort_direction= (g:netrw_sort_direction =~# 'n')? 'r' : 'n'<bar>exe "norm! 0"<bar>call <SID>NetrwRefresh(1,<SID>NetrwBrowseChgDir(1,'./'))<cr>
-"   inoremap <buffer> <silent> <nowait> s	<c-o>:call <SID>NetrwSortStyle(1)<cr>
-"   inoremap <buffer> <silent> <nowait> S	<c-o>:call <SID>NetSortSequence(1)<cr>
-"   inoremap <buffer> <silent> <nowait> t	<c-o>:call <SID>NetrwSplit(4)<cr>
-"   inoremap <buffer> <silent> <nowait> Tb	<c-o>:<c-u>call <SID>NetrwSetTgt(1,'b',v:count1)<cr>
-"   inoremap <buffer> <silent> <nowait> Th	<c-o>:<c-u>call <SID>NetrwSetTgt(1,'h',v:count)<cr>
-"   inoremap <buffer> <silent> <nowait> u	<c-o>:<c-u>call <SID>NetrwBookHistHandler(4,expand("%"))<cr>
-"   inoremap <buffer> <silent> <nowait> U	<c-o>:<c-u>call <SID>NetrwBookHistHandler(5,expand("%"))<cr>
-"   inoremap <buffer> <silent> <nowait> v	<c-o>:call <SID>NetrwSplit(5)<cr>
-"   inoremap <buffer> <silent> <nowait> x	<c-o>:call netrw#BrowseX(<SID>NetrwBrowseChgDir(1,<SID>NetrwGetWord(),0),0)"<cr>
 if !hasmapto('<Plug>NetrwHideEdit')
 nmap <buffer> <unique> <c-h> <Plug>NetrwHideEdit
-"    imap <buffer> <unique> <c-h> <c-o><Plug>NetrwHideEdit
 endif
 nnoremap <buffer> <silent> <Plug>NetrwHideEdit		:call <SID>NetrwHideEdit(1)<cr>
 if !hasmapto('<Plug>NetrwRefresh')
 nmap <buffer> <unique> <c-l> <Plug>NetrwRefresh
-"    imap <buffer> <unique> <c-l> <c-o><Plug>NetrwRefresh
 endif
 nnoremap <buffer> <silent> <Plug>NetrwRefresh		<c-l>:call <SID>NetrwRefresh(1,<SID>NetrwBrowseChgDir(1,(w:netrw_liststyle == 3)? w:netrw_treetop : './'))<cr>
 if s:didstarstar || !mapcheck("<s-down>","n")
 nnoremap <buffer> <silent> <s-down>	:Nexplore<cr>
-"    inoremap <buffer> <silent> <s-down>	<c-o>:Nexplore<cr>
 endif
 if s:didstarstar || !mapcheck("<s-up>","n")
 nnoremap <buffer> <silent> <s-up>	:Pexplore<cr>
-"    inoremap <buffer> <silent> <s-up>	<c-o>:Pexplore<cr>
 endif
 if !hasmapto('<Plug>NetrwTreeSqueeze')
 nmap <buffer> <silent> <nowait> <s-cr>			<Plug>NetrwTreeSqueeze
-"    imap <buffer> <silent> <nowait> <s-cr>			<c-o><Plug>NetrwTreeSqueeze
 endif
 nnoremap <buffer> <silent> <Plug>NetrwTreeSqueeze		:call <SID>TreeSqueezeDir(1)<cr>
 let mapsafecurdir = escape(b:netrw_curdir, s:netrw_map_escape)
 if g:netrw_mousemaps == 1
-nmap <buffer> <leftmouse>   				<Plug>NetrwLeftmouse
+nmap <buffer>			<leftmouse>   		<Plug>NetrwLeftmouse
+nmap <buffer>			<c-leftmouse>		<Plug>NetrwCLeftmouse
+nmap <buffer>			<middlemouse>		<Plug>NetrwMiddlemouse
+nmap <buffer>			<s-leftmouse>		<Plug>NetrwSLeftmouse
+nmap <buffer>			<s-leftdrag>		<Plug>NetrwSLeftdrag
+nmap <buffer>			<2-leftmouse>		<Plug>Netrw2Leftmouse
+imap <buffer>			<leftmouse>		<Plug>ILeftmouse
+imap <buffer>			<middlemouse>		<Plug>IMiddlemouse
 nno  <buffer> <silent>		<Plug>NetrwLeftmouse	<leftmouse>:call <SID>NetrwLeftmouse(1)<cr>
-nmap <buffer> <c-leftmouse>		<Plug>NetrwCLeftmouse
 nno  <buffer> <silent>		<Plug>NetrwCLeftmouse	<leftmouse>:call <SID>NetrwCLeftmouse(1)<cr>
-nmap <buffer> <middlemouse>		<Plug>NetrwMiddlemouse
 nno  <buffer> <silent>		<Plug>NetrwMiddlemouse	<leftmouse>:call <SID>NetrwPrevWinOpen(1)<cr>
-nmap <buffer> <s-leftmouse>		<Plug>NetrwSLeftmouse
 nno  <buffer> <silent>		<Plug>NetrwSLeftmouse 	<leftmouse>:call <SID>NetrwSLeftmouse(1)<cr>
-nmap <buffer> <s-leftdrag>		<Plug>NetrwSLeftdrag
 nno  <buffer> <silent>		<Plug>NetrwSLeftdrag	<leftmouse>:call <SID>NetrwSLeftdrag(1)<cr>
-nmap <buffer> <2-leftmouse>		<Plug>Netrw2Leftmouse
 nmap <buffer> <silent>		<Plug>Netrw2Leftmouse	-
-imap <buffer> <leftmouse>		<Plug>ILeftmouse
-"    ino  <buffer> <silent>		<Plug>ILeftmouse	<c-o><leftmouse><c-o>:call <SID>NetrwLeftmouse(1)<cr>
-imap <buffer> <middlemouse>		<Plug>IMiddlemouse
-"    ino  <buffer> <silent>		<Plug>IMiddlemouse	<c-o><leftmouse><c-o>:call <SID>NetrwPrevWinOpen(1)<cr>
-"    imap <buffer> <s-leftmouse>		<Plug>ISLeftmouse
-"    ino  <buffer> <silent>		<Plug>ISLeftmouse	<c-o><leftmouse><c-o>:call <SID>NetrwMarkFile(1,<SID>NetrwGetWord())<cr>
 exe 'nnoremap <buffer> <silent> <rightmouse>  <leftmouse>:call <SID>NetrwLocalRm("'.mapsafecurdir.'")<cr>'
 exe 'vnoremap <buffer> <silent> <rightmouse>  <leftmouse>:call <SID>NetrwLocalRm("'.mapsafecurdir.'")<cr>'
-"    exe 'inoremap <buffer> <silent> <rightmouse>  <c-o><leftmouse><c-o>:call <SID>NetrwLocalRm("'.mapsafecurdir.'")<cr>'
 endif
 exe 'nnoremap <buffer> <silent> <nowait> <del>	:call <SID>NetrwLocalRm("'.mapsafecurdir.'")<cr>'
 exe 'nnoremap <buffer> <silent> <nowait> D		:call <SID>NetrwLocalRm("'.mapsafecurdir.'")<cr>'
 exe 'nnoremap <buffer> <silent> <nowait> R		:call <SID>NetrwLocalRename("'.mapsafecurdir.'")<cr>'
 exe 'nnoremap <buffer> <silent> <nowait> d		:call <SID>NetrwMakeDir("")<cr>'
 exe 'vnoremap <buffer> <silent> <nowait> <del>	:call <SID>NetrwLocalRm("'.mapsafecurdir.'")<cr>'
 exe 'vnoremap <buffer> <silent> <nowait> D		:call <SID>NetrwLocalRm("'.mapsafecurdir.'")<cr>'
 exe 'vnoremap <buffer> <silent> <nowait> R		:call <SID>NetrwLocalRename("'.mapsafecurdir.'")<cr>'
-"   exe 'inoremap <buffer> <silent> <nowait> <del>	<c-o>:call <SID>NetrwLocalRm("'.mapsafecurdir.'")<cr>'
-"   exe 'inoremap <buffer> <silent> <nowait> D		<c-o>:call <SID>NetrwLocalRm("'.mapsafecurdir.'")<cr>'
-"   exe 'inoremap <buffer> <silent> <nowait> R		<c-o>:call <SID>NetrwLocalRename("'.mapsafecurdir.'")<cr>'
-"   exe 'inoremap <buffer> <silent> <nowait> d		<c-o>:call <SID>NetrwMakeDir("")<cr>'
 nnoremap <buffer> <F1>			:he netrw-quickhelp<cr>
 " support user-specified maps
 call netrw#UserMaps(1)
-else " remote
+else
+" remote normal-mode maps {{{3
 "   call Decho("make remote maps",'~'.expand("<slnum>"))
 call s:RemotePathAnalysis(b:netrw_curdir)
-" remote normal-mode maps
+nnoremap <buffer> <silent> <Plug>NetrwHide_a			:<c-u>call <SID>NetrwHide(0)<cr>
-nnoremap <buffer> <silent> <nowait> a	:<c-u>call <SID>NetrwHide(0)<cr>
+nnoremap <buffer> <silent> <Plug>NetrwBrowseUpDir		:<c-u>call <SID>NetrwBrowseUpDir(0)<cr>
-nnoremap <buffer> <silent> <nowait> -	:<c-u>call <SID>NetrwBrowseUpDir(0)<cr>
+nnoremap <buffer> <silent> <Plug>NetrwOpenFile		:<c-u>call <SID>NetrwOpenFile(0)<cr>
-nnoremap <buffer> <silent> <nowait> %	:<c-u>call <SID>NetrwOpenFile(0)<cr>
+nnoremap <buffer> <silent> <Plug>NetrwBadd_cb		:<c-u>call <SID>NetrwBadd(0,0)<cr>
-nnoremap <buffer> <silent> <nowait> C	:<c-u>call <SID>NetrwSetChgwin()<cr>
+nnoremap <buffer> <silent> <Plug>NetrwBadd_cB		:<c-u>call <SID>NetrwBadd(0,1)<cr>
-nnoremap <buffer> <silent> <nowait> <c-l>	:<c-u>call <SID>NetrwRefresh(0,<SID>NetrwBrowseChgDir(0,'./'))<cr>
+nnoremap <buffer> <silent> <Plug>NetrwLcd			:<c-u>call <SID>NetrwLcd(b:netrw_curdir)<cr>
-nnoremap <buffer> <silent> <nowait> <cr>	:<c-u>call <SID>NetrwBrowse(0,<SID>NetrwBrowseChgDir(0,<SID>NetrwGetWord()))<cr>
+nnoremap <buffer> <silent> <Plug>NetrwSetChgwin		:<c-u>call <SID>NetrwSetChgwin()<cr>
-nnoremap <buffer> <silent> <nowait> <c-r>	:<c-u>call <SID>NetrwServerEdit(2,<SID>NetrwGetWord())<cr>
+nnoremap <buffer> <silent> <Plug>NetrwRefresh		:<c-u>call <SID>NetrwRefresh(0,<SID>NetrwBrowseChgDir(0,'./'))<cr>
-nnoremap <buffer> <silent> <nowait> gb	:<c-u>call <SID>NetrwBookHistHandler(1,b:netrw_curdir)<cr>
+nnoremap <buffer> <silent> <Plug>NetrwLocalBrowseCheck	:<c-u>call <SID>NetrwBrowse(0,<SID>NetrwBrowseChgDir(0,<SID>NetrwGetWord()))<cr>
+nnoremap <buffer> <silent> <Plug>NetrwServerEdit		:<c-u>call <SID>NetrwServerEdit(2,<SID>NetrwGetWord())<cr>
+nnoremap <buffer> <silent> <Plug>NetrwBookHistHandler_gb	:<c-u>call <SID>NetrwBookHistHandler(1,b:netrw_curdir)<cr>
+" ---------------------------------------------------------------------
 nnoremap <buffer> <silent> <nowait> gd	:<c-u>call <SID>NetrwForceChgDir(0,<SID>NetrwGetWord())<cr>
 nnoremap <buffer> <silent> <nowait> gf	:<c-u>call <SID>NetrwForceFile(0,<SID>NetrwGetWord())<cr>
 nnoremap <buffer> <silent> <nowait> gh	:<c-u>call <SID>NetrwHidden(0)<cr>
 nnoremap <buffer> <silent> <nowait> gp	:<c-u>call <SID>NetrwChgPerm(0,b:netrw_curdir)<cr>
 nnoremap <buffer> <silent> <nowait> I	:<c-u>call <SID>NetrwBannerCtrl(1)<cr>
 nnoremap <buffer> <silent> <nowait> Th	:<c-u>call <SID>NetrwSetTgt(0,'h',v:count)<cr>
 nnoremap <buffer> <silent> <nowait> u	:<c-u>call <SID>NetrwBookHistHandler(4,b:netrw_curdir)<cr>
 nnoremap <buffer> <silent> <nowait> U	:<c-u>call <SID>NetrwBookHistHandler(5,b:netrw_curdir)<cr>
 nnoremap <buffer> <silent> <nowait> v	:call <SID>NetrwSplit(2)<cr>
 nnoremap <buffer> <silent> <nowait> x	:<c-u>call netrw#BrowseX(<SID>NetrwBrowseChgDir(0,<SID>NetrwGetWord()),1)<cr>
-"   " remote insert-mode maps
-"   inoremap <buffer> <silent> <nowait> <cr>	<c-o>:call <SID>NetrwBrowse(0,<SID>NetrwBrowseChgDir(0,<SID>NetrwGetWord()))<cr>
-"   inoremap <buffer> <silent> <nowait> <c-l>	<c-o>:call <SID>NetrwRefresh(0,<SID>NetrwBrowseChgDir(0,'./'))<cr>
-"   inoremap <buffer> <silent> <nowait> <s-cr>	<c-o>:call <SID>TreeSqueezeDir(0)<cr>
-"   inoremap <buffer> <silent> <nowait> -		<c-o>:call <SID>NetrwBrowseUpDir(0)<cr>
-"   inoremap <buffer> <silent> <nowait> a		<c-o>:call <SID>NetrwHide(0)<cr>
-"   inoremap <buffer> <silent> <nowait> mb	<c-o>:<c-u>call <SID>NetrwBookHistHandler(0,b:netrw_curdir)<cr>
-"   inoremap <buffer> <silent> <nowait> mc	<c-o>:<c-u>call <SID>NetrwMarkFileCopy(0)<cr>
-"   inoremap <buffer> <silent> <nowait> md	<c-o>:<c-u>call <SID>NetrwMarkFileDiff(0)<cr>
-"   inoremap <buffer> <silent> <nowait> me	<c-o>:<c-u>call <SID>NetrwMarkFileEdit(0)<cr>
-"   inoremap <buffer> <silent> <nowait> mf	<c-o>:<c-u>call <SID>NetrwMarkFile(0,<SID>NetrwGetWord())<cr>
-"   inoremap <buffer> <silent> <nowait> mg	<c-o>:<c-u>call <SID>NetrwMarkFileGrep(0)<cr>
-"   inoremap <buffer> <silent> <nowait> mh	<c-o>:<c-u>call <SID>NetrwMarkHideSfx(0)<cr>
-"   inoremap <buffer> <silent> <nowait> mm	<c-o>:<c-u>call <SID>NetrwMarkFileMove(0)<cr>
-"   inoremap <buffer> <silent> <nowait> mp	<c-o>:<c-u>call <SID>NetrwMarkFilePrint(0)<cr>
-"   inoremap <buffer> <silent> <nowait> mr	<c-o>:<c-u>call <SID>NetrwMarkFileRegexp(0)<cr>
-"   inoremap <buffer> <silent> <nowait> ms	<c-o>:<c-u>call <SID>NetrwMarkFileSource(0)<cr>
-"   inoremap <buffer> <silent> <nowait> mt	<c-o>:<c-u>call <SID>NetrwMarkFileTgt(0)<cr>
-"   inoremap <buffer> <silent> <nowait> mT	<c-o>:<c-u>call <SID>NetrwMarkFileTag(0)<cr>
-"   inoremap <buffer> <silent> <nowait> mu	<c-o>:<c-u>call <SID>NetrwUnMarkFile(0)<cr>
-"   nnoremap <buffer> <silent> <nowait> mv	:<c-u>call <SID>NetrwMarkFileVimCmd(1)<cr>
-"   inoremap <buffer> <silent> <nowait> mx	<c-o>:<c-u>call <SID>NetrwMarkFileExe(0,0)<cr>
-"   inoremap <buffer> <silent> <nowait> mX	<c-o>:<c-u>call <SID>NetrwMarkFileExe(0,1)<cr>
-"   inoremap <buffer> <silent> <nowait> mv	<c-o>:<c-u>call <SID>NetrwMarkFileVimCmd(0)<cr>
-"   inoremap <buffer> <silent> <nowait> mz	<c-o>:<c-u>call <SID>NetrwMarkFileCompress(0)<cr>
-"   inoremap <buffer> <silent> <nowait> gb	<c-o>:<c-u>call <SID>NetrwBookHistHandler(1,b:netrw_curdir)<cr>
-"   inoremap <buffer> <silent> <nowait> gh	<c-o>:<c-u>call <SID>NetrwHidden(0)<cr>
-"   inoremap <buffer> <silent> <nowait> gp	<c-o>:<c-u>call <SID>NetrwChgPerm(0,b:netrw_curdir)<cr>
-"   inoremap <buffer> <silent> <nowait> C		<c-o>:call <SID>NetrwSetChgwin()<cr>
-"   inoremap <buffer> <silent> <nowait> i		<c-o>:call <SID>NetrwListStyle(0)<cr>
-"   inoremap <buffer> <silent> <nowait> I		<c-o>:call <SID>NetrwBannerCtrl(1)<cr>
-"   inoremap <buffer> <silent> <nowait> o		<c-o>:call <SID>NetrwSplit(0)<cr>
-"   inoremap <buffer> <silent> <nowait> O		<c-o>:call <SID>NetrwObtain(0)<cr>
-"   inoremap <buffer> <silent> <nowait> p		<c-o>:call <SID>NetrwPreview(<SID>NetrwBrowseChgDir(1,<SID>NetrwGetWord(),1))<cr>
-"   inoremap <buffer> <silent> <nowait> P		<c-o>:call <SID>NetrwPrevWinOpen(0)<cr>
-"   inoremap <buffer> <silent> <nowait> qb	<c-o>:<c-u>call <SID>NetrwBookHistHandler(2,b:netrw_curdir)<cr>
-"   inoremap <buffer> <silent> <nowait> mB	<c-o>:<c-u>call <SID>NetrwBookHistHandler(6,b:netrw_curdir)<cr>
-"   inoremap <buffer> <silent> <nowait> qf	<c-o>:<c-u>call <SID>NetrwFileInfo(0,<SID>NetrwGetWord())<cr>
-"   inoremap <buffer> <silent> <nowait> qF	:<c-u>call <SID>NetrwMarkFileQFEL(0,getqflist())<cr>
-"   inoremap <buffer> <silent> <nowait> qL	:<c-u>call <SID>NetrwMarkFileQFEL(0,getloclist(v:count))<cr>
-"   inoremap <buffer> <silent> <nowait> r		<c-o>:let g:netrw_sort_direction= (g:netrw_sort_direction =~# 'n')? 'r' : 'n'<bar>exe "norm! 0"<bar>call <SID>NetrwBrowse(0,<SID>NetrwBrowseChgDir(0,'./'))<cr>
-"   inoremap <buffer> <silent> <nowait> s		<c-o>:call <SID>NetrwSortStyle(0)<cr>
-"   inoremap <buffer> <silent> <nowait> S		<c-o>:call <SID>NetSortSequence(0)<cr>
-"   inoremap <buffer> <silent> <nowait> t		<c-o>:call <SID>NetrwSplit(1)<cr>
-"   inoremap <buffer> <silent> <nowait> Tb	<c-o>:<c-u>call <SID>NetrwSetTgt('b',v:count1)<cr>
-"   inoremap <buffer> <silent> <nowait> Th	<c-o>:<c-u>call <SID>NetrwSetTgt('h',v:count)<cr>
-"   inoremap <buffer> <silent> <nowait> u		<c-o>:<c-u>call <SID>NetrwBookHistHandler(4,b:netrw_curdir)<cr>
-"   inoremap <buffer> <silent> <nowait> U		<c-o>:<c-u>call <SID>NetrwBookHistHandler(5,b:netrw_curdir)<cr>
-"   inoremap <buffer> <silent> <nowait> v		<c-o>:call <SID>NetrwSplit(2)<cr>
-"   inoremap <buffer> <silent> <nowait> x		<c-o>:call netrw#BrowseX(<SID>NetrwBrowseChgDir(0,<SID>NetrwGetWord()),1)<cr>
-"   inoremap <buffer> <silent> <nowait> %		<c-o>:call <SID>NetrwOpenFile(0)<cr>
 if !hasmapto('<Plug>NetrwHideEdit')
 nmap <buffer> <c-h> <Plug>NetrwHideEdit
-"    imap <buffer> <c-h> <Plug>NetrwHideEdit
 endif
 nnoremap <buffer> <silent> <Plug>NetrwHideEdit	:call <SID>NetrwHideEdit(0)<cr>
 if !hasmapto('<Plug>NetrwRefresh')
 nmap <buffer> <c-l> <Plug>NetrwRefresh
-"    imap <buffer> <c-l> <Plug>NetrwRefresh
 endif
 if !hasmapto('<Plug>NetrwTreeSqueeze')
 nmap <buffer> <silent> <nowait> <s-cr>	<Plug>NetrwTreeSqueeze
-"    imap <buffer> <silent> <nowait> <s-cr>	<c-o><Plug>NetrwTreeSqueeze
 endif
 nnoremap <buffer> <silent> <Plug>NetrwTreeSqueeze	:call <SID>TreeSqueezeDir(0)<cr>
 let mapsafepath     = escape(s:path, s:netrw_map_escape)
 let mapsafeusermach = escape(((s:user == "")? "" : s:user."@").s:machine, s:netrw_map_escape)
 nmap <middlemouse>			<Plug>NetrwMiddlemouse
 nno  <buffer> <silent>		<middlemouse>		<Plug>NetrwMiddlemouse <leftmouse>:call <SID>NetrwPrevWinOpen(0)<cr>
 nmap <buffer> <2-leftmouse>		<Plug>Netrw2Leftmouse
 nmap <buffer> <silent>		<Plug>Netrw2Leftmouse	-
 imap <buffer> <leftmouse>		<Plug>ILeftmouse
-"    ino  <buffer> <silent>		<Plug>ILeftmouse	<c-o><leftmouse><c-o>:call <SID>NetrwLeftmouse(0)<cr>
 imap <buffer> <middlemouse>		<Plug>IMiddlemouse
-"    ino  <buffer> <silent>		<Plug>IMiddlemouse	<c-o><leftmouse><c-o>:call <SID>NetrwPrevWinOpen(0)<cr>
 imap <buffer> <s-leftmouse>		<Plug>ISLeftmouse
-"    ino  <buffer> <silent>		<Plug>ISLeftmouse	<c-o><leftmouse><c-o>:call <SID>NetrwMarkFile(0,<SID>NetrwGetWord())<cr>
 exe 'nnoremap <buffer> <silent> <rightmouse> <leftmouse>:call <SID>NetrwRemoteRm("'.mapsafeusermach.'","'.mapsafepath.'")<cr>'
 exe 'vnoremap <buffer> <silent> <rightmouse> <leftmouse>:call <SID>NetrwRemoteRm("'.mapsafeusermach.'","'.mapsafepath.'")<cr>'
-"    exe 'inoremap <buffer> <silent> <rightmouse> <c-o><leftmouse><c-o>:call <SID>NetrwRemoteRm("'.mapsafeusermach.'","'.mapsafepath.'")<cr>'
 endif
 exe 'nnoremap <buffer> <silent> <nowait> <del>	:call <SID>NetrwRemoteRm("'.mapsafeusermach.'","'.mapsafepath.'")<cr>'
 exe 'nnoremap <buffer> <silent> <nowait> d		:call <SID>NetrwMakeDir("'.mapsafeusermach.'")<cr>'
 exe 'nnoremap <buffer> <silent> <nowait> D		:call <SID>NetrwRemoteRm("'.mapsafeusermach.'","'.mapsafepath.'")<cr>'
 exe 'nnoremap <buffer> <silent> <nowait> R		:call <SID>NetrwRemoteRename("'.mapsafeusermach.'","'.mapsafepath.'")<cr>'
 exe 'vnoremap <buffer> <silent> <nowait> <del>	:call <SID>NetrwRemoteRm("'.mapsafeusermach.'","'.mapsafepath.'")<cr>'
 exe 'vnoremap <buffer> <silent> <nowait> D		:call <SID>NetrwRemoteRm("'.mapsafeusermach.'","'.mapsafepath.'")<cr>'
 exe 'vnoremap <buffer> <silent> <nowait> R		:call <SID>NetrwRemoteRename("'.mapsafeusermach.'","'.mapsafepath.'")<cr>'
-"   exe 'inoremap <buffer> <silent> <nowait> <del>	<c-o>:call <SID>NetrwRemoteRm("'.mapsafeusermach.'","'.mapsafepath.'")<cr>'
-"   exe 'inoremap <buffer> <silent> <nowait> d		<c-o>:call <SID>NetrwMakeDir("'.mapsafeusermach.'")<cr>'
-"   exe 'inoremap <buffer> <silent> <nowait> D		<c-o>:call <SID>NetrwRemoteRm("'.mapsafeusermach.'","'.mapsafepath.'")<cr>'
-"   exe 'inoremap <buffer> <silent> <nowait> R		<c-o>:call <SID>NetrwRemoteRename("'.mapsafeusermach.'","'.mapsafepath.'")<cr>'
 nnoremap <buffer> <F1>			:he netrw-quickhelp<cr>
-"   inoremap <buffer> <F1>			<c-o>:he netrw-quickhelp<cr>
 " support user-specified maps
 call netrw#UserMaps(0)
-endif
+endif " }}}3
 "  call Dret("s:NetrwMaps")
 endfun
 " ---------------------------------------------------------------------
 call add(s:netrwmarkfilelist,s:ComposePath(b:netrw_curdir,a:fname))
 "   call Decho("init s:netrwmarkfilelist<".string(s:netrwmarkfilelist).">",'~'.expand("<slnum>"))
 endif
 " set up 2match'ing to netrwmarkfilemtch_# list
-if exists("s:netrwmarkfilemtch_{curbufnr}") && s:netrwmarkfilemtch_{curbufnr} != ""
+if has("syntax") && exists("g:syntax_on") && g:syntax_on
-"   call Decho("exe 2match netrwMarkFile /".s:netrwmarkfilemtch_{curbufnr}."/",'~'.expand("<slnum>"))
+if exists("s:netrwmarkfilemtch_{curbufnr}") && s:netrwmarkfilemtch_{curbufnr} != ""
-if exists("g:did_drchip_netrwlist_syntax")
+" "   call Decho("exe 2match netrwMarkFile /".s:netrwmarkfilemtch_{curbufnr}."/",'~'.expand("<slnum>"))
-exe "2match netrwMarkFile /".s:netrwmarkfilemtch_{curbufnr}."/"
+if exists("g:did_drchip_netrwlist_syntax")
-endif
+exe "2match netrwMarkFile /".s:netrwmarkfilemtch_{curbufnr}."/"
-else
+endif
-"   call Decho("2match none",'~'.expand("<slnum>"))
+else
-2match none
+" "   call Decho("2match none",'~'.expand("<slnum>"))
+2match none
+endif
 endif
 let @@= ykeep
 "  call Dret("s:NetrwMarkFile : s:netrwmarkfilelist_".curbufnr."<".(exists("s:netrwmarkfilelist_{curbufnr}")? string(s:netrwmarkfilelist_{curbufnr}) : " doesn't exist").">")
 endfun
 let exe= netrw#WinPath(exe)
 if a:islocal
 if g:netrw_keepdir
 let fname= s:ShellEscape(s:ComposePath(curdir,fname))
 endif
+call system(exe." ".fname)
+if v:shell_error
+NetrwKeepj call netrw#ErrorMsg(s:WARNING,"unable to apply<".exe."> to file<".fname.">",50)
+endif
 else
 let fname= s:ShellEscape(b:netrw_curdir.fname,1)
+NetrwKeepj call s:RemoteSystem(exe." ".fname)
 endif
-if executable(exe)
-if a:islocal
-call system(exe." ".fname)
-else
-NetrwKeepj call s:RemoteSystem(exe." ".fname)
-endif
-else
-NetrwKeepj call netrw#ErrorMsg(s:WARNING,"unable to apply<".exe."> to file<".fname.">",50)
-endif
 endif
 unlet sfx
 if exists("exe")
 unlet exe
 elseif a:islocal
 " fname not a compressed file, so compress it
 call system(netrw#WinPath(g:netrw_compress)." ".s:ShellEscape(s:ComposePath(b:netrw_curdir,fname)))
+if v:shell_error
+call netrw#ErrorMsg(s:WARNING,"consider setting g:netrw_compress<".g:netrw_compress."> to something that works",104)
+endif
 else
 " fname not a compressed file, so compress it
 NetrwKeepj call s:RemoteSystem(netrw#WinPath(g:netrw_compress)." ".s:ShellEscape(fname))
 endif
 endfor	" for every file in the marked list
 "  call Decho("sanity chk passed: s:netrwmftgt<".s:netrwmftgt.">",'~'.expand("<slnum>"))
 if a:islocal &&  s:netrwmftgt_islocal
 " Copy marked files, local directory to local directory
 "   call Decho("copy from local to local",'~'.expand("<slnum>"))
-if !executable(g:netrw_localcopycmd) && g:netrw_localcopycmd !~ '^'.expand("$COMSPEC").'\s'
+if !executable(g:netrw_localcopycmd)
 call netrw#ErrorMsg(s:ERROR,"g:netrw_localcopycmd<".g:netrw_localcopycmd."> not executable on your system, aborting",91)
 "    call Dfunc("s:NetrwMarkFileMove : g:netrw_localcopycmd<".g:netrw_localcopycmd."> n/a!")
 return
 endif
 endif
 "   call Decho("args   <".args.">",'~'.expand("<slnum>"))
 "   call Decho("tgt    <".tgt.">",'~'.expand("<slnum>"))
 "   call Decho("copycmd<".copycmd.">",'~'.expand("<slnum>"))
 "   call Decho("system(".copycmd." '".args."' '".tgt."')",'~'.expand("<slnum>"))
-call system(copycmd." '".args."' '".tgt."'")
+call system(copycmd.g:netrw_localcopycmdopt." '".args."' '".tgt."'")
 if v:shell_error != 0
 if exists("b:netrw_curdir") && b:netrw_curdir != getcwd() && !g:netrw_keepdir
 call netrw#ErrorMsg(s:ERROR,"copy failed; perhaps due to vim's current directory<".getcwd()."> not matching netrw's (".b:netrw_curdir.") (see :help netrw-c)",101)
 else
 call netrw#ErrorMsg(s:ERROR,"tried using g:netrw_localcopycmd<".g:netrw_localcopycmd.">; it doesn't work!",80)
 let tmpdir= curdir."/".tmpdir
 endif
 if exists("*mkdir")
 call mkdir(tmpdir)
 else
-call s:NetrwExe("sil! !".g:netrw_localmkdir.' '.s:ShellEscape(tmpdir,1))
+call s:NetrwExe("sil! !".g:netrw_localmkdir.g:netrw_localmkdiropt.' '.s:ShellEscape(tmpdir,1))
 if v:shell_error != 0
 call netrw#ErrorMsg(s:WARNING,"consider setting g:netrw_localmkdir<".g:netrw_localmkdir."> to something that works",80)
 "     call Dret("s:NetrwMarkFileCopy : failed: sil! !".g:netrw_localmkdir.' '.s:ShellEscape(tmpdir,1) )
 return
 endif
 endif
 if isdirectory(s:NetrwFile(tmpdir))
-call s:NetrwLcd(tmpdir)
+if s:NetrwLcd(tmpdir)
+"     call Dret("s:NetrwMarkFileCopy : lcd failure")
+return
+endif
 NetrwKeepj call netrw#Obtain(a:islocal,s:netrwmarkfilelist_{bufnr('%')},tmpdir)
 let localfiles= map(deepcopy(s:netrwmarkfilelist_{bufnr('%')}),'substitute(v:val,"^.*/","","")')
 NetrwKeepj call s:NetrwUpload(localfiles,s:netrwmftgt)
 if getcwd() == tmpdir
 for fname in s:netrwmarkfilelist_{bufnr('%')}
 NetrwKeepj call s:NetrwDelete(fname)
 endfor
-call s:NetrwLcd(curdir)
+if s:NetrwLcd(curdir)
-if v:version < 704 || !has("patch1109")
+"      call Dret("s:NetrwMarkFileCopy : lcd failure")
-call s:NetrwExe("sil !".g:netrw_localrmdir." ".s:ShellEscape(tmpdir,1))
+return
+endif
+if v:version < 704 || (v:version == 704 && !has("patch1107"))
+call s:NetrwExe("sil !".g:netrw_localrmdir.g:netrw_localrmdiropt." ".s:ShellEscape(tmpdir,1))
 if v:shell_error != 0
 call netrw#ErrorMsg(s:WARNING,"consider setting g:netrw_localrmdir<".g:netrw_localrmdir."> to something that works",80)
 " "      call Dret("s:NetrwMarkFileCopy : failed: sil !".g:netrw_localrmdir." ".s:ShellEscape(tmpdir,1) )
 return
 endif
 if delete(tmpdir,"d")
 call netrw#ErrorMsg(s:ERROR,"unable to delete directory <".tmpdir.">!",103)
 endif
 endif
 else
-call s:NetrwLcd(curdir)
+if s:NetrwLcd(curdir)
+"      call Dret("s:NetrwMarkFileCopy : lcd failure")
+return
+endif
 endif
 endif
 endif
 " -------
 if      a:islocal &&  s:netrwmftgt_islocal
 " move: local -> local
 "   call Decho("move from local to local",'~'.expand("<slnum>"))
 "   call Decho("local to local move",'~'.expand("<slnum>"))
-if !executable(g:netrw_localmovecmd) && g:netrw_localmovecmd !~ '^'.expand("$COMSPEC").'\s'
+if !executable(g:netrw_localmovecmd)
 call netrw#ErrorMsg(s:ERROR,"g:netrw_localmovecmd<".g:netrw_localmovecmd."> not executable on your system, aborting",90)
 "    call Dfunc("s:NetrwMarkFileMove : g:netrw_localmovecmd<".g:netrw_localmovecmd."> n/a!")
 return
 endif
-let tgt         = s:ShellEscape(s:netrwmftgt)
+let tgt = s:ShellEscape(s:netrwmftgt)
 "   call Decho("tgt<".tgt.">",'~'.expand("<slnum>"))
 if !g:netrw_cygwin && (has("win32") || has("win95") || has("win64") || has("win16"))
-let tgt         = substitute(tgt, '/','\\','g')
+let tgt= substitute(tgt, '/','\\','g')
 "    call Decho("windows exception: tgt<".tgt.">",'~'.expand("<slnum>"))
 if g:netrw_localmovecmd =~ '\s'
 let movecmd     = substitute(g:netrw_localmovecmd,'\s.*$','','')
 let movecmdargs = substitute(g:netrw_localmovecmd,'^.\{-}\(\s.*\)$','\1','')
 let movecmd     = netrw#WinPath(movecmd).movecmdargs
 for fname in s:netrwmarkfilelist_{bufnr("%")}
 if !g:netrw_cygwin && (has("win32") || has("win95") || has("win64") || has("win16"))
 let fname= substitute(fname,'/','\\','g')
 endif
 "    call Decho("system(".movecmd." ".s:ShellEscape(fname)." ".tgt.")",'~'.expand("<slnum>"))
-let ret= system(movecmd." ".s:ShellEscape(fname)." ".tgt)
+let ret= system(movecmd.g:netrw_localmovecmdopt." ".s:ShellEscape(fname)." ".tgt)
 if v:shell_error != 0
 if exists("b:netrw_curdir") && b:netrw_curdir != getcwd() && !g:netrw_keepdir
 call netrw#ErrorMsg(s:ERROR,"move failed; perhaps due to vim's current directory<".getcwd()."> not matching netrw's (".b:netrw_curdir.") (see :help netrw-c)",100)
 else
 call netrw#ErrorMsg(s:ERROR,"tried using g:netrw_localmovecmd<".g:netrw_localmovecmd.">; it doesn't work!",54)
 "   call Decho("s:netrwmarkfilelist".string(s:netrwmarkfilelist).">",'~'.expand("<slnum>"))
 let netrwmarkfilelist= join(map(deepcopy(s:netrwmarkfilelist), "s:ShellEscape(v:val,".!a:islocal.")"))
 call s:NetrwUnmarkAll()
 if a:islocal
-if executable(g:netrw_ctags)
-"     call Decho("call system(".g:netrw_ctags." ".netrwmarkfilelist.")",'~'.expand("<slnum>"))
+"    call Decho("call system(".g:netrw_ctags." ".netrwmarkfilelist.")",'~'.expand("<slnum>"))
 call system(g:netrw_ctags." ".netrwmarkfilelist)
-else
+if v:shell_error
 call netrw#ErrorMsg(s:ERROR,"g:netrw_ctags<".g:netrw_ctags."> is not executable!",51)
 endif
 else
 let cmd   = s:RemoteSystem(g:netrw_ctags." ".netrwmarkfilelist)
 call netrw#Obtain(a:islocal,"tags")
 let curdir= b:netrw_curdir
 1split
 if exists("s:netrwmarkfilelist_{bufnr('%')}")
 let islocal= s:netrwmarkfilelist_{bufnr('%')}[1] !~ '^\a\{3,}://'
 call netrw#Obtain(islocal,s:netrwmarkfilelist_{bufnr('%')})
 call s:NetrwUnmarkList(bufnr('%'),b:netrw_curdir)
 else
-call netrw#Obtain(a:islocal,expand("<cWORD>"))
+call netrw#Obtain(a:islocal,s:NetrwGetWord())
 endif
 let @@= ykeep
 "  call Dret("NetrwObtain")
 endfun
 let didsplit = 0
 if lastwinnr == 1
 " if only one window, open a new one first
 "   call Decho("only one window, so open a new one (g:netrw_alto=".g:netrw_alto.")",'~'.expand("<slnum>"))
+" g:netrw_preview=0: preview window shown in a horizontally split window
+" g:netrw_preview=1: preview window shown in a vertically   split window
 if g:netrw_preview
 " vertically split preview window
-let winsz= (g:netrw_winsize > 0)? (g:netrw_winsize*winheight(0))/100 : -g:netrw_winsize
+let winsz= (g:netrw_winsize > 0)? (g:netrw_winsize*winwidth(0))/100 : -g:netrw_winsize
 "    call Decho("exe ".(g:netrw_alto? "top " : "bot ")."vert ".winsz."wincmd s",'~'.expand("<slnum>"))
 exe (g:netrw_alto? "top " : "bot ")."vert ".winsz."wincmd s"
 else
 " horizontally split preview window
-let winsz= (g:netrw_winsize > 0)? (g:netrw_winsize*winwidth(0))/100 : -g:netrw_winsize
+let winsz= (g:netrw_winsize > 0)? (g:netrw_winsize*winheight(0))/100 : -g:netrw_winsize
 "    call Decho("exe ".(g:netrw_alto? "bel " : "abo ").winsz."wincmd s",'~'.expand("<slnum>"))
 exe (g:netrw_alto? "bel " : "abo ").winsz."wincmd s"
 endif
 let didsplit = 1
 "   call Decho("did split",'~'.expand("<slnum>"))
 elseif type(a:fname) == 3
 " handle uploading a list of files via scp
 "   call Decho("handle uploading a list of files via scp",'~'.expand("<slnum>"))
 let curdir= getcwd()
 if a:tgt =~ '^scp:'
-call s:NetrwLcd(fromdir)
+if s:NetrwLcd(fromdir)
+"     call Dret("s:NetrwUpload : lcd failure")
+return
+endif
 let filelist= deepcopy(s:netrwmarkfilelist_{bufnr('%')})
 let args    = join(map(filelist,"s:ShellEscape(v:val, 1)"))
 if exists("g:netrw_port") && g:netrw_port != ""
 let useport= " ".g:netrw_scpport." ".g:netrw_port
 else
 let useport= ""
 endif
 let machine = substitute(a:tgt,'^scp://\([^/:]\+\).*$','\1','')
 let tgt     = substitute(a:tgt,'^scp://[^/]\+/\(.*\)$','\1','')
 call s:NetrwExe(s:netrw_silentxfer."!".g:netrw_scp_cmd.s:ShellEscape(useport,1)." ".args." ".s:ShellEscape(machine.":".tgt,1))
-call s:NetrwLcd(curdir)
+if s:NetrwLcd(curdir)
+"     call Dret("s:NetrwUpload : lcd failure")
+return
+endif
 elseif a:tgt =~ '^ftp:'
 call s:NetrwMethod(a:tgt)
 if b:netrw_method == 2
 let mod    = 1
 else
 bw!|q
 endif
 elseif !exists("b:netrw_method") || b:netrw_method < 0
-"     call Dfunc("netrw#NetrwUpload : unsupported method")
+"     call Dret("s:#NetrwUpload : unsupported method")
 return
 endif
 else
 call netrw#ErrorMsg(s:ERROR,"can't obtain files with protocol from<".a:tgt.">",63)
 endif
 " at the current time (Mar 19, 2007) all calls to NetrwRefresh() call NetrwBrowseChgDir() first.
 setl ma noro
 "  call Decho("setl ma noro",'~'.expand("<slnum>"))
 "  call Decho("clear buffer<".expand("%")."> with :%d",'~'.expand("<slnum>"))
 let ykeep      = @@
+if exists("w:netrw_liststyle") && w:netrw_liststyle == s:TREELIST
+if !exists("w:netrw_treetop")
+if exists("b:netrw_curdir")
+let w:netrw_treetop= b:netrw_curdir
+else
+let w:netrw_treetop= getcwd()
+endif
+endif
+NetrwKeepj call s:NetrwRefreshTreeDict(w:netrw_treetop)
+endif
 " save the cursor position before refresh.
 let screenposn = winsaveview()
 "  call Decho("saving posn to screenposn<".string(screenposn).">",'~'.expand("<slnum>"))
 " restore position
 "  call Decho("restoring posn to screenposn<".string(screenposn).">",'~'.expand("<slnum>"))
 NetrwKeepj call winrestview(screenposn)
 " restore file marks
-if exists("s:netrwmarkfilemtch_{bufnr('%')}") && s:netrwmarkfilemtch_{bufnr("%")} != ""
+if has("syntax") && exists("g:syntax_on") && g:syntax_on
-"   call Decho("exe 2match netrwMarkFile /".s:netrwmarkfilemtch_{bufnr("%")}."/",'~'.expand("<slnum>"))
+if exists("s:netrwmarkfilemtch_{bufnr('%')}") && s:netrwmarkfilemtch_{bufnr("%")} != ""
-exe "2match netrwMarkFile /".s:netrwmarkfilemtch_{bufnr("%")}."/"
+" "   call Decho("exe 2match netrwMarkFile /".s:netrwmarkfilemtch_{bufnr("%")}."/",'~'.expand("<slnum>"))
-else
+exe "2match netrwMarkFile /".s:netrwmarkfilemtch_{bufnr("%")}."/"
-"   call Decho("2match none  (bufnr(%)=".bufnr("%")."<".bufname("%").">)",'~'.expand("<slnum>"))
+else
-2match none
+" "   call Decho("2match none  (bufnr(%)=".bufnr("%")."<".bufname("%").">)",'~'.expand("<slnum>"))
-endif
+2match none
+endif
+endif
 "  restore
 let @@= ykeep
 "  call Dret("s:NetrwRefresh")
 endfun
 " display subtrees (if any)
 let depth= s:treedepthstring.a:depth
 "  call Decho("display subtrees with depth<".depth."> and current leaves",'~'.expand("<slnum>"))
+" implement g:netrw_hide for tree listings (uses g:netrw_list_hide)
+if     g:netrw_hide == 1
+" hide given patterns
+let listhide= split(g:netrw_list_hide,',')
+"   call Decho("listhide=".string(listhide))
+for pat in listhide
+call filter(w:netrw_treedict[dir],'v:val !~ "'.pat.'"')
+endfor
+elseif g:netrw_hide == 2
+" show given patterns (only)
+let listhide= split(g:netrw_list_hide,',')
+"   call Decho("listhide=".string(listhide))
+let entries=[]
+for entry in w:netrw_treedict[dir]
+for pat in listhide
+if entry =~ pat
+call add(entries,entry)
+break
+endif
+endfor
+endfor
+let w:netrw_treedict[dir]= entries
+endif
+if depth != ""
+" always remove "." and ".." entries when there's depth
+call filter(w:netrw_treedict[dir],'v:val !~ "\\.\\.$"')
+call filter(w:netrw_treedict[dir],'v:val !~ "\\.$"')
+endif
 "  call Decho("for every entry in w:netrw_treedict[".dir."]=".string(w:netrw_treedict[dir]),'~'.expand("<slnum>"))
 for entry in w:netrw_treedict[dir]
 if dir =~ '/$'
 let direntry= substitute(dir.entry,'[@/]$','','e')
 else
 else
 "    call Decho("<".entry."> is not a key in treedict (no subtree)",'~'.expand("<slnum>"))
 sil! NetrwKeepj call setline(line("$")+1,depth.entry)
 endif
 endfor
+"  call Decho("displaying: ".string(getline(w:netrw_bannercnt,'$')))
 "  call Dret("NetrwTreeDisplay")
 endfun
 " ---------------------------------------------------------------------
 " s:NetrwRefreshTreeDict: updates the contents information for a tree (w:netrw_treedict) {{{2
 fun! s:NetrwRefreshTreeDict(dir)
 "  call Dfunc("s:NetrwRefreshTreeDict(dir<".a:dir.">)")
+if !exists("w:netrw_treedict")
+"   call Dret("s:NetrwRefreshTreeDict : w:netrw_treedict doesn't exist")
+return
+endif
 for entry in w:netrw_treedict[a:dir]
 let direntry= substitute(a:dir.'/'.entry,'[@/]$','','e')
 "   call Decho("a:dir<".a:dir."> entry<".entry."> direntry<".direntry.">",'~'.expand("<slnum>"))
 if entry =~ '/$' && has_key(w:netrw_treedict,direntry)
 let liststar   = s:NetrwGlob(direntry.'/','*',1)
 let listdotstar= s:NetrwGlob(direntry.'/','.*',1)
 "    call Decho("updating w:netrw_treedict[".direntry.']='.string(w:netrw_treedict[direntry]),'~'.expand("<slnum>"))
 else
-"    call Decho('not updating w:netrw_treedict['.direntry.'] with entry<'.entry.'> (no subtree)',,'~'.expand("<slnum>"))
+"    call Decho('not updating w:netrw_treedict['.string(direntry).'] with entry<'.string(entry).'> (no subtree)','~'.expand("<slnum>"))
 endif
 endfor
 "  call Dret("s:NetrwRefreshTreeDict")
 endfun
 return
 endif
 endfun
 " ---------------------------------------------------------------------
-" s:NetrwTreePath: returns path to current file in tree listing {{{2
+" s:NetrwTreePath: returns path to current file/directory in tree listing {{{2
 "                  Normally, treetop is w:netrw_treetop, but a
 "                  user of the function ( netrw#SetTreetop() )
 "                  wipes that out prior to calling this function
 fun! s:NetrwTreePath(treetop)
-"  call Dfunc("s:NetrwTreePath() line#".line(".")."<".getline(".").">")
+"  call Dfunc("s:NetrwTreePath(treetop<".a:treetop.">) line#".line(".")."<".getline(".").">")
+if line(".") < w:netrw_bannercnt + 2
+let treedir= a:treetop
+if treedir !~ '/$'
+let treedir= treedir.'/'
+endif
+"   call Dret("s:NetrwTreePath ".treedir." : line#".line(".")." ≤ ".(w:netrw_bannercnt+2))
+return treedir
+endif
 let svpos = winsaveview()
 "  call Decho("saving posn to svpos<".string(svpos).">",'~'.expand("<slnum>"))
 let depth = substitute(getline('.'),'^\(\%('.s:treedepthstring.'\)*\)[^'.s:treedepthstring.'].\{-}$','\1','e')
 "  call Decho("depth<".depth."> 1st subst",'~'.expand("<slnum>"))
 let depth = substitute(depth,'^'.s:treedepthstring,'','')
 let dirname= substitute(getline('.'),'^\('.s:treedepthstring.'\)*','','e')
 let treedir= dirname.treedir
 let depth  = substitute(depth,'^'.s:treedepthstring,'','')
 "   call Decho("constructing treedir<".treedir.">: dirname<".dirname."> while depth<".depth.">",'~'.expand("<slnum>"))
 endwhile
+"  call Decho("treedir#1<".treedir.">",'~'.expand("<slnum>"))
 if a:treetop =~ '/$'
 let treedir= a:treetop.treedir
 else
 let treedir= a:treetop.'/'.treedir
 endif
+"  call Decho("treedir#2<".treedir.">",'~'.expand("<slnum>"))
 let treedir= substitute(treedir,'//$','/','')
+"  call Decho("treedir#3<".treedir.">",'~'.expand("<slnum>"))
 "  call Decho("restoring posn to svpos<".string(svpos).">",'~'.expand("<slnum>"))"
 call winrestview(svpos)
 "  call Dret("s:NetrwTreePath <".treedir.">")
 return treedir
 endfun
 " ---------------------------------------------------------------------
 " s:PerformListing: {{{2
 fun! s:PerformListing(islocal)
 "  call Dfunc("s:PerformListing(islocal=".a:islocal.")")
 "  call Decho("tab#".tabpagenr()." win#".winnr()." buf#".bufnr("%")."<".bufname("%")."> line#".line(".")." col#".col(".")." winline#".winline()." wincol#".wincol()." line($)=".line("$"),'~'.expand("<slnum>"))
-"  call Decho("settings: ".((&l:ma == 0)? "no" : "")."ma ".((&l:mod == 0)? "no" : "")."mod ".((&l:bl == 0)? "no" : "")."bl ".((&l:ro == 0)? "no" : "")."ro fo=".&l:fo. " (enter)",'~'.expand("<slnum>"))
+"  call Decho("settings: ".((&l:ma == 0)? "no" : "")."ma ".((&l:mod == 0)? "no" : "")."mod ".((&l:bl == 0)? "no" : "")."bl ".((&l:ro == 0)? "no" : "")."ro fo=".&l:fo. " (enter)"." ei<".&ei.">",'~'.expand("<slnum>"))
 " set up syntax highlighting {{{3
 "  call Decho("--set up syntax highlighting (ie. setl ft=netrw)",'~'.expand("<slnum>"))
 sil! setl ft=netrw
 exe "sil! NetrwKeepj ".w:netrw_bannercnt
 "  else " Decho
 "   call Decho("g:netrw_banner=".g:netrw_banner.": banner ".(g:netrw_banner? "enabled" : "suppressed").": (line($)=".line("$")." byte2line(1)=".byte2line(1)." bannercnt=".w:netrw_bannercnt.")",'~'.expand("<slnum>"))
 endif
-" show copy/move target, if any
+" show copy/move target, if any {{{3
 if g:netrw_banner
 if exists("s:netrwmftgt") && exists("s:netrwmftgt_islocal")
 "    call Decho("--show copy/move target<".s:netrwmftgt.">",'~'.expand("<slnum>"))
 NetrwKeepj put =''
 if s:netrwmftgt_islocal
 "  call Decho("settings buf#".bufnr("%")."<".bufname("%").">: ".((&l:ma == 0)? "no" : "")."ma ".((&l:mod == 0)? "no" : "")."mod ".((&l:bl == 0)? "no" : "")."bl ".((&l:ro == 0)? "no" : "")."ro fo=".&l:fo. " (internal#3)",'~'.expand("<slnum>"))
 " resolve symbolic links if local and (thin or tree)
 if a:islocal && (w:netrw_liststyle == s:THINLIST || (exists("w:netrw_liststyle") && w:netrw_liststyle == s:TREELIST))
 "   call Decho("--resolve symbolic links if local and thin|tree",'~'.expand("<slnum>"))
-g/@$/call s:ShowLink()
+sil! g/@$/call s:ShowLink()
 endif
 if exists("w:netrw_bannercnt") && (line("$") >= w:netrw_bannercnt || !g:netrw_banner)
 " place cursor on the top-left corner of the file listing
 "   call Decho("--place cursor on top-left corner of file listing",'~'.expand("<slnum>"))
 redraw
 "  call Dret("SetupNetrwStatusLine : stl=".&stl)
 endfun
-" ---------------------------------------------------------------------
+" =========================================
-"  Remote Directory Browsing Support:    {{{1
+"  Remote Directory Browsing Support:  {{{1
-" ===========================================
+" =========================================
 " ---------------------------------------------------------------------
 " s:NetrwRemoteFtpCmd: unfortunately, not all ftp servers honor options for ls {{{2
 "  This function assumes that a long listing will be received.  Size, time,
 "  and reverse sorts will be requested of the server but not otherwise
 NetrwKeepj call winrestview(svpos)
 "  call Dret("NetrwRemoteRename")
 endfun
-" ---------------------------------------------------------------------
+" ==========================================
 "  Local Directory Browsing Support:    {{{1
 " ==========================================
 " ---------------------------------------------------------------------
-" netrw#FileUrlRead: handles reading file://* files {{{2
+" netrw#FileUrlEdit: handles editing file://* files {{{2
 "   Should accept:   file://localhost/etc/fstab
 "                    file:///etc/fstab
 "                    file:///c:/WINDOWS/clock.avi
 "                    file:///c|/WINDOWS/clock.avi
 "                    file://localhost/c:/WINDOWS/clock.avi
 "                    file://localhost/c|/WINDOWS/clock.avi
 "                    file://c:/foo.txt
 "                    file:///c:/foo.txt
 " and %XX (where X is [0-9a-fA-F] is converted into a character with the given hexadecimal value
-fun! netrw#FileUrlRead(fname)
+fun! netrw#FileUrlEdit(fname)
-"  call Dfunc("netrw#FileUrlRead(fname<".a:fname.">)")
+"  call Dfunc("netrw#FileUrlEdit(fname<".a:fname.">)")
 let fname = a:fname
 if fname =~ '^file://localhost/'
 "   call Decho('converting file://localhost/   -to-  file:///','~'.expand("<slnum>"))
 let fname= substitute(fname,'^file://localhost/','file:///','')
 "   call Decho("fname<".fname.">",'~'.expand("<slnum>"))
 if plainfname =~ '^/\+\a:'
 "    call Decho('removing leading "/"s','~'.expand("<slnum>"))
 let plainfname= substitute(plainfname,'^/\+\(\a:\)','\1','')
 endif
 endif
 "  call Decho("fname2396<".fname2396.">",'~'.expand("<slnum>"))
 "  call Decho("plainfname<".plainfname.">",'~'.expand("<slnum>"))
 exe "sil doau BufReadPre ".fname2396e
-exe 'NetrwKeepj r '.plainfname
+exe 'NetrwKeepj keepalt edit '.plainfname
-exe 'sil! bdelete '.plainfname
+exe 'sil! NetrwKeepj keepalt bdelete '.fnameescape(a:fname)
-exe 'keepalt file! '.plainfname
-NetrwKeepj 1d
-"  call Decho("setl nomod",'~'.expand("<slnum>"))
-setl nomod
 "  call Decho("ro=".&l:ro." ma=".&l:ma." mod=".&l:mod." wrap=".&l:wrap." (filename<".expand("%")."> win#".winnr()." ft<".&ft.">)",'~'.expand("<slnum>"))
-"  call Dret("netrw#FileUrlRead")
+"  call Dret("netrw#FileUrlEdit")
 exe "sil doau BufReadPost ".fname2396e
 endfun
 " ---------------------------------------------------------------------
 " netrw#LocalBrowseCheck: {{{2
 " would hit when re-entering netrw windows, creating unexpected
 " refreshes (and would do so in the middle of NetrwSaveOptions(), too)
 "  call Dfunc("netrw#LocalBrowseCheck(dirname<".a:dirname.">")
 "  call Decho("isdir<".a:dirname."> =".isdirectory(s:NetrwFile(a:dirname)).((exists("s:treeforceredraw")? " treeforceredraw" : "")).'~'.expand("<slnum>"))
 "  call Decho("settings buf#".bufnr("%")."<".bufname("%").">: ".((&l:ma == 0)? "no" : "")."ma ".((&l:mod == 0)? "no" : "")."mod ".((&l:bl == 0)? "no" : "")."bl ".((&l:ro == 0)? "no" : "")."ro fo=".&l:fo,'~'.expand("<slnum>"))
-"  call Dredir("ls!","ls!")
+"  call Dredir("ls!","netrw#LocalBrowseCheck")
 "  call Decho("tab#".tabpagenr()." win#".winnr()." buf#".bufnr("%")."<".bufname("%")."> line#".line(".")." col#".col(".")." winline#".winline()." wincol#".wincol(),'~'.expand("<slnum>"))
 "  call Decho("current buffer#".bufnr("%")."<".bufname("%")."> ft=".&ft,'~'.expand("<slnum>"))
 let ykeep= @@
 if isdirectory(s:NetrwFile(a:dirname))
 let buftablist = []
 let ykeep      = @@
 while itab <= tabpagenr("$")
 let buftablist = buftablist + tabpagebuflist()
 let itab       = itab + 1
-tabn
+sil! tabn
 endwhile
 "  call Decho("buftablist".string(buftablist),'~'.expand("<slnum>"))
 "  call Decho("s:netrw_browselist<".(exists("s:netrw_browselist")? string(s:netrw_browselist) : "").">",'~'.expand("<slnum>"))
 "  GO through all buffers on netrw_browselist (ie. just local-netrw buffers):
 "   | refresh any netrw window
 "   | wipe out any non-displaying netrw buffer
-let curwin = winnr()
+let curwinid = win_getid(winnr())
 let ibl    = 0
 for ibuf in s:netrw_browselist
 "   call Decho("bufwinnr(".ibuf.") index(buftablist,".ibuf.")=".index(buftablist,ibuf),'~'.expand("<slnum>"))
 if bufwinnr(ibuf) == -1 && index(buftablist,ibuf) == -1
 " wipe out any non-displaying netrw buffer
+" (ibuf not shown in a current window AND
+"  ibuf not in any tab)
 "    call Decho("wiping  buf#".ibuf,"<".bufname(ibuf).">",'~'.expand("<slnum>"))
 exe "sil! keepj bd ".fnameescape(ibuf)
 call remove(s:netrw_browselist,ibl)
 "    call Decho("browselist=".string(s:netrw_browselist),'~'.expand("<slnum>"))
 continue
 NetrwKeepj call s:NetrwRefresh(1,s:NetrwBrowseChgDir(1,'./'))
 endif
 let ibl= ibl + 1
 "   call Decho("bottom of s:netrw_browselist for loop: ibl=".ibl,'~'.expand("<slnum>"))
 endfor
-"  call Decho("restore window: exe ".curwin."wincmd w",'~'.expand("<slnum>"))
+"  call Decho("restore window: win_gotoid(".curwinid.")")
-exe curwin."wincmd w"
+call win_gotoid(curwinid)
 let @@= ykeep
 "  call Dret("s:LocalBrowseRefresh")
 endfun
 endif
 endif
 let rmfile= substitute(rmfile,'[\/]$','','e')
 if all || ok =~# 'y\%[es]' || ok == ""
-if v:version < 704 || !has("patch1109")
+if v:version < 704 || (v:version == 704 && !has("patch1107"))
 " "    call Decho("1st attempt: system(netrw#WinPath(".g:netrw_localrmdir.') '.s:ShellEscape(rmfile).')','~'.expand("<slnum>"))
 call system(netrw#WinPath(g:netrw_localrmdir).' '.s:ShellEscape(rmfile))
 " "    call Decho("v:shell_error=".v:shell_error,'~'.expand("<slnum>"))
 if v:shell_error != 0
 "  call Dret("s:NetrwLocalRmFile ".ok)
 return ok
 endfun
-" ---------------------------------------------------------------------
+" =====================================================================
 " Support Functions: {{{1
-" ---------------------------------------------------------------------
-" s:WinNames: COMBAK {{{2
-fun! s:WinNames(id)
-let curwin= winnr()
-1wincmd w
-"  call Decho("--- Windows By Name --- #".a:id)
-"  windo call Decho("win#".winnr()."<".expand("%").">")
-"  call Decho("--- --- --- --- --- ---")
-exe curwin."wincmd w"
-endfun
 " ---------------------------------------------------------------------
 " netrw#Access: intended to provide access to variable values for netrw's test suite {{{2
 "   0: marked file list of current buffer
 "   1: marked file target
 else
 return "no-list-buf#".bufnr('%')
 endif
 elseif a:ilist == 1
 return s:netrwmftgt
+endif
 endfun
 " ---------------------------------------------------------------------
 " netrw#Call: allows user-specified mappings to call internal netrw functions {{{2
 fun! netrw#Call(funcname,...)
-"  call Dfunc("netrw#Call(funcname<".a:funcname.">,".string(a:000).")")
+return call("s:".a:funcname,a:000)
-if a:0 > 0
-exe "call s:".a:funcname."(".string(a:000).")"
-else
-exe "call s:".a:funcname."()"
-endif
-"  call Dret("netrw#Call")
 endfun
 " ---------------------------------------------------------------------
 " netrw#Expose: allows UserMaps and pchk to look at otherwise script-local variables {{{2
 "               I expect this function to be used in
 "  call Dret("netrw#WinPath <".path.">")
 return path
 endfun
 " ---------------------------------------------------------------------
+" s:NetrwBadd: adds marked files to buffer list or vice versa {{{2
+"              cb : bl2mf=0  add marked files to buffer list
+"              cB : bl2mf=1  use bufferlist to mark files
+"              (mnemonic: cb = copy (marked files) to buffer list)
+fun! s:NetrwBadd(islocal,bl2mf)
+"  "  call Dfunc("s:NetrwBadd(islocal=".a:islocal." mf2bl=".mf2bl.")")
+if a:bl2mf
+" cB: add buffer list to marked files
+redir => bufl
+ls
+redir END
+let bufl = map(split(bufl,"\n"),'substitute(v:val,''^.\{-}"\(.*\)".\{-}$'',''\1'','''')')
+for fname in bufl
+call s:NetrwMarkFile(a:islocal,fname)
+endfor
+else
+" cb: add marked files to buffer list
+for fname in s:netrwmarkfilelist_{bufnr("%")}
+" "   call Decho("badd ".fname,'~'.expand("<slnum>"))
+exe "badd ".fnameescape(fname)
+endfor
+let curbufnr = bufnr("%")
+let curdir   = s:NetrwGetCurdir(a:islocal)
+call s:NetrwUnmarkList(curbufnr,curdir)                   " remove markings from local buffer
+endif
+"  call Dret("s:NetrwBadd")
+endfun
+" ---------------------------------------------------------------------
 "  s:ComposePath: Appends a new part to a path taking different systems into consideration {{{2
 fun! s:ComposePath(base,subdir)
 "  call Dfunc("s:ComposePath(base<".a:base."> subdir<".a:subdir.">)")
 if has("amiga")
 let ret = a:base."/" . a:subdir
 else
 let ret = a:base.a:subdir
 endif
-elseif a:subdir =~ '^\a:[/\\][^/\\]' && (has("win32") || has("win95") || has("win64") || has("win16"))
+" COMBAK: test on windows with changing to root directory: :e C:/
+elseif a:subdir =~ '^\a:[/\\]\([^/\\]\|$\)' && (has("win32") || has("win95") || has("win64") || has("win16"))
 "   call Decho("windows",'~'.expand("<slnum>"))
 let ret= a:subdir
-elseif a:base =~ '^\a:[/\\][^/\\]' && (has("win32") || has("win95") || has("win64") || has("win16"))
+elseif a:base =~ '^\a:[/\\]\([^/\\]\|$\)' && (has("win32") || has("win95") || has("win64") || has("win16"))
 "   call Decho("windows",'~'.expand("<slnum>"))
 if a:base =~ '[/\\]$'
 let ret= a:base.a:subdir
 else
 let ret= a:base.'/'.a:subdir
 endfun
 " ---------------------------------------------------------------------
 " s:NetrwEnew: opens a new buffer, passes netrw buffer variables through {{{2
 fun! s:NetrwEnew(...)
-"  call Dfunc("s:NetrwEnew() a:0=".a:0." bufnr($)=".bufnr("$"))
+"  call Dfunc("s:NetrwEnew() a:0=".a:0." bufnr($)=".bufnr("$")." expand(%)<".expand("%").">")
 "  call Decho("curdir<".((a:0>0)? a:1 : "")."> buf#".bufnr("%")."<".bufname("%").">",'~'.expand("<slnum>"))
 " grab a function-local-variable copy of buffer variables
 "  call Decho("make function-local copy of netrw variables",'~'.expand("<slnum>"))
 if exists("b:netrw_bannercnt")      |let netrw_bannercnt       = b:netrw_bannercnt      |endif
 file NetrwTreeListing
 setl nobl bt=nowrite bh=hide
 nno <silent> <buffer> [	:sil call <SID>TreeListMove('[')<cr>
 nno <silent> <buffer> ]	:sil call <SID>TreeListMove(']')<cr>
 else
-exe "sil! keepalt file ".fnameescape(b:netrw_curdir)
+call s:NetrwBufRename(b:netrw_curdir)
 endif
 endif
 endif
 "  call Dret("s:NetrwEnew : buf#".bufnr("%")."<".bufname("%")."> expand(%)<".expand("%")."> expand(#)<".expand("#")."> bh=".&bh." win#".winnr()." winnr($)#".winnr("$"))
 endfun
 " ---------------------------------------------------------------------
 " s:NetrwExe: executes a string using "!" {{{2
 fun! s:NetrwExe(cmd)
-"  call Dfunc("s:NetrwExe(a:cmd)")
+"  call Dfunc("s:NetrwExe(a:cmd<".a:cmd.">)")
 if has("win32") && &shell !~? 'cmd' && !g:netrw_cygwin
+"    call Decho("using win32:",expand("<slnum>"))
 let savedShell=[&shell,&shellcmdflag,&shellxquote,&shellxescape,&shellquote,&shellpipe,&shellredir,&shellslash]
 set shell& shellcmdflag& shellxquote& shellxescape&
 set shellquote& shellpipe& shellredir& shellslash&
 exe a:cmd
 let [&shell,&shellcmdflag,&shellxquote,&shellxescape,&shellquote,&shellpipe,&shellredir,&shellslash] = savedShell
 else
+"   call Decho("exe ".a:cmd,'~'.expand("<slnum>"))
 exe a:cmd
 endif
-"  call Dret("s:NetrwExe")
+"  call Dret("s:NetrwExe : v:shell_error=".v:shell_error)
 endfun
 " ---------------------------------------------------------------------
 " s:NetrwInsureWinVars: insure that a netrw buffer has its w: variables in spite of a wincmd v or s {{{2
 fun! s:NetrwInsureWinVars()
 endif
 endfun
 " ---------------------------------------------------------------------
 " s:NetrwLcd: handles changing the (local) directory {{{2
+"   Returns: 0=success
+"           -1=failed
 fun! s:NetrwLcd(newdir)
 "  call Dfunc("s:NetrwLcd(newdir<".a:newdir.">)")
+let err472= 0
 try
 exe 'NetrwKeepj sil lcd '.fnameescape(a:newdir)
 catch /^Vim\%((\a\+)\)\=:E344/
 " Vim's lcd fails with E344 when attempting to go above the 'root' of a Windows share.
 " Therefore, detect if a Windows share is present, and if E344 occurs, just settle at
 let dirname = '\'
 	 exe 'NetrwKeepj sil lcd '.fnameescape(dirname)
 endif
 endif
 catch /^Vim\%((\a\+)\)\=:E472/
+let err472= 1
+endtry
+if err472
 call netrw#ErrorMsg(s:ERROR,"unable to change directory to <".a:newdir."> (permissions?)",61)
 if exists("w:netrw_prvdir")
 let a:newdir= w:netrw_prvdir
 else
 call s:NetrwOptionRestore("w:")
 "    call Decho("setl noma nomod nowrap",'~'.expand("<slnum>"))
 exe "setl ".g:netrw_bufsettings
 "    call Decho(" ro=".&l:ro." ma=".&l:ma." mod=".&l:mod." wrap=".&l:wrap." (filename<".expand("%")."> win#".winnr()." ft<".&ft.">)",'~'.expand("<slnum>"))
 let a:newdir= dirname
-"    call Dret("s:NetrwBrowse : reusing buffer#".(exists("bufnum")? bufnum : 'N/A')."<".dirname."> getcwd<".getcwd().">")
+endif
-return
+"   call Dret("s:NetrwBrowse -1 : reusing buffer#".(exists("bufnum")? bufnum : 'N/A')."<".dirname."> getcwd<".getcwd().">")
-endif
+return -1
-endtry
+endif
-"  call Dret("s:NetrwLcd")
+"  call Dret("s:NetrwLcd 0")
+return 0
 endfun
 " ------------------------------------------------------------------------
 " s:NetrwSaveWordPosn: used to keep cursor on same word after refresh, {{{2
 " changed sorting, etc.  Also see s:NetrwRestoreWordPosn().
 " s:Rexplore: implements returning from a buffer to a netrw directory {{{2
 "
 "             s:SetRexDir() sets up <2-leftmouse> maps (if g:netrw_retmap
 "             is true) and a command, :Rexplore, which call this function.
 "
-"             s:netrw_nbcd is set up by s:NetrwBrowseChgDir()
+"             s:netrw_posn is set up by s:NetrwBrowseChgDir()
 "
 "             s:rexposn_BUFNR used to save/restore cursor position
 fun! s:NetrwRexplore(islocal,dirname)
 if exists("s:netrwdrag")
 return
 endif
 else
 "   call Decho("s:rexposn_".bufnr('%')."<".bufname("%")."> doesn't exist",'~'.expand("<slnum>"))
 endif
-if exists("s:explore_match")
+if has("syntax") && exists("g:syntax_on") && g:syntax_on
-exe "2match netrwMarkFile /".s:explore_match."/"
+if exists("s:explore_match")
+exe "2match netrwMarkFile /".s:explore_match."/"
+endif
 endif
 "  call Decho("settings buf#".bufnr("%")."<".bufname("%").">: ".((&l:ma == 0)? "no" : "")."ma ".((&l:mod == 0)? "no" : "")."mod ".((&l:bl == 0)? "no" : "")."bl ".((&l:ro == 0)? "no" : "")."ro fo=".&l:fo,'~'.expand("<slnum>"))
 "  call Dret("s:NetrwRexplore : ft=".&ft)
 endfun
 " ---------------------------------------------------------------------
 " s:SavePosn: saves position associated with current buffer into a dictionary {{{2
 fun! s:SavePosn(posndict)
 "  call Dfunc("s:SavePosn(posndict) curbuf#".bufnr("%")."<".bufname("%").">")
-let a:posndict[bufnr("%")]= winsaveview()
+if !exists("a:posndict[bufnr('%')]")
-"  call Decho("saving posn: posndict[".bufnr("%")."]=".string(winsaveview()),'~'.expand("<slnum>"))
+let a:posndict[bufnr("%")]= []
+endif
+"  call Decho("before push: a:posndict[buf#".bufnr("%")."]=".string(a:posndict[bufnr('%')]))
+call add(a:posndict[bufnr("%")],winsaveview())
+"  call Decho("after  push: a:posndict[buf#".bufnr("%")."]=".string(a:posndict[bufnr('%')]))
 "  call Dret("s:SavePosn posndict")
 return a:posndict
 endfun
 " ---------------------------------------------------------------------
 " s:RestorePosn: restores position associated with current buffer using dictionary {{{2
 fun! s:RestorePosn(posndict)
 "  call Dfunc("s:RestorePosn(posndict) curbuf#".bufnr("%")."<".bufname("%").">")
-if has_key(a:posndict,bufnr("%"))
+if exists("a:posndict")
-call winrestview(a:posndict[bufnr("%")])
+if has_key(a:posndict,bufnr("%"))
-"   call Decho("restoring posn: posndict[".bufnr("%")."]=".string(a:posndict[bufnr("%")]),'~'.expand("<slnum>"))
+"    call Decho("before pop: a:posndict[buf#".bufnr("%")."]=".string(a:posndict[bufnr('%')]))
+let posnlen= len(a:posndict[bufnr("%")])
+if posnlen > 0
+let posnlen= posnlen - 1
+"     call Decho("restoring posn posndict[".bufnr("%")."][".posnlen."]=".string(a:posndict[bufnr("%")][posnlen]),'~'.expand("<slnum>"))
+call winrestview(a:posndict[bufnr("%")][posnlen])
+call remove(a:posndict[bufnr("%")],posnlen)
+"     call Decho("after  pop: a:posndict[buf#".bufnr("%")."]=".string(a:posndict[bufnr('%')]))
+endif
+endif
 endif
 "  call Dret("s:RestorePosn")
 endfun
 " ---------------------------------------------------------------------
 endif
 "  call Dret("s:UserMaps")
 endfun
-" ---------------------------------------------------------------------
+" ==========================
 " Settings Restoration: {{{1
+" ==========================
 let &cpo= s:keepcpo
 unlet s:keepcpo
-" ------------------------------------------------------------------------
+" ===============
 " Modelines: {{{1
+" ===============
 " vim:ts=8 fdm=marker

Mercurial > vim

comparison runtime/autoload/netrw.vim @ 12785:65d7fd8381a3