remove larch completion, it has been superceded by tla

3 files changed, 38 insertions, 1975 deletions

diff --git a/ChangeLog b/ChangeLog
index 9f2dc1dbd..ae9116e70 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
 2005-01-21  Oliver Kiddle  <opk@zsh.org>
 
+	* unposted: remove Completion/Unix/Command/_larch: larch has
+	been superceded by tla and is no longer available
+
 	* 20734: Completion/Linux/Command/_valgrind: rewrite to handle
 	version 2.2.0 of valgrind
 
diff --git a/Completion/Unix/Command/.distfiles b/Completion/Unix/Command/.distfiles
index 053fb1d8b..156b96220 100644
--- a/Completion/Unix/Command/.distfiles
+++ b/Completion/Unix/Command/.distfiles
@@ -1,31 +1,38 @@
 DISTFILES_SRC='
 .distfiles
-_a2ps         _bittorrent   _darcs        _larch
-_dvi          _gzip         _man          _rcs          _w3m
-_apachectl    _enscript     _iconv        _mh           _rlogin       _webbrowser
-_cdrecord     _fakeroot     _imagemagick  _mount        _sh           _wget
-_arp          _fetchmail    _init_d       _mutt         _slrn         _whereis
-_bison        _find         _ispell       _mysql_utils  _socket       _whois
-_bzip2        _finger       _java         _ncftp        _ssh          _xargs
-_chown        _flex         _joe          _nslookup     _strip        _yodl
-_compress     _gcc          _killall      _pack         _stty         _yp
-_configure    _gdb          _look         _patch        _su           _zcat
-_cpio         _getconf      _lp           _pbm          _sudo         _zdump
-_cvs          _gnu_generic  _ls           _perl         _tar          _zip
-_dd           _gprof        _lynx         _perldoc      _telnet       _pine
-_dict         _grep         _lzop         _prcs         _tiff         _elm
-_diff         _gs           _make         _psutils      _tin	      _mail
-_last         _loadkeys     _ruby         _sysctl       _links        _samba
-_user_admin   _rsync        _arping	  _spamassassin _mtools       _ifconfig
-_fsh          _chkconfig    _cdcd         _irssi        _mysqldiff    _sccs
-_aap          _ant          _antiword     _apm          _attr
-_baz          _bogofilter
-_cal          _chmod        _du           _ecasound     _elinks       _figlet
-_getent       _global       _gpg          _gphoto2      _less         _lsof
-_mencal       _mt           _mtr          _netcat       _nice         _nmap
-_perforce     _php          _postfix      _printenv     _python
-_raggle       _rar	    _renice
-_sablotron    _screen       _sed          _subversion
-_texinfo      _tla          _tidy
-_uniq         _vorbis       _vux          _wiggle       _xmlsoft
+_a2ps           _aap            _ant            _antiword       _apachectl      
+_apm            _arp            _arping         _attr           
+_baz	        _bison          _bittorrent     _bogofilter     _bzip2
+_cal            _cdcd           _cdrecord       _chkconfig      _chmod          
+_chown          _compress       _configure      _cpio           _cvs            
+_darcs          _dd             _dict           _diff           _du             
+_dvi            _ecasound       _elinks         _elm            _enscript       
+_fakeroot       _fetchmail      _figlet         _find           _finger         
+_flex           _fsh            
+_gcc            _gdb            _getconf        _getent         _global         
+_gnu_generic    _gpg            _gphoto2        _gprof          _grep           
+_gs             _gzip           
+_iconv          _ifconfig       _imagemagick    _init_d         _irssi          
+_ispell         _java           _joe            _killall         
+_last           _less           _links          _loadkeys       _look           
+_lp             _ls             _lsof           _lynx           _lzop           
+_mail           _make           _man            _mencal         _mh             
+_mount          _mt             _mtools         _mtr            _mutt           
+_mysql_utils    _mysqldiff      
+_ncftp          _netcat         _nice           _nmap           _nslookup       
+_pack           _patch          _pbm            _perforce       _perl           
+_perldoc        _php            _pine           _postfix        _prcs           
+_printenv       _psutils        _python         
+_raggle         _rar            _rcs            _renice         _rlogin         
+_rsync          _ruby           
+_sablotron      _samba          _sccs           _screen         _sed            
+_sh             _slrn           _socket         _spamassassin   _ssh            
+_strip          _stty           _su             _subversion     _sudo           
+_sysctl         
+_tar            _telnet         _texinfo        _tidy           _tiff           
+_tin            _tla            
+_uniq           _user_admin     _vorbis         _vux            
+_w3m            _webbrowser     _wget           _whereis        _whois          
+_wiggle         _xargs          _xmlsoft        
+_yodl           _yp             _zcat           _zdump          _zip            
 '
