Mercurial > hg > mercurial-crew-with-dirclash
comparison contrib/zsh_completion @ 3546:6106236bc4eb
zsh: support remote URLs
author | Brendan Cully <brendan@kublai.com> |
---|---|
date | Thu, 26 Oct 2006 22:28:33 -0700 |
parents | 35b99f076d02 |
children | c8494fcc9d39 |
comparison
equal
deleted
inserted
replaced
3545:35b99f076d02 | 3546:6106236bc4eb |
---|---|
152 _hg_addremove() { | 152 _hg_addremove() { |
153 _alternative 'files:unknown files:_hg_unknown' \ | 153 _alternative 'files:unknown files:_hg_unknown' \ |
154 'files:missing files:_hg_missing' | 154 'files:missing files:_hg_missing' |
155 } | 155 } |
156 | 156 |
157 _hg_urls() { | |
158 if compset -P bundle:// | |
159 then | |
160 _files | |
161 elif [[ -prefix *: ]] | |
162 then | |
163 _urls | |
164 else | |
165 local expl | |
166 compset -S '[^:]*' | |
167 _wanted url-schemas expl 'URL schema' compadd -S '' - \ | |
168 http:// https:// ssh:// bundle:// | |
169 fi | |
170 } | |
171 | |
157 _hg_paths() { | 172 _hg_paths() { |
158 typeset -a paths pnames | 173 typeset -a paths pnames |
159 _hg_cmd paths 2> /dev/null | while read -A pnames | 174 _hg_cmd paths 2> /dev/null | while read -A pnames |
160 do | 175 do |
161 paths+=($pnames[1]) | 176 paths+=($pnames[1]) |
162 done | 177 done |
163 (( $#paths )) && _describe -t urls 'repository aliases' paths | 178 (( $#paths )) && _describe -t path-aliases 'repository alias' paths |
164 } | 179 } |
165 | 180 |
166 _hg_remote() { | 181 _hg_remote() { |
167 _alternative 'urls:repository alias:_hg_paths' \ | 182 _alternative 'path-aliases:repository alias:_hg_paths' \ |
168 'directories:directory:_files -/' | 183 'directories:directory:_files -/' \ |
184 'urls:URL schema:_hg_urls' | |
169 } | 185 } |
170 | 186 |
171 # Common options | 187 # Common options |
172 _hg_global_opts=( | 188 _hg_global_opts=( |
173 '(--repository -R)'{-R+,--repository}'[repository root directory]:repository:_files -/' | 189 '(--repository -R)'{-R+,--repository}'[repository root directory]:repository:_files -/' |