Bram Moolenaar | a5792f5 | 2005-11-23 21:25:05 +0000 | [diff] [blame^] | 1 | " netrwSettings.vim: makes netrw settings simpler |
| 2 | " Date: Oct 12, 2005 |
| 3 | " Maintainer: Charles E Campbell, Jr <drchipNOSPAM at campbellfamily dot biz> |
| 4 | " Version: 4 |
| 5 | " Copyright: Copyright (C) 1999-2005 Charles E. Campbell, Jr. {{{1 |
| 6 | " Permission is hereby granted to use and distribute this code, |
| 7 | " with or without modifications, provided that this copyright |
| 8 | " notice is copied with it. Like anything else that's free, |
| 9 | " netrwSettings.vim is provided *as is* and comes with no |
| 10 | " warranty of any kind, either expressed or implied. By using |
| 11 | " this plugin, you agree that in no event will the copyright |
| 12 | " holder be liable for any damages resulting from the use |
| 13 | " of this software. |
| 14 | " |
| 15 | " Mat 4:23 (WEB) Jesus went about in all Galilee, teaching in their {{{1 |
| 16 | " synagogues, preaching the gospel of the kingdom, and healing |
| 17 | " every disease and every sickness among the people. |
| 18 | " Load Once: {{{1 |
| 19 | if exists("g:loaded_netrwSettings") || &cp |
| 20 | finish |
| 21 | endif |
| 22 | let g:loaded_netrwSettings = "v4" |
| 23 | |
| 24 | " --------------------------------------------------------------------- |
| 25 | " NetrwSettings: {{{1 |
| 26 | fun! netrwSettings#NetrwSettings() |
| 27 | " this call is here largely just to insure that netrw has been loaded |
| 28 | call netrw#NetSavePosn() |
| 29 | if !exists("g:loaded_netrw") |
| 30 | echohl WarningMsg | echomsg "***sorry*** netrw needs to be loaded prior to using NetrwSettings" | echohl None |
| 31 | return |
| 32 | endif |
| 33 | |
| 34 | above wincmd s |
| 35 | enew |
| 36 | setlocal noswapfile bh=wipe |
| 37 | set ft=vim |
| 38 | file Netrw\ Settings |
| 39 | |
| 40 | " these variables have the following default effects when they don't |
| 41 | " exist (ie. have not been set by the user in his/her .vimrc) |
| 42 | if !exists("g:netrw_longlist") |
| 43 | let g:netrw_longlist= 0 |
| 44 | let g:netrw_list_cmd= "ssh HOSTNAME ls -FLa" |
| 45 | endif |
| 46 | if !exists("g:netrw_silent") |
| 47 | let g:netrw_silent= 0 |
| 48 | endif |
| 49 | if !exists("g:netrw_use_nt_rcp") |
| 50 | let g:netrw_use_nt_rcp= 0 |
| 51 | endif |
| 52 | if !exists("g:netrw_ftp") |
| 53 | let g:netrw_ftp= 0 |
| 54 | endif |
| 55 | if !exists("g:netrw_ignorenetrc") |
| 56 | let g:netrw_ignorenetrc= 0 |
| 57 | endif |
| 58 | |
| 59 | put ='+ ---------------------------------------------' |
| 60 | put ='+ NetrwSettings: (by Charles E. Campbell, Jr.)' |
| 61 | put ='+ Press ? with cursor atop any line for help ' |
| 62 | put ='+ ---------------------------------------------' |
| 63 | let s:netrw_settings_stop= line(".") |
| 64 | |
| 65 | put ='' |
| 66 | put ='+ Netrw Protocol Commands' |
| 67 | put = 'let g:netrw_dav_cmd = '.g:netrw_dav_cmd |
| 68 | put = 'let g:netrw_fetch_cmd = '.g:netrw_fetch_cmd |
| 69 | put = 'let g:netrw_ftp_cmd = '.g:netrw_ftp_cmd |
| 70 | put = 'let g:netrw_http_cmd = '.g:netrw_http_cmd |
| 71 | put = 'let g:netrw_rcp_cmd = '.g:netrw_rcp_cmd |
| 72 | put = 'let g:netrw_rsync_cmd = '.g:netrw_rsync_cmd |
| 73 | put = 'let g:netrw_scp_cmd = '.g:netrw_scp_cmd |
| 74 | put = 'let g:netrw_sftp_cmd = '.g:netrw_sftp_cmd |
| 75 | put = 'let g:netrw_ssh_cmd = '.g:netrw_ssh_cmd |
| 76 | let s:netrw_protocol_stop= line(".") |
| 77 | put = '' |
| 78 | |
| 79 | put ='+Netrw Transfer Control' |
| 80 | put = 'let g:netrw_cygwin = '.g:netrw_cygwin |
| 81 | put = 'let g:netrw_ftp = '.g:netrw_ftp |
| 82 | put = 'let g:netrw_ftpmode = '.g:netrw_ftpmode |
| 83 | put = 'let g:netrw_ignorenetrc = '.g:netrw_ignorenetrc |
| 84 | put = 'let g:netrw_use_nt_rcp = '.g:netrw_use_nt_rcp |
| 85 | put = 'let g:netrw_win95ftp = '.g:netrw_win95ftp |
| 86 | let s:netrw_xfer_stop= line(".") |
| 87 | |
| 88 | put = '' |
| 89 | put ='+ Netrw Browser Control' |
| 90 | put = 'let g:netrw_alto = '.g:netrw_alto |
| 91 | put = 'let g:netrw_altv = '.g:netrw_altv |
| 92 | put = 'let g:netrw_dirhistmax = '.g:netrw_dirhistmax |
| 93 | put = 'let g:netrw_ftp_browse_reject = '.g:netrw_ftp_browse_reject |
| 94 | put = 'let g:netrw_ftp_list_cmd = '.g:netrw_ftp_list_cmd |
| 95 | put = 'let g:netrw_hide = '.g:netrw_hide |
| 96 | put = 'let g:netrw_keepdir = '.g:netrw_keepdir |
| 97 | put = 'let g:netrw_list_cmd = '.g:netrw_list_cmd |
| 98 | put = 'let g:netrw_list_hide = '.g:netrw_list_hide |
| 99 | put = 'let g:netrw_local_mkdir = '.g:netrw_local_mkdir |
| 100 | put = 'let g:netrw_local_rmdir = '.g:netrw_local_rmdir |
| 101 | put = 'let g:netrw_longlist = '.g:netrw_longlist |
| 102 | put = 'let g:netrw_maxfilenamelen = '.g:netrw_maxfilenamelen |
| 103 | put = 'let g:netrw_mkdir_cmd = '.g:netrw_mkdir_cmd |
| 104 | put = 'let g:netrw_rename_cmd = '.g:netrw_rename_cmd |
| 105 | put = 'let g:netrw_rm_cmd = '.g:netrw_rm_cmd |
| 106 | put = 'let g:netrw_rmdir_cmd = '.g:netrw_rmdir_cmd |
| 107 | put = 'let g:netrw_rmf_cmd = '.g:netrw_rmf_cmd |
| 108 | put = 'let g:netrw_silent = '.g:netrw_silent |
| 109 | put = 'let g:netrw_sort_by = '.g:netrw_sort_by |
| 110 | put = 'let g:netrw_sort_direction = '.g:netrw_sort_direction |
| 111 | put = 'let g:netrw_sort_sequence = '.g:netrw_sort_sequence |
| 112 | put = 'let g:netrw_ssh_browse_reject = '.g:netrw_ssh_browse_reject |
| 113 | put = 'let g:netrw_timefmt = '.g:netrw_timefmt |
| 114 | put = 'let g:netrw_winsize = '.g:netrw_winsize |
| 115 | |
| 116 | put ='' |
| 117 | put ='+ For help, place cursor on line and press ?' |
| 118 | |
| 119 | 1d |
| 120 | silent %s/^+/"/e |
| 121 | res 99 |
| 122 | silent %s/= \([^0-9].*\)$/= '\1'/e |
| 123 | silent %s/= $/= ''/e |
| 124 | 1 |
| 125 | |
| 126 | set nomod |
| 127 | |
| 128 | map <buffer> <silent> ? :call NetrwSettingHelp()<cr> |
| 129 | let tmpfile= tempname() |
| 130 | exe 'au BufWriteCmd Netrw\ Settings silent w! '.tmpfile.'|so '.tmpfile.'|call delete("'.tmpfile.'")|set nomod' |
| 131 | endfun |
| 132 | |
| 133 | " --------------------------------------------------------------------- |
| 134 | " NetrwSettingHelp: {{{2 |
| 135 | fun! NetrwSettingHelp() |
| 136 | " call Dfunc("NetrwSettingHelp()") |
| 137 | let curline = getline(".") |
| 138 | if curline =~ '=' |
| 139 | let varhelp = substitute(curline,'^\s*let ','','e') |
| 140 | let varhelp = substitute(varhelp,'\s*=.*$','','e') |
| 141 | " call Decho("trying help ".varhelp) |
| 142 | try |
| 143 | exe "he ".varhelp |
| 144 | catch /^Vim\%((\a\+)\)\=:E149/ |
| 145 | echo "***sorry*** no help available for <".varhelp.">" |
| 146 | endtry |
| 147 | elseif line(".") < s:netrw_settings_stop |
| 148 | he netrw-settings |
| 149 | elseif line(".") < s:netrw_protocol_stop |
| 150 | he netrw-externapp |
| 151 | elseif line(".") < s:netrw_xfer_stop |
| 152 | he netrw-variables |
| 153 | else |
| 154 | he netrw-browse-var |
| 155 | endif |
| 156 | " call Dret("NetrwSettingHelp") |
| 157 | endfun |
| 158 | |
| 159 | " --------------------------------------------------------------------- |
| 160 | " Modelines: {{{1 |
| 161 | " vim:ts=8 fdm=marker |