mercurial-crew-with-dirclash: contrib/zsh

comparison contrib/zsh_completion @ 3511:060aefba4459

zsh: rewrite This version of zsh completion handles global options more correctly, completes options for command abbreviations, and does much more lazy evaluation.

author	Brendan Cully <brendan@kublai.com>
date	Wed, 25 Oct 2006 15:08:40 -0700
parents	776c317566b6
children	a6dd7ab568cc

comparison

equal deleted inserted replaced

-:9383af6f236d
+:060aefba4459
 # Software Foundation; either version 2 of the License, or (at your
 # option) any later version.
 #
 local curcontext="$curcontext" state line
-typeset -A opt_args
+local repos newFiles addedFiles commitMessage
-local repos newFiles addedFiles includeExclude commitMessage
+typeset -A _hg_cmd_globals
-local ridx _hgroot
+_hg() {
-# FIXME: why isn't opt_args available?
+local cmd
-[[ -d .hg ]] && _hgroot="$PWD"
+integer i=2
-ridx=$words[(i)-R]
+_hg_cmd_globals=()
-(( $ridx < $#words )) && _hgroot="${words[$ridx+1]}"
+while (( i < $#words ))
-# hg dispatch (borrowed from _cvs)
+do
-(( $+functions[_hg_cmd] )) ||
+case "$words[$i]" in
-_hg_cmd () {
+-R|--repository|--cwd|--config)
-_call_program hg hg -R "$_hgroot" "$@"
+# pass along arguments to hg completer
-}
+_hg_cmd_globals+="$words[$i]"
+_hg_cmd_globals+="$words[$i+1]"
-(( $+functions[_hg_state] )) ||
+(( i += 2 ))
-_hg_state () {
+continue
-case "$state" in
+;;
-(tags)
+-R*)
-compadd $(_hg_cmd tags 2> /dev/null |
+_hg_cmd_globals+="$words[$i]"
-sed -e 's/[0-9]*:[a-f0-9]*$//; s/ *$//')
+(( i++ ))
-;;
+continue
-(qapplied)
+;;
-compadd $(_hg_cmd qapplied)
+-*)
-;;
+# skip option
-(qunapplied)
+(( i++ ))
-compadd $(_hg_cmd qunapplied)
+continue
 ;;
 esac
-}
+if [[ -z "$cmd" ]]
+then
-(( $+_hg_commands )) ||
+cmd="$words[$i]"
-_hg_commands=($(hg -v help | sed -e '1,/^list of commands:/d' \
+words[$i]=()
--e '/^global options:/,$d' -e '/^ [^ ]/!d; s/[,:].*//g;'))
+(( CURRENT-- ))
-# A lot of commands have these arguments
-includeExclude=(
-'*-I-[include names matching the given patterns]:dir:_files -W $(_hg_cmd root) -/'
-'*--include-[include names matching the given patterns]:dir:_files -W $(_hg_cmd root) -/'
-'*-X-[exclude names matching the given patterns]:dir:_files -W $(_hg_cmd root) -/'
-'*--exclude-[exclude names matching the given patterns]:dir:_files -W $(_hg_cmd root) -/')
-styleOpts=(
-'--style[display using template map file]:'
-'--template[display with template]:')
-commitMessage=(
-'(-m --message -l --logfile --edit)-e[edit commit message]'
-'(-m --message -l --logfile -e)--edit[edit commit message]'
-'(-e --edit -l --logfile --message)-m[use <text> as commit message]:message:'
-'(-e --edit -l --logfile -m)--message[use <text> as commit message]:message:'
-'(-e --edit -m --message --logfile)-l[read the commit message from <file>]:log file:_files'
-'(-e --edit -m --message -l)--logfile[read the commit message from <file>]:log file:_files')
-if [[ $service == "hg" ]]; then
-_arguments -C -A "-*" \
-'(--repository)-R[repository root directory]:root:_files -/' \
-'(-R)--repository[repository root directory]:root:_files -/' \
-'--cwd[change working directory]:new working directory:_files -/' \
-'(--noninteractive)-y[do not prompt, assume yes for any required answers]' \
-'(-y)--noninteractive[do not prompt, assume yes for any required answers]' \
-'(--verbose)-v[enable additional output]' \
-'(-v)--verbose[enable additional output]' \
-'(--quiet)-q[suppress output]' \
-'(-q)--quiet[suppress output]' \
-'(--help)-h[display help and exit]' \
-'(-h)--help[display help and exit]' \
-'--debug[debug mode]' \
-'--debugger[start debugger]' \
-'--traceback[print traceback on exception]' \
-'--time[time how long the command takes]' \
-'--profile[profile]' \
-'--version[output version information and exit]' \
-'*::command:->subcmd' && return 0
-if (( CURRENT == 1 )); then
-_wanted commands expl 'hg command' compadd -a _hg_commands
-return
 fi
-service="$words[1]"
+(( i++ ))
-curcontext="${curcontext%:*}=$service:"
+done
-fi
+if [[ -z "$cmd" ]]
-case $service in
+then
-(add)
+_arguments -s -w : $_hg_global_opts \
-newFiles=(${(ps:\0:)"$(_hg_cmd status -0un .)"})
+':mercurial command:_hg_commands'
-_arguments $includeExclude \
+return
-'*:file:->unknown'
+fi
-_wanted files expl 'unknown files' compadd -a newFiles
-;;
+# resolve abbreviations and aliases
+if ! (( $+functions[_hg_cmd_${cmd}] ))
-(addremove)
+then
-_arguments $includeExclude \
+local cmdexp
-'*:directories:_files -/'  # assume they want to add/remove a dir
+(( $#_hg_cmd_list )) || _hg_get_commands
-;;
+cmdexp=$_hg_cmd_list[(r)${cmd}*]
-(forget)
+if [[ $cmdexp == $_hg_cmd_list[(R)${cmd}*] ]]
-addedFiles=(${(ps:\0:)"$(_hg_cmd status -0an .)"})
+then
-_arguments $includeExclude  \
+# might be nice to rewrite the command line with the expansion
-'*:file:->added'
+cmd="$cmdexp"
-_wanted files expl 'newly added files' compadd -a addedFiles
+fi
-;;
+if [[ -n $_hg_alias_list[$cmd] ]]
+then
-(remove|rm)
+cmd=$_hg_alias_list[$cmd]
-_arguments $includeExclude \
+fi
-'*:file:_files'
+fi
-;;
+if (( $+functions[_hg_cmd_${cmd}] ))
-(copy|cp)
+then
-_arguments $includeExclude \
+curcontext="${curcontext%:*:*}:hg-${cmd}:"
-'(--after)-A[record a copy that has already occurred]' \
+_hg_cmd_${cmd}
-'(-A)--after[record a copy that has already occurred]' \
+return
-'(--force)-f[forcibly copy over an existing managed file]' \
+fi
-'(-f)--force[forcibly copy over an existing managed file]' \
+}
-'(--parents)-p[append source path to dest]' \
-'(-p)--parents[append source path to dest]' \
+_hg_get_commands() {
-'*:files:_files'
+typeset -ga _hg_cmd_list
-;;
+typeset -gA _hg_alias_list
+local hline cmd cmdalias
-(rename|mv)
+_call_program help hg --verbose help | while read -A hline
-if (( CURRENT == 2 )); then
+do
-_arguments $includeExclude \
+cmd="$hline[1]"
-'(--after)-A[record a rename that has already occurred]' \
+case $cmd in
-'(-A)--after[record a rename that has already occurred]' \
+*:)
-'(--force)-f[replace destination if it exists]' \
+cmd=${cmd%:}
-'(-F)--force[replace destination if it exists]' \
+_hg_cmd_list+=($cmd)
-'(--parents)-p[append source path to dest]' \
+;;
-'(-p)--parents[append source path to dest]' \
+*,)
-'*:files:_files'
+cmd=${cmd%,}
-else
+_hg_cmd_list+=($cmd)
-_arguments '*:destination:_files'
+integer i=2
-fi
+while (( i <= $#hline ))
-;;
+do
+cmdalias=${hline[$i]%(:|,)}
-(diff)
+_hg_cmd_list+=($cmdalias)
-_arguments $includeExclude \
+_hg_alias_list+=($cmdalias $cmd)
-'*-r[revision]:revision:->tags' \
+(( i++ ))
-'*--rev[revision]:revision:->tags' \
+done
-'(--text)-a[treat all files as text]' \
+;;
-'(-a)--text[treat all files as text]' \
+esac
-'*:file:_files'
+done
-;;
+}
-(status|st)
+_hg_commands() {
-_arguments $includeExclude \
+(( $#_hg_cmd_list )) || _hg_get_commands
-'(--no-status)-n[hide status prefix]' \
+_describe -t hg-commands 'Mercurial command' _hg_cmd_list
-'(-n)--no-status[hide status prefix]' \
+}
-'(--print0)-0[end filenames with NUL, for use with xargs]' \
-'(-0)--print0[end filenames with NUL, for use with xargs]' \
+_hg_tags() {
-'(--modified)-m[show only modified files]' \
+typeset -a tags
-'(-m)--modified[show only modified files]' \
+local tag rev
-'(--added)-a[show only added files]' \
-'(-a)--added[show only added files]' \
+_hg_cmd tags 2> /dev/null | while read tag rev
-'(--removed)-r[show only removed files]' \
+do
-'(-r)--removed[show only removed files]' \
+tags+=($tag)
-'(--unknown)-u[show only unknown files]' \
+done
-'(-u)--unknown[show only unknown files]' \
+(( $#tags )) && _describe -t hg-tags 'tags' tags
-'*:search pattern, then files:_files'
+}
-;;
+_hg_status() {
-(revert)
+status_files=(${(ps:\0:)"$(_hg_cmd status -0n$1 .)"})
-addedFiles=(${(ps:\0:)"$(_hg_cmd status -0amrn .)"})
+}
-_arguments \
-'(--rev)-r[revision to revert to]:revision:->tags' \
+_hg_unknown() {
-'(-r)--rev[revision to revert to]:revision:->tags' \
+typeset -a status_files
-'(--nonrecursive)-n[do not recurse into subdirectories]' \
+_hg_status u
-'(-n)--nonrecursive[do not recurse into subdirectories]' \
+(( $#status_files )) && _describe -t hg-unknown-files 'unknown files' status_files
-'*:file:->modified'
+}
-_wanted files expl 'mofified files' compadd -a addedFiles
-;;
+_hg_missing() {
+typeset -a status_files
-(commit|ci)
+_hg_status d
-addedFiles=(${(ps:\0:)"$(_hg_cmd status -0amrn .)"})
+(( $#status_files )) && _describe -t hg-missing-files 'missing files' status_files
-_arguments $includeExclude \
+}
-'(--addremove)-A[run addremove during commit]' \
-'(-A)--addremove[run addremove during commit]' \
+_hg_addremove() {
-'(--message)-m[use <txt> as commit message]:string:' \
+_alternative "unknown files:unknown files:_hg_unknown" \
-'(-m)--message[use <txt> as commit message]:string:' \
+"missing files:missing files:_hg_missing"
-'(--logfile)-l[read commit message from <file>]:.log file:_file -g \*.txt' \
+}
-'(-l)--logfile[read commit message from <file>]:.log file:_file -g \*.txt' \
-'(--date)-d[record datecode as commit date]:date code:' \
+_hg_paths() {
-'(-d)--date[record datecode as commit date]:date code:' \
+typeset -a paths pnames
-'(--user)-u[record user as commiter]:user:' \
+_hg_cmd paths 2> /dev/null | while read -A pnames
-'(-u)--user[record user as commiter]:user:' \
+do
-'*:file:->modified'
+paths+=($pnames[1])
-_wanted files expl 'mofified files' compadd -a addedFiles
+done
-;;
+(( $#paths )) && _describe -t hg-paths 'repository aliases' paths
+}
-(cat)
-_arguments $includeExclude \
+_hg_remote() {
-'(--output)-o[print output to file with formatted name]:filespec:' \
+_alternative 'repository aliases:repository aliases:_hg_paths' \
-'(-o)--output[print output to file with formatted name]:filespec:' \
+'directory:directory:_files -/'
-'(--rev)-r[revision]:revision:->tags' \
+}
-'(-r)--rev[revision]:revision:->tags' \
-'*:file:_files'
+_hg_qseries() {
-;;
+typeset -a patches
+patches=($(_hg_cmd qseries))
-(annotate)
+(( $#patches )) && _describe -t hg-patches 'patches' patches
-_arguments $includeExclude \
+}
-'(--rev)-r[annotate the specified revision]:revision:->tags' \
-'(-r)--rev[annotate the specified revision]:revision:->tags' \
+_hg_qapplied() {
-'(--text)-a[treat all files as text]' \
+typeset -a patches
-'(-a)--text[treat all files as text]' \
+patches=($(_hg_cmd qapplied))
-'(--user)-u[list the author]' \
+(( $#patches )) && _describe -t hg-applied-patches 'applied patches' patches
-'(-u)--user[list the author]' \
+}
-'(--changeset)-c[list the changeset]' \
-'(-c)--changeset[list the changeset]' \
+_hg_qunapplied() {
-'(--number)-n[list the revision number (default)]' \
+typeset -a patches
-'(-n)--number[list the revision number (default)]' \
+patches=($(_hg_cmd qunapplied))
-'*:files:_files'
+(( $#patches )) && _describe -t hg-unapplied-patches 'unapplied patches' patches
-;;
+}
-(grep)
+# Common options
-_arguments $includeExclude \
+_hg_global_opts=(
-'*-r[search in given revision range]:revision:->tags' \
+'(--repository)-R+[repository root directory]:repository:_files -/'
-'*--rev[search in given revision range]:revision:->tags' \
+'(-R)--repository[repository root directory]:repository:_files -/'
-'--all[print all revisions with matches]' \
+'--cwd[change working directory]:new working directory:_files -/'
-'(-print0)-0[end filenames with NUL, for use with xargs]' \
+'(--noninteractive)-y[do not prompt, assume yes for any required answers]'
-'(-0)--print0[end filenames with NUL, for use with xargs]' \
+'(-y)--noninteractive[do not prompt, assume yes for any required answers]'
-'(--ignore-case)-i[ignore case when matching]' \
+'(--verbose)-v[enable additional output]'
-'(-i)--ignore-case[ignore case when matching]' \
+'(-v)--verbose[enable additional output]'
-'(--files-with-matches)-l[print names of files and revs that match]' \
+'(--quiet)-q[suppress output]'
-'(-l)--files-with-matches[print names of files and revs that match]' \
+'(-q)--quiet[suppress output]'
-'(--line-number)-n[print matching line numbers]' \
+'(--help)-h[display help and exit]'
-'(-n)--line-number[print matching line numbers]' \
+'(-h)--help[display help and exit]'
-'(--user)-u[print user who committed change]' \
+'--debug[debug mode]'
-'(-u)--user[print user who committed change]' \
+'--debugger[start debugger]'
-'*:search pattern:'
+'--traceback[print traceback on exception]'
-;;
+'--time[time how long the command takes]'
+'--profile[profile]'
-(locate)
+'--version[output version information and exit]'
-_arguments $includeExclude \
+)
-'(--rev)-r[search repository as it stood at revision]:revision:->tags' \
-'(-r)--rev[search repository as it stood at revision]:revision:->tags' \
+_hg_pat_opts=(
-'(--print0)-0[end filenames with NUL, for use with xargs]' \
+'*-I+[include names matching the given patterns]:dir:_files -W $(_hg_cmd root) -/'
-'(-0)--print0[end filenames with NUL, for use with xargs]' \
+'*--include[include names matching the given patterns]:dir:_files -W $(_hg_cmd root) -/'
-'(--fullpath)-f[print complete paths]' \
+'*-X+[exclude names matching the given patterns]:dir:_files -W $(_hg_cmd root) -/'
-'(-f)--fullpath[print complete paths]' \
+'*--exclude[exclude names matching the given patterns]:dir:_files -W $(_hg_cmd root) -/')
-'*:search pattern:'
-;;
+_hg_diff_opts=(
+'(--text)-a[treat all files as text]'
-(log|history)
+'(-a)--text[treat all files as text]'
-_arguments $includeExclude $styleOpts \
+'(--git)-g[use git extended diff format]'
-'*-r[show the specified revision or range]:revision:->tags' \
+'(-g)--git[use git extended diff format]'
-'*--rev[show the specified revision or range]:revision:->tags' \
+"--nodates[don't include dates in diff headers]")
-'(--no-merges -M --only-merges)-m[show only merge revisions]' \
-'(--no-merges -M -m)--only-merges[show only merge revisions]' \
+_hg_dryrun_opts=(
-'(--only-merges -m --no-merges)-M[do not show merge revisions]' \
+'(--dry-run)-n[do not perform actions, just print output]'
-'(--only-merges -m -M)--no-merges[do not show merge revisions]' \
+'(-n)--dry-run[do not perform actions, just print output]')
-'(--keyword)-k[search for a keyword]:keyword:' \
-'(-k)--keyword[search for a keyword]:keyword:' \
+_hg_style_opts=(
-'(--branch)-b[show branches]' \
+'--style[display using template map file]:'
-'(-b)--branch[show branches]' \
+'--template[display with template]:')
-'(--patch)-p[show patch]' \
-'(-p)--patch[show patch]' \
+_hg_commit_opts=(
-'*:file:_files'
+'(-m --message -l --logfile --edit)-e[edit commit message]'
-;;
+'(-m --message -l --logfile -e)--edit[edit commit message]'
+'(-e --edit -l --logfile --message)-m+[use <text> as commit message]:message:'
-(update|checkout|co)
+'(-e --edit -l --logfile -m)--message[use <text> as commit message]:message:'
-_arguments \
+'(-e --edit -m --message --logfile)-l+[read the commit message from <file>]:log file:_files'
-'(--branch)-b[checkout the head of a specific branch]' \
+'(-e --edit -m --message -l)--logfile[read the commit message from <file>]:log file:_files')
-'(-b)--branch[checkout the head of a specific branch]' \
-'(-C --clean --merge)-m[allow merging of branches]' \
+_hg_remote_opts=(
-'(-C --clean -m)--merge[allow merging of branches]' \
+'(--ssh)-e+[specify ssh command to use]:'
-'(-m --merge --clean)-C[overwrite locally modified files]' \
+'(-e)--ssh[specify ssh command to use]:'
-'(-m --merge -C)--clean[overwrite locally modified files]' \
+'--remotecmd[specify hg command to run on the remote side]:')
-'*:revision or tag:->tags'
-;;
+_hg_cmd() {
+_call_program hg hg "$_hg_cmd_globals[@]" "$@"
-(tag)
+}
-_arguments \
-'(--local)-l[make the tag local]' \
+_hg_cmd_add() {
-'(-l)--local[make the tag local]' \
+_arguments -s -w : $_hg_global_opts $_hg_pat_opts $_hg_dryrun_opts \
-'(--message)-m[message for tag commit log entry]:string:' \
+'*:unknown files:_hg_unknown'
-'(-m)--message[message for tag commit log entry]:string:' \
+}
-'(--date)-d[record datecode as commit date]:date code:' \
-'(-d)--date[record datecode as commit date]:date code:' \
+_hg_cmd_addremove() {
-'(--user)-u[record user as commiter]:user:' \
+_arguments -s -w : $_hg_global_opts $_hg_pat_opts $_hg_dryrun_opts \
-'(-u)--user[record user as commiter]:user:' \
+'(--similarity)-s[guess renamed files by similarity (0<=s<=100)]:' \
-'*:name, then revision:->tags'
+'(-s)--similarity[guess renamed files by similarity (0<=s<=100)]:' \
-;;
+'*:unknown or missing files:_hg_addremove'
+}
-(clone)
-if (( CURRENT == 2 )); then
+_hg_cmd_annotate() {
-repos=( $(_hg_cmd paths | sed -e 's/^.*= //') )
+_arguments -s -w : $_hg_global_opts $_hg_pat_opts \
-_arguments \
+'(--rev)-r+[annotate the specified revision]:revision:_hg_tags' \
-'(--no-update)-U[do not update the new working directory]' \
+'(-r)--rev[annotate the specified revision]:revision:_hg_tags' \
-'(-U)--no-update[do not update the new working directory]' \
+'(--follow)-f[follow file copies and renames]' \
-'(--ssh)-e[specify ssh command to use]:string:' \
+'(-f)--follow[follow file copies and renames]' \
-'(-e)--ssh[specify ssh command to use]:string:' \
+'(--text)-a[treat all files as text]' \
-'--pull[use pull protocol to copy metadata]' \
+'(-a)--text[treat all files as text]' \
-'--remotecmd[specify hg command to run on the remote side]:remote hg:' \
+'(--user)-u[list the author]' \
-'*:local repo:_files -/'
+'(-u)--user[list the author]' \
-_wanted source expl 'source repository' compadd -a repos
+'(--date)-d[list the date]' \
-elif (( CURRENT == 3 )); then
+'(-d)--date[list the date]' \
-_arguments '*:dest repo:_files -/'
+'(--number)-n[list the revision number (default)]' \
-fi
+'(-n)--number[list the revision number (default)]' \
-;;
+'(--changeset)-c[list the changeset]' \
+'(-c)--changeset[list the changeset]' \
-(rawcommit)
+'*:files:_files -W $(_hg_cmd root)'
-_arguments \
+}
-'(--parent)-p[parent revision]:revision:->tags' \
-'(-p)--parent[parent revision]:revision:->tags' \
+_hg_cmd_archive() {
-'(--date)-d[record datecode as commit date]:date code:' \
+_arguments -s -w : $_hg_global_opts $_hg_pat_opts \
-'(-d)--date[record datecode as commit date]:date code:' \
+'--no-decode[do not pass files through decoders]' \
-'(--user)-u[record user as commiter]:user:' \
+'(--prefix)-p+[directory prefix for files in archive]:' \
-'(-u)--user[record user as commiter]:user:' \
+'(-p)--prefix[directory prefix for files in archive]:' \
-'(--message)-m[use <txt> as commit message]:string:' \
+'(--rev)-r+[revision to distribute]:revision:_hg_tags' \
-'(-m)--message[use <txt> as commit message]:string:' \
+'(-r)--rev[revision to distribute]:revision:_hg_tags' \
-'(--logfile)-l[read commit message from <file>]:.log file:_file -g \*.txt' \
+'(--type)-t+[type of distribution to create]:archive type:(files tar tbz2 tgz uzip zip)' \
-'(-l)--logfile[read commit message from <file>]:.log file:_file -g \*.txt' \
+'(-t)--type[type of distribution to create]:archive type:(files tar tbz2 tgz uzip zip)' \
-'(--files)-F[file list]:file list:_files' \
+'*:destination:_files'
-'(-F)--files[file list]:file list:_files' \
+}
-'*:files to commit:_files'
-;;
+_hg_cmd_bundle() {
+_arguments -s -w : $_hg_global_opts $_hg_remote_opts \
-(bundle)
+'(--force)-f[run even when remote repository is unrelated]' \
-if (( CURRENT == 2 )); then
+'(-f)--force[run even when remote repository is unrelated]' \
-_arguments '*:changegroup file:_files -g \*.hg'
+'(2)*--base[a base changeset to specify instead of a destination]:revision:_hg_tags' \
-elif (( CURRENT == 3 )); then
+':output file:_files' \
-_arguments '*:other repo:_files -/'
+':destination repository:_files -/'
-fi
+}
-;;
+_hg_cmd_cat() {
-(unbundle)
+_arguments -s -w : $_hg_global_opts $_hg_pat_opts \
-_arguments '*:changegroup .hg file:_files -g \*.hg'
+'(--output)-o+[print output to file with formatted name]:filespec:' \
-;;
+'(-o)--output[print output to file with formatted name]:filespec:' \
+'(--rev)-r+[revision]:revision:_hg_tags' \
-(incoming)
+'(-r)--rev[revision]:revision:_hg_tags' \
-_arguments $styleOpts \
+'*:file:_files -W $(_hg_cmd root)'
-'(--patch)-p[show patch]' \
+}
-'(-p)--patch[show patch]' \
-'(--no-merges)-M[do not show merge revisions]' \
+_hg_cmd_clone() {
-'(-M)--no-merges[do not show merge revisions]' \
+_arguments -s -w : $_hg_global_opts $_hg_remote_opts \
-'(--newest-first)-n[show newest record first]' \
+'(--noupdate)-U[do not update the new working directory]' \
-'(-n)--newest-first[show newest record first]' \
+'(-U)--noupdate[do not update the new working directory]' \
-'*:mercurial repository:_files -/'
+'(--rev)-r+[a changeset you would like to have after cloning]:' \
-;;
+'(-r)--rev[a changeset you would like to have after cloning]:' \
+'--uncompressed[use uncompressed transfer (fast over LAN)]' \
-(import|patch)
+':source repository:_hg_remote' \
-_arguments \
+':destination:_files -/'
-'(--strip)-p[directory strip option for patch (default: 1)]:count:' \
+}
-'(-p)--strip[directory strip option for patch (default: 1)]:count:' \
-'(--force)-f[skip check for outstanding uncommitted changes]' \
+_hg_cmd_commit() {
-'(-f)--force[skip check for outstanding uncommitted changes]' \
+_arguments -s -w : $_hg_global_opts $_hg_pat_opts \
-'(--base)-b[base directory to read patches from]:file:_files -W $(_hg_cmd root) -/' \
+'(--addremove)-A[mark new/missing files as added/removed before committing]'
-'(-b)--base[base directory to read patches from]:file:_files -W $(_hg_cmd root) -/' \
+'(-A)--addremove[mark new/missing files as added/removed before committing]'
-'*:patch file:_files'
+'(--message)-m+[use <text> as commit message]:text:' \
-;;
+'(-m)--message[use <text> as commit message]:text:' \
+'(--logfile)-l+[read commit message from <file>]:.log file:_file -g \*.txt' \
-(pull)
+'(-l)--logfile[read commit message from <file>]:.log file:_file -g \*.txt' \
-repos=( $(_hg_cmd paths | sed -e 's/^.*= //') )
+'(--date)-d+[record datecode as commit date]:date code:' \
-_arguments \
+'(-d)--date[record datecode as commit date]:date code:' \
-'(--update)-u[update working directory to tip after pull]' \
+'(--user)-u+[record user as commiter]:user:' \
-'(-u)--update[update working directory to tip after pull]' \
+'(-u)--user[record user as commiter]:user:' \
-'(--ssh)-e[specify ssh command to use]:ssh command:' \
+'*:file:_files -W $(_hg_cmd root)'
-'(-e)--ssh[specify ssh command to use]:ssh command:' \
+}
-'--remotecmd[specify hg command to run on the remote side]:remote hg:' \
-'*:local repo:_files -/'
+_hg_cmd_copy() {
-_wanted source expl 'source repository' compadd -a repos
+_arguments -s -w : $_hg_global_opts $_hg_pat_opts $_hg_dryrun_opts \
-;;
+'(--after)-A[record a copy that has already occurred]' \
+'(-A)--after[record a copy that has already occurred]' \
-(outgoing)
+'(--force)-f[forcibly copy over an existing managed file]' \
-_arguments $styleOpts \
+'(-f)--force[forcibly copy over an existing managed file]' \
-'(--patch)-p[show patch]' \
+'*:file:_files -W $(_hg_cmd root)'
-'(-p)--patch[show patch]' \
+}
-'(--no-merges)-M[do not show merge revisions]' \
-'(-M)--no-merges[do not show merge revisions]' \
+_hg_cmd_diff() {
-'(--newest-first)-n[show newest record first]' \
+_arguments -s -w : $_hg_global_opts $_hg_pat_opts $_hg_diff_opts \
-'(-n)--newest-first[show newest record first]' \
+'*'{-r,--rev}'+[revision]:revision:_hg_tags ' \
-'*:local repo:_files -/'
+'(--show-function)-p[show which function each change is in]' \
-_wanted source expl 'source repository' compadd -a repos
+'(-p)--show-function[show which function each change is in]' \
-;;
+'(--ignore-all-space)-w[ignore white space when comparing lines]' \
+'(-w)--ignore-all-space[ignore white space when comparing lines]' \
-(export)
+'(--ignore-space-change)-b[ignore changes in the amount of white space]' \
-_arguments \
+'(-b)--ignore-space-change[ignore changes in the amount of white space]' \
-'(--outout)-o[print output to file with formatted name]:filespec:' \
+'(--ignore-blank-lines)-B[ignore changes whose lines are all blank]' \
-'(-o)--output[print output to file with formatted name]:filespec:' \
+'(-B)--ignore-blank-lines[ignore changes whose lines are all blank]' \
-'(--text)-a[treat all files as text]' \
+'*:file:_files -W $(_hg_cmd root)'
-'(-a)--text[treat all files as text]' \
+}
-'*:revision:->revs'
-_wanted revs expl 'revision or tag' compadd -a tags
+_hg_cmd_export() {
-;;
+_arguments -s -w : $_hg_global_opts $_hg_diff_opts \
+'(--outout)-o+[print output to file with formatted name]:filespec:' \
-(push)
+'(-o)--output[print output to file with formatted name]:filespec:' \
-repos=( $(_hg_cmd paths | sed -e 's/^.*= //') )
+'--switch-parent[diff against the second parent]' \
-_arguments \
+'*:revision:_hg_tags'
-'(--force)-f[force push]' \
+}
-'(-f)--force[force push]' \
-'(--ssh)-e[specify ssh command to use]:ssh command:' \
+_hg_cmd_grep() {
-'(-e)--ssh[specify ssh command to use]:ssh command:' \
+_arguments -s -w : $_hg_global_opts $_hg_pat_opts \
-'--remotecmd[specify hg command to run on the remote side]:remote hg:' \
+'(-print0)-0[end filenames with NUL]' \
-'*:local repo:_files -/'
+'(-0)--print0[end filenames with NUL]' \
-_wanted source expl 'source repository' compadd -a repos
+'--all[print all revisions with matches]' \
-;;
+'(--follow)-f[follow changeset or file history]' \
+'(-f)--follow[follow changeset or file history]' \
-(serve)
+'(--ignore-case)-i[ignore case when matching]' \
-_arguments \
+'(-i)--ignore-case[ignore case when matching]' \
-'(--accesslog)-A[name of access log file]:log file:_files' \
+'(--files-with-matches)-l[print only filenames and revs that match]' \
-'(-A)--accesslog[name of access log file]:log file:_files' \
+'(-l)--files-with-matches[print only filenames and revs that match]' \
-'(--errorlog)-E[name of error log file]:log file:_files' \
+'(--line-number)-n[print matching line numbers]' \
-'(-E)--errorlog[name of error log file]:log file:_files' \
+'(-n)--line-number[print matching line numbers]' \
-'(--port)-p[listen port]:listen port:' \
+'*-r+[search in given revision range]:revision:_hg_tags' \
-'(-p)--port[listen port]:listen port:' \
+'*--rev[search in given revision range]:revision:_hg_tags' \
-'(--address)-a[interface address]:interface address:' \
+'(--user)-u[print user who committed change]' \
-'(-a)--address[interface address]:interface address:' \
+'(-u)--user[print user who committed change]' \
-'(--name)-n[name to show in web pages]:repository name:' \
+'*:search pattern:_files -W $(_hg_cmd root)'
-'(-n)--name[name to show in web pages]:repository name:' \
+}
-'(--templates)-t[web template directory]:template dir:_files -/' \
-'(-t)--templates[web template directory]:template dir:_files -/' \
+_hg_cmd_heads() {
-'--style[web template style]:style' \
+_arguments -s -w : $_hg_global_opts $_hg_style_opts \
-'--stdio[for remote clients]' \
+'(--rev)-r+[show only heads which are descendants of rev]:revision:_hg_tags' \
-'(--ipv6)-6[use IPv6 in addition to IPv4]' \
+'(-r)--rev[show only heads which are descendants of rev]:revision:_hg_tags'
-'(-6)--ipv6[use IPv6 in addition to IPv4]'
+}
-;;
+_hg_cmd_help() {
-(help)
+_arguments -s -w : $_hg_global_opts \
-_wanted commands expl 'hg command' compadd -a _hg_commands
+'*:mercurial command:_hg_commands'
-;;
+}
-(heads)
+_hg_cmd_import() {
-_arguments $styleOpts \
+_arguments -s -w : $_hg_global_opts \
-'(--branches)-b[find branch info]' \
+'(--strip)-p+[directory strip option for patch (default: 1)]:count:' \
-'(-b)--branches[find branch info]'
+'(-p)--strip[directory strip option for patch (default: 1)]:count:' \
-;;
+'(--message)-m+[use <text> as commit message]:text:' \
+'(-m)--message[use <text> as commit message]:text:' \
-(paths)
+'(--force)-f[skip check for outstanding uncommitted changes]' \
-_arguments '*:symbolic name:(default default-push)'
+'(-f)--force[skip check for outstanding uncommitted changes]' \
-;;
+'*:patch:_files'
+}
-(init)
-_arguments '*:new repo directory:_files -/'
+_hg_cmd_incoming() {
-;;
+_arguments -s -w : $_hg_global_opts $_hg_remote_opts $_hg_style_opts \
+'(--no-merges)-M[do not show merge revisions]' \
-(manifest)
+'(-M)--no-merges[do not show merge revisions]' \
-_arguments '*:revision:->tags'
+'(--force)-f[run even when the remote repository is unrelated]' \
-;;
+'(-f)--force[run even when the remote repository is unrelated]' \
+'(--patch)-p[show patch]' \
-(par*)
+'(-p)--patch[show patch]' \
-_arguments $styleOpts \
+'(--rev)-r+[a specific revision up to which you would like to pull]' \
-'(--rev 1)-r[show parents of the specified rev]:revision:->tags' \
+'(-r)--rev[a specific revision up to which you would like to pull]' \
-'(-r 1)--rev[show parents of the specified rev]:revision:->tags' \
+'(--newest-first)-n[show newest record first]' \
-	'::revision:->tags'
+'(-n)--newest-first[show newest record first]' \
-;;
+'--bundle[file to store the bundles into]:bundle file:_files' \
+':source:_hg_remote'
-(identify|recover|root|undo|verify|version|ct|tags)
+}
-# no arguments for these commands
-;;
+_hg_cmd_init() {
+_arguments -s -w : $_hg_global_opts $_hg_remote_opts \
-# HGK
+':dir:_files -/'
-(vi*)
+}
-_arguments \
-'(--limit)-l[limit number of changes displayed]:' \
+_hg_cmd_locate() {
-'(-l)--limit[limit number of changes displayed]:' \
+_arguments -s -w : $_hg_global_opts $_hg_pat_opts \
-'::revision range:->tags'
+'(--rev)-r+[search repository as it stood at revision]:revision:_hg_tags' \
-;;
+'(-r)--rev[search repository as it stood at revision]:revision:_hg_tags' \
+'(--print0)-0[end filenames with NUL, for use with xargs]' \
-# MQ commands
+'(-0)--print0[end filenames with NUL, for use with xargs]' \
-(qdel*|qrm|qrem*)
+'(--fullpath)-f[print complete paths]' \
-_arguments \
+'(-f)--fullpath[print complete paths]' \
-{-k,--keep}'[keep patch file]' \
+'*:search pattern:_files -W $(_hg_cmd root)'
-{-r,--rev}'[revision]:applied patch:->qapplied' \
+}
-'*:unapplied patches:->qunapplied'
-;;
+_hg_cmd_log() {
+_arguments -s -w : $_hg_global_opts $_hg_pat_opts $_hg_style_opts \
-(qnew)
+'(--follow --follow-first)-f[follow changeset or history]' \
-_arguments $commitMessage \
+'(-f --follow-first)--follow[follow changeset or history]' \
-{-f,--force}'[import uncommitted changes into patch]' \
+'(-f --follow)--follow-first[only follow the first parent of merge changesets]' \
-':patch name:'
+'(--copies)-C[show copied files]' \
-;;
+'(-C)--copies[show copied files]' \
+'(--keyword)-k+[search for a keyword]:' \
-(qpo*)
+'(-k)--keyword[search for a keyword]:' \
-_arguments \
+'(--limit)-l+[limit number of changes displayed]:' \
-(1){-a,--all}'[pop all patches]' \
+'(-l)--limit[limit number of changes displayed]:' \
-{-f,--force}'[forget any local changes]' \
+'*'{-r,--rev}'[show the specified revision or range]:revision:_hg_tags' \
-':applied patch:->qapplied'
+'(--no-merges)-M[do not show merges]' \
-;;
+'(-M)--no-merges[do not show merges]' \
+'(--only-merges)-m[show only merges]' \
-(qpu*)
+'(-m)--only-merges[show only merges]' \
-_arguments \
+'(--patch)-p[show patch]' \
-(1){-a,--all}'[apply all patches]' \
+'(-p)--patch[show patch]' \
-{-f,--force}'[apply if the patch has rejects]' \
+'(--prune)-P+[do not display revision or any of its ancestors]:revision:_hg_tags' \
-':unapplied patch:->qunapplied'
+'(-P)--prune[do not display revision or any of its ancestors]:revision:_hg_tags' \
-;;
+'*:files:_files -W $(_hg_cmd root)'
-(qref*)
+}
-_arguments $commitMessage $includeExclude \
-{-g,--git}'[use git extended diff format]' \
+_hg_cmd_manifest() {
-{-s,--short}'[short refresh]'
+_arguments -s -w : $_hg_global_opts \
-;;
+':revision:_hg_tags'
+}
-(*)
-_message "unknown hg command completion: $service"
+_hg_cmd_outgoing() {
-;;
+_arguments -s -w : $_hg_global_opts $_hg_remote_opts $_hg_style_opts \
-esac
+'(--no-merges)-M[do not show merge revisions]' \
+'(-M)--no-merges[do not show merge revisions]' \
-_hg_state
+'(--force)-f[run even when the remote repository is unrelated]' \
+'(-f)--force[run even when the remote repository is unrelated]' \
+'(--patch)-p[show patch]' \
+'(-p)--patch[show patch]' \
+'(--rev)-r+[a specific revision you would like to push]' \
+'(-r)--rev[a specific revision you would like to push]' \
+'(--newest-first)-n[show newest record first]' \
+'(-n)--newest-first[show newest record first]' \
+':destination:_hg_remote'
+}
+_hg_cmd_parents() {
+_arguments -s -w : $_hg_global_opts $_hg_style_opts \
+'(--rev)-r[show parents of the specified rev]:revision:_hg_tags' \
+'(-r)--rev[show parents of the specified rev]:revision:_hg_tags' \
+':revision:_hg_tags'
+}
+_hg_cmd_paths() {
+_arguments -s -w : $_hg_global_opts \
+':path:_hg_paths'
+}
+_hg_cmd_pull() {
+_arguments -s -w : $_hg_global_opts $_hg_remote_opts \
+'(--force)-f[run even when the remote repository is unrelated]' \
+'(-f)--force[run even when the remote repository is unrelated]' \
+'(--update)-u[update to new tip if changesets were pulled]' \
+'(-u)--update[update to new tip if changesets were pulled]' \
+':source:_hg_remote'
+}
+_hg_cmd_push() {
+_arguments -s -w : $_hg_global_opts $_hg_remote_opts \
+'(--force)-f[force push]' \
+'(-f)--force[force push]' \
+'(--rev)-r+[a specific revision you would like to push]' \
+'(-r)--rev[a specific revision you would like to push]' \
+':destination:_hg_remote'
+}
+_hg_cmd_remove() {
+_arguments -s -w : $_hg_global_opts $_hg_pat_opts \
+'(--after)-A[record remove that has already occurred]' \
+'(-A)--after[record remove that has already occurred]' \
+'(--force)-f[remove file even if modified]' \
+'(-f)--force[remove file even if modified]' \
+'*:file:_files -W $(_hg_cmd root)'
+}
+_hg_cmd_rename() {
+_arguments -s -w : $_hg_global_opts $_hg_pat_opts $_hg_dryrun_opts \
+'(--after)-A[record a rename that has already occurred]' \
+'(-A)--after[record a rename that has already occurred]' \
+'(--force)-f[forcibly copy over an existing managed file]' \
+'(-f)--force[forcibly copy over an existing managed file]' \
+'*:file:_files -W $(_hg_cmd root)'
+}
+_hg_cmd_revert() {
+_arguments -s -w : $_hg_global_opts $_hg_pat_opts $_hg_dryrun_opts \
+'(--all :)-a[revert all changes when no arguments given]' \
+'(-a :)--all[revert all changes when no arguments given]' \
+'(--rev)-r+[revision to revert to]:revision:_hg_tags' \
+'(-r)--rev[revision to revert to]:revision:_hg_tags' \
+'--no-backup[do not save backup copies of files]' \
+'*:file:_files -W $(_hg_cmd root)'
+}
+_hg_cmd_serve() {
+_arguments -s -w : $_hg_global_opts \
+'(--accesslog)-A+[name of access log file]:log file:_files' \
+'(-A)--accesslog[name of access log file]:log file:_files' \
+'(--errorlog)-E+[name of error log file]:log file:_files' \
+'(-E)--errorlog[name of error log file]:log file:_files' \
+'(--daemon)-d[run server in background]' \
+'(-d)--daemon[run server in background]' \
+'(--port)-p+[listen port]:listen port:' \
+'(-p)--port[listen port]:listen port:' \
+'(--address)-a+[interface address]:interface address:' \
+'(-a)--address[interface address]:interface address:' \
+'(--name)-n+[name to show in web pages]:repository name:' \
+'(-n)--name[name to show in web pages]:repository name:' \
+'(--templates)-t[web template directory]:template dir:_files -/' \
+'(-t)--templates[web template directory]:template dir:_files -/' \
+'--style[web template style]:style' \
+'--stdio[for remote clients]' \
+'(--ipv6)-6[use IPv6 in addition to IPv4]' \
+'(-6)--ipv6[use IPv6 in addition to IPv4]'
+}
+_hg_cmd_status() {
+_arguments -s -w : $_hg_global_opts $_hg_pat_opts \
+'(--all)-A[show status of all files]' \
+'(-A)--all[show status of all files]' \
+'(--modified)-m[show only modified files]' \
+'(-m)--modified[show only modified files]' \
+'(--added)-a[show only added files]' \
+'(-a)--added[show only added files]' \
+'(--removed)-r[show only removed files]' \
+'(-r)--removed[show only removed files]' \
+'(--deleted)-d[show only deleted (but tracked) files]' \
+'(-d)--deleted[show only deleted (but tracked) files]' \
+'(--clean)-c[show only files without changes]' \
+'(-c)--clean[show only files without changes]' \
+'(--unknown)-u[show only unknown files]' \
+'(-u)--unknown[show only unknown files]' \
+'(--ignored)-i[show ignored files]' \
+'(-i)--ignored[show ignored files]' \
+'(--no-status)-n[hide status prefix]' \
+'(-n)--no-status[hide status prefix]' \
+'(--copies)-C[show source of copied files]' \
+'(-C)--copies[show source of copied files]' \
+'(--print0)-0[end filenames with NUL, for use with xargs]' \
+'(-0)--print0[end filenames with NUL, for use with xargs]' \
+'--rev[show difference from revision]:revision:_hg_tags' \
+'*:files:_files'
+}
+_hg_cmd_tag() {
+_arguments -s -w : $_hg_global_opts \
+'(--local)-l[make the tag local]' \
+'(-l)--local[make the tag local]' \
+'(--message)-m+[message for tag commit log entry]:message:' \
+'(-m)--message[message for tag commit log entry]:message:' \
+'(--date)-d+[record datecode as commit date]:date code:' \
+'(-d)--date[record datecode as commit date]:date code:' \
+'(--user)-u+[record user as commiter]:user:' \
+'(-u)--user[record user as commiter]:user:' \
+'(--rev)-r+[revision to tag]:revision:_hg_tags' \
+'(-r)--rev[revision to tag]:revision:_hg_tags' \
+':tag name:'
+}
+_hg_cmd_tip() {
+_arguments -s -w : $_hg_global_opts $_hg_style_opts \
+'(--patch)-p[show patch]' \
+'(-p)--patch[show patch]'
+}
+_hg_cmd_unbundle() {
+_arguments -s -w : $_hg_global_opts \
+'(--update)-u[update to new tip if changesets were unbundled]' \
+'(-u)--update[update to new tip if changesets were unbundled]' \
+':files:_files'
+}
+_hg_cmd_update() {
+_arguments -s -w : $_hg_global_opts \
+'(--clean)-C[overwrite locally modified files]' \
+'(-C)--clean[overwrite locally modified files]' \
+'(--force)-f[force a merge with outstanding changes]' \
+'(-f)--force[force a merge with outstanding changes]' \
+':revision:_hg_tags'
+}
+# HGK
+_hg_cmd_view() {
+_arguments -s -w : $_hg_global_opts \
+'(--limit)-l+[limit number of changes displayed]:' \
+'(-l)--limit[limit number of changes displayed]:' \
+':revision range:_hg_tags'
+}
+# MQ
+_hg_cmd_qdelete() {
+_arguments -s -w : $_hg_global_opts \
+'(--keep)-k[keep patch file]' \
+'(-k)--keep[keep patch file]' \
+'*-r+[stop managing a revision]:applied patch:_hg_qapplied' \
+'*--revision[stop managing a revision]:applied patch:_hg_qapplied' \
+'*:patch:_hg_qunapplied'
+}
+_hg_cmd_qheader() {
+_arguments -s -w : $_hg_global_opts \
+':patch:_hg_qseries'
+}
+_hg_cmd_qnew() {
+_arguments -s -w : $_hg_global_opts $_hg_commit_opts \
+'(--force)-f[import uncommitted changes into patch]' \
+'(-f)--force[import uncommitted changes into patch]' \
+':patch:'
+}
+_hg_cmd_qpop() {
+_arguments -s -w : $_hg_global_opts \
+'(--all :)-a[pop all patches]' \
+'(-a :)--all[pop all patches]' \
+'(--name)-n+[queue name to pop]:' \
+'(-n)--name[queue name to pop]:' \
+'(--force)-f[forget any local changes]' \
+'(-f)--force[forget any local changes]' \
+':patch:_hg_qapplied'
+}
+_hg_cmd_qpush() {
+_arguments -s -w : $_hg_global_opts \
+'(--all :)-a[apply all patches]' \
+'(-a :)--all[apply all patches]' \
+'(--list)-l[list patch name in commit text]' \
+'(-l)--list[list patch name in commit text]' \
+'(--merge)-m+[merge from another queue]:' \
+'(-m)--merge[merge from another queue]:' \
+'(--name)-n+[merge queue name]:' \
+'(-n)--name[merge queue name]:' \
+'(--force)-f[apply if the patch has rejects]' \
+'(-f)--force[apply if the patch has rejects]' \
+':patch:_hg_qunapplied'
+}
+_hg_cmd_qrefresh() {
+_arguments -s -w : $_hg_global_opts $_hg_pat_opts $_hg_commit_opts \
+'(--git)-g[use git extended diff format]' \
+'(-g)--git[use git extended diff format]' \
+'(--short)-s[short refresh]' \
+'(-s)--short[short refresh]' \
+'*:files:_files -W $(_hg_cmd root)'
+}
+_hg_cmd_strip() {
+_arguments -s -w : $_hg_global_opts \
+'(--force)-f[force multi-head removal]' \
+'(-f)--force[force multi-head removal]' \
+'(--backup)-b[bundle unrelated changesets]' \
+'(-b)--backup[bundle unrelated changesets]' \
+'(--nobackup)-n[no backups]' \
+'(-n)--nobackup[no backups]' \
+':revision:_hg_tags'
+}
+_hg "$@"

Mercurial > hg > mercurial-crew-with-dirclash

comparison contrib/zsh_completion @ 3511:060aefba4459