diff --git a/Completion/Unix/Command/_larch b/Completion/Unix/Command/_larch
deleted file mode 100644
index 7bd07c8b1..000000000
--- a/Completion/Unix/Command/_larch
+++ /dev/null
@@ -1,1947 +0,0 @@
-#compdef larch                                                                                                       
-#Generated by
-#   simple2long.xsl
-#   args.xsl
-#   For details see:
-#       http://www.geocities.com/f_rosencrantz/xml_completion.htm
-
-#Redefine command:_larch
-_larch()
-{ local context state line
-           typeset -A opt_args
-	_arguments  \
-		'-V:print version info:->--version' \
-		'-h:display help:->--help' \
-		'-H:display a list of subcommands:->--help-commands' \
-		'--all-commands[display a list of all subcommands]' \
-		'*:: :_larch_command' \
-           && return 0
-            
-case $state in
-  "--help");;
-  "--help-commands");;
-  "--version");;
-esac
-    }
-# define the dispatch function for larch
-(( $+functions[_larch_command] )) ||
-_larch_command () {
-  if (( ! $+_larch_cmds )); then
-    typeset -ga _larch_cmds
-    _larch_cmds=("my-id:print or change your id" \
-"my-default-archive:print or change your default archive" \
-"register-archive:record the location of an archive" \
-"whereis-archive:print the registered location of an archive" \
-"archives:report registered archives and their locations" \
-"init-tree:initialize a new project tree" \
-"tree-root:find and print the root of a project tree" \
-"tree-version:print the default version for a project tree" \
-"set-tree-version:set the default version for a source tree" \
-"inventory:inventory a source tree" \
-"tagging-method:print or change a project tree tagging method" \
-"tree-lint:audit a source tree" \
-"missing-tags:list files missing inventory tags" \
-"add:add an explicit inventory tag" \
-"delete:remove an explicit inventory tag" \
-"move:move an explicit inventory tag" \
-"explicit-default:set the default explicit tag for a directory" \
-"set-manifest:set the inventory manifest from project tree" \
-"manifest:print the inventory manifest" \
-"check-manifest:compare the inventory manifest to reality" \
-"mkpatch:compare two source trees and create a patch tree" \
-"dopatch:apply a patch tree to a source tree" \
-"patch-report:generate a report from a patch set" \
-"empty-patch:make a null patch set" \
-"make-archive:create a new archive directory" \
-"make-category:create a new category within an archive" \
-"make-branch:create a new branch within an archive" \
-"make-version:create a new version within an archive" \
-"categories:list the categories in an archive" \
-"branches:list the branches in an archive category" \
-"versions:list the versions in an archive branch" \
-"revisions:list the revisions in an archive version" \
-"cat-archive-log:print the contents of an archive log entry" \
-"archive-cache-revision:cache a full source tree in an archive" \
-"archive-cached-revisions:list full source trees cached in an archive" \
-"archive-uncache-revision:remove a cached revision from an archive" \
-"category-readme:print the =README of a category" \
-"branch-readme:print the =README of a branch" \
-"version-readme:print the =README of a version" \
-"make-log:initialize a new log file entry" \
-"logs:list patch logs in a project tree" \
-"add-log:add a version patch log to a project tree" \
-"remove-log:remove a version patch log from a project tree" \
-"log-ls:print version patches in a project tree" \
-"cat-log:print the contents of a project tree log entry" \
-"log-header-field:filter a header field from a log entry" \
-"changelog:generate a change log from a patch log" \
-"log-for-merge:generate a log entry bodyfor a merge" \
-"merge-points:report where two branches have been merged" \
-"new-on-branch:list tree patches new to a branch" \
-"import:archive a from-scratch base revision" \
-"commit:archive a revision" \
-"get:construct a project tree for a revision" \
-"get-patch:retrieve a patch set from an archive" \
-"lock-branch:lock a branch" \
-"lock-revision:acquire the lock for the next revision" \
-"push-mirror:update a read-only repository mirror" \
-"build-config:instantiate a multi-project tree" \
-"update-config:update a multi-project tree" \
-"replay-config:replay a multi-project tree" \
-"record-config:record a revision-specific configuration" \
-"show-config:show the revision frontier of a configuration" \
-"config-history:report the history of a configuration" \
-"update:merge local changes with the latest revision" \
-"replay:merge the latest revision with local changes" \
-"delta-patch:compute and apply an arbitrary patch" \
-"star-merge:merge of mutually merged branches" \
-"make-sync-tree:prepare a tree that will synchronize branches" \
-"tag:create a continuation revision \(tag or branch\)" \
-"prepare-branch:create a project tree for a new branch" \
-"finish-branch:commit project tree as a new branch" \
-"join-branch:join-branch a sibling branch" \
-"whats-missing:print patches missing from a project tree" \
-"what-changed:compare project tree to cached pristine" \
-"file-diffs:compare file with cached pristine revision" \
-"pristines:list the pristine trees in a project tree" \
-"lock-pristine:lock a pristine revision locking" \
-"my-revision-library:print or set your revision library path" \
-"library-find:find a revision in a revision library" \
-"library-add:add a revision to a revision library" \
-"library-remove:remove a revision from a revision library" \
-"library-archives:list the archives in the revision library" \
-"library-categories:list categories in the revision library" \
-"library-branches:list branches in the revision library" \
-"library-versions:list versions in the revision library" \
-"library-revisions:list revisions in the revision library" \
-"library-log:print a log message from the library" \
-"library-file:find a file in a revision library" \
-"touched-files-prereqs:print prereqs of a revision" \
-"patch-set-web:create or update a patch-set web" \
-"update-distributions:build or update an FTP area" \
-"distribution-name:revision name -> distribution name" \
-"notify:trigger actions for changes to an archive" \
-"my-notifier:print or set your default notify directory" \
-"mail-new-categories:send email notices about new categories" \
-"mail-new-branches:send email notices about new branches" \
-"mail-new-versions:send email notices about new versions" \
-"mail-new-revisions:send email notices about new revisions" \
-"notify-library:add new revisions to the library" \
-"notify-browser:add new revisions to the browser" \
-"push-new-revisions:send email notices about new revisions" \
-"sendmail-mailx:send email with sendmail ala POSIX mailx" \
-)
-  fi
-  if (( CURRENT == 1 )); then
-    _tags commands && { _describe "larch commands" _larch_cmds }
-  else
-    local curcontext="$curcontext"
-
-    cmd="$words[1]"
-    if (( $#cmd )); then
-      curcontext="${curcontext%:*:*}:_larch_-${cmd}:"
-      _larch_$cmd
-    else
-      _message "unknown larch command: $words[1]"
-    fi
-  fi
-}
-    
-
-# subcommands
-(( $+functions[_larch_my-id] )) ||
-_larch_my-id () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--errname)-e:specify program name for errors:->prog' \
-		'(-e)--errname:specify program name for errors:->prog' \
-		'(--uid)-u[print only the UID portion of the id]' \
-		'(-u)--uid[print only the UID portion of the id]' \
-		'(--verbose)-v[print a reassuring message]' \
-		'(-v)--verbose[print a reassuring message]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_my-default-archive] )) ||
-_larch_my-default-archive () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the default archive name:->dfltarchive' \
-		'(-A)--archive:specify the default archive name:->dfltarchive' \
-		'(--errname)-e:specify program name for errors:->prog' \
-		'(-e)--errname:specify program name for errors:->prog' \
-		"(--silent)-s[don't print a reassuring message]" \
-		"(-s)--silent[don't print a reassuring message]" \
-		'(--delete)-d[unspecify your default archive]' \
-		'(-d)--delete[unspecify your default archive]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_register-archive] )) ||
-_larch_register-archive () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--verbose)-v[print a reassuring message]' \
-		'(-v)--verbose[print a reassuring message]' \
-		'(--delete)-d[remove a registered archive]' \
-		'(-d)--delete[remove a registered archive]' \
-		'(--force)-f[force removals and fail without]' \
-		'(-f)--force[force removals and fail without]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_whereis-archive] )) ||
-_larch_whereis-archive () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R[specify a local archive root]' \
-		'(-R)--root[specify a local archive root]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_archives] )) ||
-_larch_archives () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--names)-n[print archive names only]' \
-		'(-n)--names[print archive names only]' \
-		'(--locations)-l[print archive locations only]' \
-		'(-l)--locations[print archive locations only]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_init-tree] )) ||
-_larch_init-tree () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'(--dir)-d:cd to DIR first:->DIR' \
-		'(-d)--dir:cd to DIR first:->DIR' \
-		'--nested[init a nested project tree]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_tree-root] )) ||
-_larch_tree-root () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--silent)-s[suppress error messages --]' \
-		'(-s)--silent[suppress error messages --]' \
-		'--accurate[require that the project tree log]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_tree-version] )) ||
-_larch_tree-version () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_set-tree-version] )) ||
-_larch_set-tree-version () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archie)-A:specify the archive name:->archive' \
-		'(-A)--archie:specify the archive name:->archive' \
-		'(--dir)-d:cd to DIR first:->DIR' \
-		'(-d)--dir:cd to DIR first:->DIR' \
-		'-v[be verbose]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_inventory] )) ||
-_larch_inventory () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--source)-s[list source files]' \
-		'(-s)--source[list source files]' \
-		'(--precious)-p[list precious files]' \
-		'(-p)--precious[list precious files]' \
-		'(--backups)-b[list backup files]' \
-		'(-b)--backups[list backup files]' \
-		'(--junk)-j[list junk files]' \
-		'(-j)--junk[list junk files]' \
-		'(--unrecognized)-u[list unrecognized files]' \
-		'(-u)--unrecognized[list unrecognized files]' \
-		'(--trees)-t[list roots of nested trees]' \
-		'(-t)--trees[list roots of nested trees]' \
-		'(--report)-r[print a report]' \
-		'(-r)--report[print a report]' \
-		'(--directories)-d[list only directories]' \
-		'(-d)--directories[list only directories]' \
-		'(--files)-f[list only non-directories]' \
-		'(-f)--files[list only non-directories]' \
-		'(--both)-B[list both dirs and files]' \
-		'(-B)--both[list both dirs and files]' \
-		'--all[include arch control files]' \
-		'--nested[include nested trees]' \
-		"--unsorted[don't waste time sorting output]" \
-		'--tags[list with id tags]' \
-		'--explicit[require an explicit file tag]' \
-		'--implicit[use the implicit tagging method]' \
-		'--names[use the name-based tagging method]' \
-		'--precious-command:specify a command for:->cmd' \
-		'--backups-command:find ... -exec $cmd ";":->cmd' \
-		'--junk-command:for the indicated file type:->cmd' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_tagging-method] )) ||
-_larch_tagging-method () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--dir)-d:cd to DIR first:->DIR' \
-		'(-d)--dir:cd to DIR first:->DIR' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_tree-lint] )) ||
-_larch_tree-lint () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'--no-unrecognized[suppress the list of unrecognized files]' \
-		'--no-untagged[suppress the list of untagged files]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_missing-tags] )) ||
-_larch_missing-tags () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'--files[list files only]' \
-		'--directories[list files only]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_add] )) ||
-_larch_add () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_delete] )) ||
-_larch_delete () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_move] )) ||
-_larch_move () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_explicit-default] )) ||
-_larch_explicit-default () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--delete)-d[remove the default]' \
-		'(-d)--delete[remove the default]' \
-		'(--force)-f[set: overwrite an existing default]' \
-		'(-f)--force[set: overwrite an existing default]' \
-		'(--weak)-w[set a weak default (see below)]' \
-		'(-w)--weak[set a weak default (see below)]' \
-		'--dont-care[use paths by default]' \
-		'(--dir[ectory])-D:cd to DIR:->DIR' \
-		'(-D)--dir[ectory]:cd to DIR:->DIR' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_set-manifest] )) ||
-_larch_set-manifest () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--force)-f[overwrite an existing manifest]' \
-		'(-f)--force[overwrite an existing manifest]' \
-		'(--dir)-d:cd to DIR first:->DIR' \
-		'(-d)--dir:cd to DIR first:->DIR' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_manifest] )) ||
-_larch_manifest () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--dir)-d:cd to DIR first:->DIR' \
-		'(-d)--dir:cd to DIR first:->DIR' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_check-manifest] )) ||
-_larch_check-manifest () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--dir)-d:cd to DIR first:->DIR' \
-		'(-d)--dir:cd to DIR first:->DIR' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_mkpatch] )) ||
-_larch_mkpatch () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'--silent[no output (except odd errors)]' \
-		'--quiet[brief output]' \
-		'--report[default output]' \
-		'--verbose[maximal output]' \
-		'--debug[debugging output]' \
-		'--explicit[force the explicit tagging method]' \
-		'--implicit[force the implicit tagging method]' \
-		'--names[force the name-based tagging method]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_dopatch] )) ||
-_larch_dopatch () { 
-	_arguments  \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'--silent[no output (except odd errors)]' \
-		'--quiet[brief output]' \
-		'--report[default output]' \
-		'--verbose[maximal output]' \
-		'--debug[debugging output]' \
-		"--delete-removed[don't save removed files]" \
-		'--explicit[force the explicit tagging method]' \
-		'--implicit[force the implicit tagging method]' \
-		'--names[force the name-based tagging method]' \
-		'--forward[pass the --forward option to patch]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_patch-report] )) ||
-_larch_patch-report () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'--diffs[include context diffs]' \
-		'--html[generate html instad of outline]' \
-		'--title:set the report title:->TITLE' \
-		'--no-intro[skip the introduction]' \
-		'--link-root[hyperlink root of the patch set dir]' \
-		'--omit-empty[omit empty sections]' \
-		'--compact[produce compact output (html only)]' \
-		'--target:specify a link target (html only):->TARGET' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_empty-patch] )) ||
-_larch_empty-patch () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_make-archive] )) ||
-_larch_make-archive () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--readme)-r:save FILE as the README:->file' \
-		'(-r)--readme:save FILE as the README:->file' \
-		'(--update)-u[update an existing archive]' \
-		'(-u)--update[update an existing archive]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_make-category] )) ||
-_larch_make-category () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'(--readme)-r:save FILE as the README:->file' \
-		'(-r)--readme:save FILE as the README:->file' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_make-branch] )) ||
-_larch_make-branch () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'(--readme)-r:save FILE as the README:->file' \
-		'(-r)--readme:save FILE as the README:->file' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_make-version] )) ||
-_larch_make-version () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'(--readme)-r:save FILE as the README:->file' \
-		'(-r)--readme:save FILE as the README:->file' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_categories] )) ||
-_larch_categories () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_branches] )) ||
-_larch_branches () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_versions] )) ||
-_larch_versions () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'(--reverse)-r[sort from newest to oldest]' \
-		'(-r)--reverse[sort from newest to oldest]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_revisions] )) ||
-_larch_revisions () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'(--reverse)-r[sort from newest to oldest]' \
-		'(-r)--reverse[sort from newest to oldest]' \
-		'(--summary)-s[print a summary of each patch]' \
-		'(-s)--summary[print a summary of each patch]' \
-		'(--creator)-c[print the creator id of each patch]' \
-		'(-c)--creator[print the creator id of each patch]' \
-		'(--date)-D[print the date of each patch]' \
-		'(-D)--date[print the date of each patch]' \
-		'(--full)-f[print full names of patch levels]' \
-		'(-f)--full[print full names of patch levels]' \
-		'--silent-error[no error message if the indicated]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_cat-archive-log] )) ||
-_larch_cat-archive-log () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'--headers[show only log headers]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_archive-cache-revision] )) ||
-_larch_archive-cache-revision () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'--cache:cache directory for locally cached:->DIR' \
-		'--silent[no output (except odd errors)]' \
-		'--quiet[brief output]' \
-		'--report[default output]' \
-		'--verbose[maximal output]' \
-		'--debug[debugging output]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_archive-cached-revisions] )) ||
-_larch_archive-cached-revisions () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_archive-uncache-revision] )) ||
-_larch_archive-uncache-revision () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'--silent[no output (except odd errors)]' \
-		'--quiet[brief output]' \
-		'--report[default output]' \
-		'--verbose[maximal output]' \
-		'--debug[debugging output]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_category-readme] )) ||
-_larch_category-readme () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_branch-readme] )) ||
-_larch_branch-readme () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_version-readme] )) ||
-_larch_version-readme () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_make-log] )) ||
-_larch_make-log () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'(--dir)-d:cd to DIR first:->DIR' \
-		'(-d)--dir:cd to DIR first:->DIR' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_logs] )) ||
-_larch_logs () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--reverse)-r[sort from oldest to newest]' \
-		'(-r)--reverse[sort from oldest to newest]' \
-		'(--dir)-d:cd to DIR first:->DIR' \
-		'(-d)--dir:cd to DIR first:->DIR' \
-		'(--arch)-a:list only logs for ARCHIVE:->ARCHIVE' \
-		'(-a)--arch:list only logs for ARCHIVE:->ARCHIVE' \
-		'(--category)-c:list only logs in CATEGORY:->CATEGORY' \
-		'(-c)--category:list only logs in CATEGORY:->CATEGORY' \
-		'(--branch)-b:list only logs for BRANCH:->BRANCH' \
-		'(-b)--branch:list only logs for BRANCH:->BRANCH' \
-		'(--vsn)-v:list only logs for VERSION-NUMBER:->VERSION-NUMBER' \
-		'(-v)--vsn:list only logs for VERSION-NUMBER:->VERSION-NUMBER' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_add-log] )) ||
-_larch_add-log () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'(--dir)-d:cd to DIR first:->DIR' \
-		'(-d)--dir:cd to DIR first:->DIR' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_remove-log] )) ||
-_larch_remove-log () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'(--dir)-d:cd to DIR first:->DIR' \
-		'(-d)--dir:cd to DIR first:->DIR' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_log-ls] )) ||
-_larch_log-ls () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--dir)-d:cd to DIR first:->DIR' \
-		'(-d)--dir:cd to DIR first:->DIR' \
-		'(--reverse)-r[sort from newest to oldest]' \
-		'(-r)--reverse[sort from newest to oldest]' \
-		'(--summary)-s[print a summary of each patch]' \
-		'(-s)--summary[print a summary of each patch]' \
-		'(--creator)-c[print the creator id of each patch]' \
-		'(-c)--creator[print the creator id of each patch]' \
-		'(--date)-D[print the date of each patch]' \
-		'(-D)--date[print the date of each patch]' \
-		'--full[print full patch level names]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_cat-log] )) ||
-_larch_cat-log () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'(--dir)-d:cd to DIR first:->DIR' \
-		'(-d)--dir:cd to DIR first:->DIR' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_log-header-field] )) ||
-_larch_log-header-field () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		"--literal[don't remove newlines,]" \
-		'--list[split field into items,]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_changelog] )) ||
-_larch_changelog () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'(--dir)-D:use project tree containing DIR:->DIR' \
-		'(-D)--dir:use project tree containing DIR:->DIR' \
-		'--no-files[exclude file lists from ChangeLog]' \
-		'--new-entry:make FILE the first (top) entry:->PATCH,FILE' \
-		"--untagged[don't implicitly tag the output file]" \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_log-for-merge] )) ||
-_larch_log-for-merge () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'(--dir)-D:use project tree containing DIR:->DIR' \
-		'(-D)--dir:use project tree containing DIR:->DIR' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_merge-points] )) ||
-_larch_merge-points () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'(--reverse)-r[list from most to least recent]' \
-		'(-r)--reverse[list from most to least recent]' \
-		'(--dir)-d:instead of searching the archive,:->DIR' \
-		'(-d)--dir:instead of searching the archive,:->DIR' \
-		'--full[list included patches by full name]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_new-on-branch] )) ||
-_larch_new-on-branch () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'(--reverse)-r[list from most to least recent]' \
-		'(-r)--reverse[list from most to least recent]' \
-		'(--dir)-d:cd to DIR first:->DIR' \
-		'(-d)--dir:cd to DIR first:->DIR' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_import] )) ||
-_larch_import () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'(--log-file)-L:specify the log-file:->file' \
-		'(-L)--log-file:specify the log-file:->file' \
-		'--not-default[do not make this the default branch]' \
-		'(--dir)-d:cd to DIR first:->DIR' \
-		'(-d)--dir:cd to DIR first:->DIR' \
-		'--silent[no output (except odd errors)]' \
-		'--quiet[brief output]' \
-		'--report[default output]' \
-		'--verbose[maximal output]' \
-		'--debug[debugging output]' \
-		'--begin[prepare a revision for check-in]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_commit] )) ||
-_larch_commit () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'(--log-file)-L:specify the log-file:->file' \
-		'(-L)--log-file:specify the log-file:->file' \
-		'--not-default[do not make this the default branch]' \
-		'--no-lint[do not tree-lint the project tree]' \
-		'(--dir)-d:cd to DIR first:->DIR' \
-		'(-d)--dir:cd to DIR first:->DIR' \
-		'--silent[no output (except odd errors)]' \
-		'--quiet[brief output]' \
-		'--report[default output]' \
-		'--verbose[maximal output]' \
-		'--debug[debugging output]' \
-		'--seal[commit the version revision]' \
-		'--fix[commit a versionfix- patch level]' \
-		'--continuation:commit a continuation revision:->[archive/]prev-revision' \
-		'--out-of-date-ok[permit commit even if project tree is]' \
-		'--unchanged-ok[commit even if project tree is]' \
-		"--dry-run[don't actually commit -- just]" \
-		'--explicit[force the explicit tagging method]' \
-		'--implicit[force the implicit tagging method]' \
-		'--names[force the name-based tagging method]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_get] )) ||
-_larch_get () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'--cache:cache directory for locally cached:->DIR' \
-		"--no-pristine[don't save a pristine copy]" \
-		'--silent[no output (except odd errors)]' \
-		'--quiet[brief output]' \
-		'--report[default output]' \
-		'--verbose[maximal output]' \
-		'--debug[debugging output]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_get-patch] )) ||
-_larch_get-patch () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_lock-branch] )) ||
-_larch_lock-branch () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'-e:use ERRNAME in error messages:->errname' \
-		'(--unlock)-u[release the indicated lock]' \
-		'(-u)--unlock[release the indicated lock]' \
-		'--break[break the indicated lock]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_lock-revision] )) ||
-_larch_lock-revision () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'-e:use ERRNAME in error messages:->errname' \
-		'(--unlock)-u[release the indicated lock]' \
-		'(-u)--unlock[release the indicated lock]' \
-		'--break[break the indicated lock]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_push-mirror] )) ||
-_larch_push-mirror () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'--silent[no output (except odd errors)]' \
-		'--quiet[brief output]' \
-		'--report[default output]' \
-		'--verbose[maximal output]' \
-		'--debug[debugging output]' \
-		"--pull[pull, don't push]" \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_build-config] )) ||
-_larch_build-config () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'--silent[no output (except odd errors)]' \
-		'--quiet[brief output]' \
-		'--report[default output]' \
-		'--verbose[maximal output]' \
-		'--debug[debugging output]' \
-		'(--dir)-d:cd to DIR first:->DIR' \
-		'(-d)--dir:cd to DIR first:->DIR' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_update-config] )) ||
-_larch_update-config () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'--silent[no output (except odd errors)]' \
-		'--quiet[brief output]' \
-		'--report[default output]' \
-		'--verbose[maximal output]' \
-		'--debug[debugging output]' \
-		'(--dir)-d:cd to DIR first:->DIR' \
-		'(-d)--dir:cd to DIR first:->DIR' \
-		'--force[pass the --force flag to update]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_replay-config] )) ||
-_larch_replay-config () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'--silent[no output (except odd errors)]' \
-		'--quiet[brief output]' \
-		'--report[default output]' \
-		'--verbose[maximal output]' \
-		'--debug[debugging output]' \
-		'(--dir)-d:cd to DIR first:->DIR' \
-		'(-d)--dir:cd to DIR first:->DIR' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_record-config] )) ||
-_larch_record-config () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'--silent[no output (except odd errors)]' \
-		'--quiet[brief output]' \
-		'--report[default output]' \
-		'--verbose[maximal output]' \
-		'--debug[debugging output]' \
-		'(--dir)-d:cd to DIR first:->DIR' \
-		'(-d)--dir:cd to DIR first:->DIR' \
-		'(--force)-f[overwrite an existing config]' \
-		'(-f)--force[overwrite an existing config]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_show-config] )) ||
-_larch_show-config () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'--silent[no output (except odd errors)]' \
-		'--quiet[brief output]' \
-		'--report[default output]' \
-		'--verbose[maximal output]' \
-		'--debug[debugging output]' \
-		'(--dir)-d:cd to DIR first:->DIR' \
-		'(-d)--dir:cd to DIR first:->DIR' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_config-history] )) ||
-_larch_config-history () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'(--reverse)-r[list revisions from newest to oldest]' \
-		'(-r)--reverse[list revisions from newest to oldest]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_update] )) ||
-_larch_update () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'--in-place[update in place]' \
-		'--silent[no output (except odd errors)]' \
-		'--quiet[brief output]' \
-		'--report[default output]' \
-		'--verbose[maximal output]' \
-		'--debug[debugging output]' \
-		'--force[force update even if tree is up-to-date]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_replay] )) ||
-_larch_replay () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'--exact[apply one patch specifically]' \
-		'--in-place[modify an existing directory]' \
-		'--list:read a list of patches to apply:->FILE' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_delta-patch] )) ||
-_larch_delta-patch () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'--in-place[modify an existing directory]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_star-merge] )) ||
-_larch_star-merge () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'--in-place[star-merge in place]' \
-		'--silent[no output (except odd errors)]' \
-		'--quiet[brief output]' \
-		'--report[default output]' \
-		'--verbose[maximal output]' \
-		'--debug[debugging output]' \
-		'--finish[finish a two-part merge]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_make-sync-tree] )) ||
-_larch_make-sync-tree () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'--cache:cache directory for locally cached:->DIR' \
-		"--no-pristine[don't save a pristine copy]" \
-		'--silent[no output (except odd errors)]' \
-		'--quiet[brief output]' \
-		'--report[default output]' \
-		'--verbose[maximal output]' \
-		'--debug[debugging output]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_tag] )) ||
-_larch_tag () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'(--log-file)-L:specify the log-file:->file' \
-		'(-L)--log-file:specify the log-file:->file' \
-		'--silent[no output (except odd errors)]' \
-		'--quiet[brief output]' \
-		'--report[default output]' \
-		'--verbose[maximal output]' \
-		'--debug[debugging output]' \
-		'--seal[commit the version revision]' \
-		'--fix[commit a versionfix- patch level]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_prepare-branch] )) ||
-_larch_prepare-branch () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'--silent[no output (except odd errors)]' \
-		'--quiet[brief output]' \
-		'--report[default output]' \
-		'--verbose[maximal output]' \
-		'--debug[debugging output]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_finish-branch] )) ||
-_larch_finish-branch () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'--silent[no output (except odd errors)]' \
-		'--quiet[brief output]' \
-		'--report[default output]' \
-		'--verbose[maximal output]' \
-		'--debug[debugging output]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_join-branch] )) ||
-_larch_join-branch () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'--in-place[modify an existing directory]' \
-		'--force[apply the patch even if the tree]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_whats-missing] )) ||
-_larch_whats-missing () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'(--dir)-d:specify project tree:->DIR' \
-		'(-d)--dir:specify project tree:->DIR' \
-		'(--reverse)-r[sort from oldest to newest]' \
-		'(-r)--reverse[sort from oldest to newest]' \
-		'(--summary)-s[print a summary of each patch]' \
-		'(-s)--summary[print a summary of each patch]' \
-		'(--full)-f[print full names of patch levels]' \
-		'(-f)--full[print full names of patch levels]' \
-		'--merges[print the merge list for each patch]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_what-changed] )) ||
-_larch_what-changed () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'--cache:cache directory for locally cached:->DIR' \
-		'--silent[no output (except odd errors)]' \
-		'--quiet[brief output]' \
-		'--report[default output]' \
-		'--verbose[maximal output]' \
-		'--debug[debugging output]' \
-		'--dir:cd to DIR first:->DIR' \
-		'(--output)-o:specify an output directory name:->OUTUPT' \
-		'(-o)--output:specify an output directory name:->OUTUPT' \
-		'--diffs[include diffs in outline]' \
-		'--html[also generate HTML format output]' \
-		'--url[output should be a URL]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_file-diffs] )) ||
-_larch_file-diffs () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'--cache:cache directory for locally cached:->DIR' \
-		'--silent[no output (except odd errors)]' \
-		'--quiet[brief output]' \
-		'--report[default output]' \
-		'--verbose[maximal output]' \
-		'--debug[debugging output]' \
-		'--html[produce HTML format output]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_pristines] )) ||
-_larch_pristines () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--dir)-D:cd to DIR first:->DIR' \
-		'(-D)--dir:cd to DIR first:->DIR' \
-		'(--long)-l[long format listing]' \
-		'(-l)--long[long format listing]' \
-		'(--reverse)-r[reverse sort order]' \
-		'(-r)--reverse[reverse sort order]' \
-		'--unlocked[list only unlocked pristines]' \
-		'--locked[list only locked pristines]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_lock-pristine] )) ||
-_larch_lock-pristine () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'(--dir)-D:cd to DIR first:->DIR' \
-		'(-D)--dir:cd to DIR first:->DIR' \
-		'(--unlock)-u[unlock the revision]' \
-		'(-u)--unlock[unlock the revision]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_my-revision-library] )) ||
-_larch_my-revision-library () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--errname)-e:specify program name for errors:->prog' \
-		'(-e)--errname:specify program name for errors:->prog' \
-		"(--silent)-s[don't print a reassuring message]" \
-		"(-s)--silent[don't print a reassuring message]" \
-		'(--delete)-d[unspecify your library location]' \
-		'(-d)--delete[unspecify your library location]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_library-find] )) ||
-_larch_library-find () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'(--silent)-s[no output (except odd errors)]' \
-		'(-s)--silent[no output (except odd errors)]' \
-		'(--errname)-e:use NAME in error messages:->NAME' \
-		'(-e)--errname:use NAME in error messages:->NAME' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_library-add] )) ||
-_larch_library-add () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'--cache:cache directory for locally cached:->DIR' \
-		'--silent[no output (except odd errors)]' \
-		'--quiet[brief output]' \
-		'--report[default output]' \
-		'--verbose[maximal output]' \
-		'--debug[debugging output]' \
-		'--ignore-extra-args[ignore extra arguments]' \
-		"--skip-readmes[don't update readme files]" \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_library-remove] )) ||
-_larch_library-remove () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_library-archives] )) ||
-_larch_library-archives () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--reverse)-r[reverse the listing]' \
-		'(-r)--reverse[reverse the listing]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_library-categories] )) ||
-_larch_library-categories () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'(--reverse)-r[reverse the listing]' \
-		'(-r)--reverse[reverse the listing]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_library-branches] )) ||
-_larch_library-branches () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'(--reverse)-r[reverse the listing]' \
-		'(-r)--reverse[reverse the listing]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_library-versions] )) ||
-_larch_library-versions () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'(--reverse)-r[reverse the listing]' \
-		'(-r)--reverse[reverse the listing]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_library-revisions] )) ||
-_larch_library-revisions () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'(--reverse)-r[reverse the listing]' \
-		'(-r)--reverse[reverse the listing]' \
-		'(--summary)-s[print a summary of each patch]' \
-		'(-s)--summary[print a summary of each patch]' \
-		'(--creator)-c[print the creator id of each patch]' \
-		'(-c)--creator[print the creator id of each patch]' \
-		'(--date)-D[print the date of each patch]' \
-		'(-D)--date[print the date of each patch]' \
-		'--full[print full patch level names]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_library-log] )) ||
-_larch_library-log () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'--silent[suppress error messages for missing]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_library-file] )) ||
-_larch_library-file () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'--tag[interpret FILE as an inventory tag]' \
-		'--this[find the tag of FILE relative to]' \
-		"--silent[don't print an error message]" \
-		'(--errname)-e:use NAME in error messages:->NAME' \
-		'(-e)--errname:use NAME in error messages:->NAME' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_touched-files-prereqs] )) ||
-_larch_touched-files-prereqs () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'--show-files[list the overlapping files]' \
-		'--exclude:specify an ERE for files to ignore:->ERE' \
-		'--missing-from:list only patches not already:->DIR' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_patch-set-web] )) ||
-_larch_patch-set-web () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'--silent[no output (except odd errors)]' \
-		'--quiet[brief output]' \
-		'--report[default output]' \
-		'--verbose[maximal output]' \
-		'--debug[debugging output]' \
-		'(--dir)-D:use project tree containing DIR:->DIR' \
-		'(-D)--dir:use project tree containing DIR:->DIR' \
-		'(--title)-t:set the page title:->TITLE' \
-		'(-t)--title:set the page title:->TITLE' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_update-distributions] )) ||
-_larch_update-distributions () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--root)-R:specify the local archive root:->root' \
-		'(-R)--root:specify the local archive root:->root' \
-		'(--archive)-A:specify the archive name:->archive' \
-		'(-A)--archive:specify the archive name:->archive' \
-		'--cache:cache directory for locally cached:->DIR' \
-		'--config:after checking out the revision, pass:->NAME' \
-		'--silent[no output (except odd errors)]' \
-		'--quiet[brief output]' \
-		'--report[default output]' \
-		'--verbose[maximal output]' \
-		'--debug[debugging output]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_distribution-name] )) ||
-_larch_distribution-name () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'--dist:use name, rather than the branch:->NAME' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_notify] )) ||
-_larch_notify () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'--silent[no output (except odd errors)]' \
-		'--quiet[brief output]' \
-		'--report[default output]' \
-		'--verbose[maximal output]' \
-		'--debug[debugging output]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_my-notifier] )) ||
-_larch_my-notifier () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'(--errname)-e:specify program name for errors:->prog' \
-		'(-e)--errname:specify program name for errors:->prog' \
-		"(--silent)-s[don't print a reassuring message]" \
-		"(-s)--silent[don't print a reassuring message]" \
-		'(--delete)-d[unspecify your library location]' \
-		'(-d)--delete[unspecify your library location]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_mail-new-categories] )) ||
-_larch_mail-new-categories () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_mail-new-branches] )) ||
-_larch_mail-new-branches () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_mail-new-versions] )) ||
-_larch_mail-new-versions () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_mail-new-revisions] )) ||
-_larch_mail-new-revisions () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_notify-library] )) ||
-_larch_notify-library () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_notify-browser] )) ||
-_larch_notify-browser () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_push-new-revisions] )) ||
-_larch_push-new-revisions () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'*: :_files' \
-           && return 0
-            }
-
-(( $+functions[_larch_sendmail-mailx] )) ||
-_larch_sendmail-mailx () { 
-	_arguments  \
-		'(--version)-V[print version info]' \
-		'(-V)--version[print version info]' \
-		'(--help)-h[display help]' \
-		'(-h)--help[display help]' \
-		'-s:set the message subject:->SUBJECT' \
-		'*: :_files' \
-           && return 0
-            }
-
-
-#Now call redefined function
-_larch "$*"