|
|
#!/bin/sh
|
|
|
|
|
|
#
|
|
|
# tcsh_completion_build.sh - script to generate tcsh completion
|
|
|
#
|
|
|
#
|
|
|
# Copyright (C) 2005 TK Soh.
|
|
|
#
|
|
|
# This is free software; you can redistribute it and/or modify it under
|
|
|
# the terms of the GNU General Public License as published by the Free
|
|
|
# Software Foundation; either version 2 of the License, or (at your
|
|
|
# option) any later version.
|
|
|
#
|
|
|
#
|
|
|
# Description
|
|
|
# -----------
|
|
|
# This script generates a tcsh source file to support completion
|
|
|
# of Mercurial commands and options.
|
|
|
#
|
|
|
# Instruction:
|
|
|
# -----------
|
|
|
# Run this script to generate the tcsh source file, and source
|
|
|
# the file to add command completion support for Mercurial.
|
|
|
#
|
|
|
# tcsh% tcsh_completion.sh FILE
|
|
|
# tcsh% source FILE
|
|
|
#
|
|
|
# If FILE is not specified, tcsh_completion will be generated.
|
|
|
#
|
|
|
# Bugs:
|
|
|
# ----
|
|
|
# 1. command specific options are not supported
|
|
|
# 2. hg commands must be specified immediately after 'hg'.
|
|
|
#
|
|
|
|
|
|
tcsh_file=${1-tcsh_completion}
|
|
|
|
|
|
hg_commands=`hg --debug help | \
|
|
|
sed -e '1,/^list of commands:/d' \
|
|
|
-e '/^global options:/,$d' \
|
|
|
-e '/^ [^ ]/!d; s/[,:]//g;' | \
|
|
|
xargs -n5 | \
|
|
|
sed -e '$!s/$/ \\\\/g; 2,$s/^ */ /g'`
|
|
|
|
|
|
hg_global_options=`hg -v help | \
|
|
|
sed -e '1,/global/d;/^ *-/!d; s/ [^- ].*//' | \
|
|
|
sed -e 's/ *$//; $!s/$/ \\\\/g; 2,$s/^ */ /g'`
|
|
|
|
|
|
hg_version=`hg version | sed -e '1q'`
|
|
|
|
|
|
script_name=`basename $0`
|
|
|
|
|
|
cat > $tcsh_file <<END
|
|
|
#
|
|
|
# tcsh completion for Mercurial
|
|
|
#
|
|
|
# This file has been auto-generated by $script_name for
|
|
|
# $hg_version
|
|
|
#
|
|
|
# Copyright (C) 2005 TK Soh.
|
|
|
#
|
|
|
# This is free software; you can redistribute it and/or modify it under
|
|
|
# the terms of the GNU General Public License as published by the Free
|
|
|
# Software Foundation; either version 2 of the License, or (at your
|
|
|
# option) any later version.
|
|
|
#
|
|
|
|
|
|
complete hg \\
|
|
|
'n/--cwd/d/' 'n/-R/d/' 'n/--repository/d/' \\
|
|
|
'C/-/($hg_global_options)/' \\
|
|
|
'p/1/($hg_commands)/'
|
|
|
|
|
|
END
|
|
|
|
