c.f. 44831: remove completion functions for long dead projects

9 files changed, 7 insertions, 435 deletions

diff --git a/ChangeLog b/ChangeLog
index df51e5acb..af7edc630 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,12 @@
 2019-10-18  Oliver Kiddle  <okiddle@yahoo.co.uk>
 
+	* c.f. 44831: Completion/Linux/Command/_tpconfig,
+	Completion/Unix/Command/_elm, Completion/Unix/Command/_flasher,
+	Completion/Unix/Command/_prcs, Completion/Unix/Command/_raggle,
+	Completion/Unix/Command/_uzbl, Completion/Unix/Command/_vux,
+	Completion/Unix/Command/_sablotron: remove completion functions
+	for long dead projects
+
 	* c.f. 44831: Completion/Unix/Command/_notmuch,
 	Completion/Unix/Command/_hg, Completion/X/Command/_zathura:
 	remove completion functions included in upstream projects
diff --git a/Completion/Linux/Command/_tpconfig b/Completion/Linux/Command/_tpconfig
deleted file mode 100644
index 62f216107..000000000
--- a/Completion/Linux/Command/_tpconfig
+++ /dev/null
@@ -1,24 +0,0 @@
-#compdef tpconfig
-
-_arguments \
-  '--help' \
-  '(-D --debug)'{-D,--debug=}':debug level:(1 2 3)' \
-  '(-d --device)'{-d,--device=}':mouse device:_files' \
-  '--version' \
-  '(-i --info)'{-i,--info}'[display current touchpad config]' \
-  '(-x --reset)'{-x,--reset}'[perform a software reset on the touchpad]' \
-  '(-q --quiet --silent)'{-q,--quiet,--silent}'[suppress verbose output]' \
-  '-a::packet mode:(0 1)' \
-  '--absolute[set packet mode to absolute]' \
-  '--relative[set packet mode to relative]' \
-  '-r::reporting rate:(0 1)' \
-  '-t::tapping mode:(0 1 2 3)' \
-  '-s::sleep mode:(0 1)' \
-  '(-2 --two-button)'{-2,--two-button}'[set two-button mode]' \
-  '(-3 --three-button)'{-3,--three-button}'[set three-button mode]' \
-  '(-c --corner)'{-c,--corner=}'::corner-tap mode:(0 1)' \
-  '(-e --edgemode)'{-e,--edgemode=}'::edge motion:(0 1 3)' \
-  '-m[display which mouse button is simulated by corner taps]' \
-  '--middle-button[make corner taps simulate the middle mouse button]' \
-  '--right-button[make corner taps simulate the right mouse button]' \
-  '(-z --zthreshold)'{-z,--zthreshold=}'::tap sensitivity:'
diff --git a/Completion/Unix/Command/_elm b/Completion/Unix/Command/_elm
deleted file mode 100644
index 2918a5de0..000000000
--- a/Completion/Unix/Command/_elm
+++ /dev/null
@@ -1,18 +0,0 @@
-#compdef elm
-
-_arguments -s \
-  '::recipient:_email_addresses' \
-  '-a[use the arrow pointer regardless]' \
-  '-A+[attach file]:file attachment:_files' \
-  '-c[check the given aliases only]:*:alias' \
-  '-d+[set debug level]:debug level' \
-  '-f+[specify mailbox to load]:mailbox: _mailboxes' \
-  '-h[display help]' \
-  '-i+[specify file to include in message]:include file:_files' \
-  '-m[turn off menu, using more of the screen]' \
-  '-s+[specify a subject]:subject:' \
-  "-t[don't use termcap/terminfo ti/te entries]" \
-  '-V[enable sendmail voyeur mode]' \
-  '-v[display elm version]' \
-  '-w[write .elm/elmrc]' \
-  '-z[start only if new messages]'
diff --git a/Completion/Unix/Command/_flasher b/Completion/Unix/Command/_flasher
deleted file mode 100644
index d5820e116..000000000
--- a/Completion/Unix/Command/_flasher
+++ /dev/null
@@ -1,29 +0,0 @@
-#compdef flasher
-
-_arguments \
-  '(--fiasco -F)'{--fiasco,-F}':location of a FIASCO image:_files' \
-  '(--kernel -k)'{--kernel,-k}':location of kernel image:_files' \
-  '(--initfs -n)'{--initfs,-n}':location of initfs image:_files' \
-  '(--rootfs -r)'{--rootfs,-r}':location of root JFFS2 image:_files' \
-  '(--xloader -x)'{--xloader,-x}':location of X-Loader image:_files' \
-  '(--secondary -s)'{--secondary,-s}':location of NOLO secondary bootloader image:_files' \
-  '(--2nd -2)'{--2nd,-2}':location of NOLO cold flasher ("2nd") image:_files' \
-  '(--unpack -u)'{--unpack,-u}'::unpack a FIASCO image:_files' \
-  '(--flash -f)'{--flash,-f}'[load and flash all supplied images]' \
-  '(--load -l)'{--load,-l}'[only load all supplied images]' \
-  '(--boot -b)'{--boot,-b}'::kernel cmdline' \
-  '(--reboot -R)'{--reboot,-R}'[reboot the board]' \
-  '(--read-board-id -i)'{--read-board-id,-i}'[print out the board type]' \
-  '(--serial-port -S)'{--serial-port,-S}':serial port used for cold flashing' \
-  '(--initialize-port -I)'{--initialize-port,-I}':something' \
-  '(--cold-flash -c)'{--cold-flash,-c}'[cold flash the device]' \
-  '--enable-rd-mode[enable R&D mode on the device]' \
-  '--disable-rd-mode[disable R&D mode on the device]' \
-  '--set-rd-flags::R&D mode flags to set' \
-  '--clear-rd-flags::R&D mode flags to clear' \
-  '--query-rd-mode[query the device R&D mode status and flags]' \
-  '--set-root-device:default root device' \
-  '--query-root-device[query the default root device]' \
-  '--enable-usb-host-mode[set the device into USB host mode]' \
-  '--disable-usb-host-mode[set the device into USB peripheral mode]' \
-  '--flash-only:components'
diff --git a/Completion/Unix/Command/_prcs b/Completion/Unix/Command/_prcs
deleted file mode 100644
index 46e441c34..000000000
--- a/Completion/Unix/Command/_prcs
+++ /dev/null
@@ -1,191 +0,0 @@
-#compdef prcs
-
-local curcontext="$curcontext" state line subcmds ret=1
-typeset -A opt_args
-
-# lookup project names in the repository
-# (this does not handle subprojects)
-
-(( $+functions[_prcs_projects] )) ||
-_prcs_projects() {
-  local expl
-
-  _wanted prcs-projects expl 'project name' compadd "$@" - \
-      ${~opt_args[-R]:-${opt_args[--repository]:-${PRCS_REPOSITORY:-~/PRCS}}}/*(/:t)
-}	   
-
-# standard options for all subcommands 
-
-(( $+functions[_prcs_arguments] )) ||
-_prcs_arguments() {
-  _arguments -s \
-    '(-f --force)'{-f,--force}'[resolve interactive queries in some fixed way]' \
-    '(-h -H --help)'{-h,-H,--help}'[print out help]' \
-    '(-j --jobs)'{-j,--jobs=}'[spawn many child processes at once]:number:' \
-    '(-l -L --long-format --long-long-format)'{-l,--long-format}'[long format]' \
-    '(-l -L --long-format --long-long-format)'{-L,--long-long-format}'[longer format]' \
-    '(-n --no-action)--no-action[show what would happen but leave files unchanged]' \
-    '(-q --quiet)'{-q,--quiet}'[suppress normal informational messages]' \
-    "--plain-format[don't break lines at screen width]" \
-    '(-R --repository)'{-R,--repository=}'[specify the repository directory]:directory:_files -/' \
-    "$@"
-}
-
-_arguments -C \
-  '(* -)'{-h,-H,--help}'[print out help]' \
-  '(* -)--version[display program version]' \
-  '*:: :->subcmd' && ret=0
-
-if (( CURRENT == 1 )); then
-  subcmds=(
-    'admin:admin subcommand'
-    'checkin:checkin project revision'
-    'checkout:checkout project revision'
-    'config:verify configuration'
-    'delete:delete named revision of project'
-    'depopulate:remove named files from project descriptor'
-    'diff:show differences between two revisions'
-    'execute:execute a command for each file in a project'
-    'info:print information about versions of project'
-    'merge:reconcile differences between working files and another revision'
-    'package:package the project and all its revisions into packagefile'
-    'populate:add named files to project descriptor'
-    'rekey:set keywords in selected files'
-    'unpackage:unpackage project in packagefile'
-  )
-  
-  _describe -t commands 'prcs command' subcmds && ret=0
-  return ret
-fi
-
-curcontext="${curcontext%:*}-$words[1]:"
-
-case "$words[1]" in
-  admin)
-    if (( CURRENT == 2 )); then
-      subcmds=(
-	'access:set the access permissions on the repository'
-	'compress:instruct PRCS to save disk space for project'
-	'init:create a repository entry'
-	'pdelete:delete a repository entry'
-	'pinfo:list all projects in the repository'
-	'prename:rename a repository entry'
-	'rebuild:reconstruct PRCS data files in the repository'
-	'uncompress:instruct PRCS to save time in processing project'
-      )
-      _describe -t commands 'admin subcommand' subcmds
-    else
-      shift words
-      (( --CURRENT ))
-      curcontext="${curcontext%:*}-$words[1]:"
-      case "$words[1]" in
-	access|compress|init|pdelete|prename|rebuild)
-          _prcs_arguments ':project name:_prcs_projects'
-        ;;
-	pinfo)
-	  _prcs_arguments
-	;;
-	uncompress)
-          _prcs_arguments \
-	    '-i[expand the entire project immediately]' \
-            ':project name:_prcs_projects'
-        ;;
-	*)
-	  _message "unknown prcs administrative subfunction: $words[1]"
-	;;
-      esac
-    fi
-  ;;
-  checkin)
-    _prcs_arguments \
-      '(-r --revision)'{-r+,--revision=}'[specify version of the project]:revision:' \
-      '(-s --skilled-merge)'{-s,--skilled-merge}'[turn off most of the safety features of merge]' \
-      ':project name:_prcs_projects' \
-      '*:file or directory:_files'
-  ;;
-  checkout)
-    _prcs_arguments \
-      '(-r --revision)'{-r+,--revision=}'[specify version of the project]:revision:' \
-      '(-p --preserve)'{-p,--preserve}'[preserve permissions on files that are checked out]' \
-      '(-u --unlink)'{-u,--unlink}"[don't overwrite symbolic link references]" \
-      '(-P --exclude-project-file)'{-P,--exclude-project-file}"[don't checkout the project file]" \
-      ':project name:_prcs_projects' \
-      '*:file or directory:_files'
-  ;;
-  config)
-    _prcs_arguments
-  ;;
-  delete)
-    _prcs_arguments \
-      '(-r --revision)'{-r+,--revision=}'[specify version of the project]:revision:' \
-      ':project name:_prcs_projects'
-  ;;
-  depopulate)
-    _prcs_arguments \
-      ':project name:_prcs_projects' \
-      '*:file or directory:_files'
-  ;;
-  diff)
-    _prcs_arguments \
-      '*'{-r+,--revision=}'[specify version of the project]:revision:' \
-      '(-k --keywords)'{-k,--keywords}'[compare keywords too]' \
-      '(-N --new)'{-N,--new}'[compare new files against empty files]' \
-      '(-P --exclude-project-file)'{-P,--exclude-project-file}"[don't diff the project file]" \
-      '--[introduce diff options]:*::diff options:=  _diff_options ${PRCS_DIFF_COMMAND:-diff}' \
-      ':project name:_prcs_projects' \
-      '*:file or directory:_files'
-  ;;
-  execute)
-    _prcs_arguments \
-      '(-r --revision)'{-r+,--revision=}'[specify version of the project]:revision:' \
-      '--pre[list directories first]' \
-      '(--pipe)--all[execute command once, with all files as arguments]' \
-      '(--all)--pipe[supply file contents as the standard input]' \
-      '--match[execute command on files matching a pattern]:pattern:' \
-      '--not[execute command on files not matching a pattern]:pattern:' \
-      '--:command: _command_names -e:*::arguments: _normal' \
-      ':project name:_prcs_projects' \
-      '*:file or directory:_files'
-  ;;
-  info)
-    _prcs_arguments \
-      '(-r --revision)'{-r+,--revision=}'[specify version of the project]:revision:' \
-      '--sort=[set sorting type]:sorting type:(version date)' \
-      ':project name:_prcs_projects' \
-      '*:file or directory:_files'
-  ;;
-  merge)
-    _prcs_arguments \
-      '(-r --revision)'{-r+,--revision=}'[specify version of the project]:revision:' \
-      '(-s --skilled-merge)'{-s,--skilled-merge}'[turn off most of the safety features of merge]' \
-      '(-u --unlink)'{-u,--unlink}"[don't overwrite symbolic link references]" \
-      ':project name:_prcs_projects' \
-      '*:file or directory:_files'
-  ;;
-  package)
-    _prcs_arguments \
-      '(-r --revision)'{-r+,--revision=}'[specify version of the project]:revision:' \
-      '(-z --compress)'{-z,--compress=}'[compress the output]' \
-      ':project name:_prcs_projects' \
-      ':file:_files'
-  ;;
-  populate)
-    _prcs_arguments \
-      '(-d --delete)'{-d,--delete=}'[perform optional deletions]' \
-      ':project name:_prcs_projects' \
-      '*:file or directory:_files'
-  ;;    
-  rekey)
-    _prcs_arguments \
-      '(-u --unlink)'{-u,--unlink}"[don't overwrite symbolic link references]" \
-      ':project name:_prcs_projects'
-  ;;    
-  unpackage)
-    _prcs_arguments \
-      ':file:_files' \
-      ':project name:_prcs_projects'
-  ;;
-  *)
-    _message "unknown prcs command: $words[1]"
-  ;;
-esac
diff --git a/Completion/Unix/Command/_raggle b/Completion/Unix/Command/_raggle
deleted file mode 100644
index 4bda595be..000000000
--- a/Completion/Unix/Command/_raggle
+++ /dev/null
@@ -1,48 +0,0 @@
-#compdef raggle
-
-# Raggle v0.4.0
-
-local curcontext="$curcontext" state line
-typeset -A opt_args
-
-_arguments -C -s \
-  '(-a --add)'{-a,--add}"[add a new feed (requires '--url')]" \
-  '(-A --ascii)'{-A,--ascii}'[use ASCII characters instead of ANSI for window borders]' \
-  '(-c --config)'{-c,--config}'[specify an alternate config file]:config file:_files -g "*.rb(-.)"' \
-  '--default-config[print out the default configuration of Raggle in a format suitable for your config.rb file]' \
-  '(-d --delete)'{-d,--delete}'[delete an existing feed]:feed ID:->feed' \
-  '--diag[run raggle in diagnostics/debug mode]' \
-  '(-e --edit)'{-e,--edit}'[edit an existing feed]:feed ID:->feed' \
-  '(--import-opml)--export-opml[export feeds to OPML]:OPML file:_files -g "*.opml(-.)"' \
-  '(-f --find)'{-f,--find}'[find feeds containing a string, via Syndic8]:search string:' \
-  "--force[force behavior Raggle won't normally allow]" \
-  '(-)'{-h,--help,--usage}'[display help information]' \
-  '(--export-opml)--import-opml[import feeds from an OPML file]:OPML file:_files -g "*.opml(-.)"' \
-  '(-i --invalidate)'{-i,--invalidate}'[invalidate a feed (force an update)]:feed ID:->feed' \
-  '(-l --list)'{-l,--list}"[list existing feeds (use '--verbose' to show URLs as well)]" \
-  "--lock-title[lock Title attribute of feed (for '--add' and '--edit')]" \
-  "--max[set the maximum number of items for a feed (for '--add' and '--edit')]" \
-  '(-p --priority)'{-p,--priority}"[feed sorting priority: 0 by default, higher values will sort feeds to the top (for '--add' and '--edit')]:sorting priority:" \
-  '--purge[purge deleted feeds from feed cache]' \
-  '(-r --refresh)'{-r,--refresh}"[refresh attribute of feed (for '--add' and '--edit')]:refresh time (minutes):" \
-  "--save-items[save old items of feed (for '--add' and '--edit')]" \
-  '--server[run Raggle in HTTP server mode]:port:_ports' \
-  '(--sort --sort-feeds)'{--sort,--sort-feeds}'[sort feeds by priority then title (case-insensitive)]' \
-  '(-t --title)'{-t,--title}"[title attribute of feed (for '--add' and '--edit')]:feed title:" \
-  "--unlock-title[unlock Title attribute of feed (for '--add' and '--edit')]" \
-  "--unsave-items[don't save old items of feed (for '--add' and '--edit')]" \
-  "--update[update feed (or all feeds, if unspecified)]::feed ID:->feed" \
-  '(-u --url)'{-u,--url}"[URL attribute of feed (for '--add' and '--edit')]:URL:_urls" \
-  '--verbose[turn on verbose output]' \
-  '(-)'{-v,--version}'[display version information]' && return 0
-
-if [[ "$state" = feed ]]; then
-  local feeds
-  feeds=(
-    ${${(M)${${(f)"$(_call_program feeds $words[1] \
-        --list)"}/(#s)[[:blank:]]/}:#[0-9]##,*}/, /:}
-  )
-  _describe -t feeds "RSS feed" feeds && return 0
-fi
-
-return 1
diff --git a/Completion/Unix/Command/_sablotron b/Completion/Unix/Command/_sablotron
deleted file mode 100644
index 53e0bec92..000000000
--- a/Completion/Unix/Command/_sablotron
+++ /dev/null
@@ -1,52 +0,0 @@
-#compdef sabcmd
-
-local curcontext="$curcontext" state mode line expl ret=1
-typeset -A opt_args
-local mopts='(-c -x -s -? -v --chain-xsl --batch-xml --batch-xsl --help --version)'
-
-_arguments -C \
-  '(-b --base)'{-b,--base=}'[specify base URI]:URI' \
-  '(-)--debug-options[show help on debug options]' \
-  '(- *)'{-\?,--help}'[show help information]' \
-  '(-L --log-file)'{-L,--log-file=}'[specify log file, turn on logging]:log file:_files' \
-  '(-m --measure)'{-m,--measure}'[measure the processing time]' \
-  '(- *)'{-v,--version}'[display version information]' \
-  '--debugger[run the xslt debugger]' \
-  $mopts{-c,--chain-xsl}'[single input file, multiple chained stylesheets]' \
-  $mopts{-x,--batch-xml}'[single input file, multiple stylesheets]' \
-  $mopts{-s,--batch-xsl}'[multiple input files, single stylesheet]' \
-  '*: :->arguments' && ret=0
-
-if [[ -n "$state" ]]; then
-  mode="${opt_args[(i)-c|--chain-xsl]:+chain}${opt_args[(i)-x|--batch-xml]:+batch-x}${opt_args[(i)-s|--batch-xsl]:+batch-s}"
-  [[ $mode = (chain|batch-[xs]) ]] || mode=default
-  _tags files assignments
-  while _tags; do
-    if _requested files; then
-      case $mode:${#words[1,CURRENT-1]:#(-*|*=*)}; in
-        default:1|chain:<3->|batch-x:2|batch-s:1)
-	  _description files expl stylesheet
-	  _files "$expl[@]" -g "*.xsl(-.)" && ret=0
-	;;
-        default:2|chain:1|batch-x:1|batch-s:2)
-	  _description files expl 'input file'
-	  _files "$expl[@]" && ret=0
-	;;
-        default:3|chain:2|batch-x:<3->|batch-s:<3->)
-	  _description files expl 'output file'
-	  _files "$expl[@]" && ret=0
-	;;
-      esac
-    fi
-    if _requested assignments; then
-      if [[ -prefix *= ]]; then
-	_message -e value value
-      else
-	_message -e parameter 'parameter name' && ret=0
-      fi
-    fi
-    (( ret )) || break
-  done
-fi
-
-return ret
diff --git a/Completion/Unix/Command/_uzbl b/Completion/Unix/Command/_uzbl
deleted file mode 100644
index 570b20266..000000000
--- a/Completion/Unix/Command/_uzbl
+++ /dev/null
@@ -1,10 +0,0 @@
-#compdef uzbl uzbl-browser uzbl-tabbed
-
-_arguments \
-  '(-u --uri)'{-u,--uri=}':uri to load:_urls' \
-  '(-v --verbose)'{-v,--verbose}'[verbose]' \
-  '(-n --name)'{-n,--name=}':instance name' \
-  '(-c --config)'{-c,--config=}':config file:_files' \
-  '--display=:X display:_x_display' \
-  '--help[help]'
-
diff --git a/Completion/Unix/Command/_vux b/Completion/Unix/Command/_vux
deleted file mode 100644
index 1ed56dca6..000000000
--- a/Completion/Unix/Command/_vux
+++ /dev/null
@@ -1,63 +0,0 @@
-#compdef vux vuxctl
-
-local expl
-
-case "$service" in
-  (vux)
-
-    _arguments -s -C \
-      '-x:action:((play\:play\ music generate\:generate\ new\ scorelist
-	           merge\:merge\ new\ songs
-		   weed\:prune\ songs\ from\ scorelist
-		   ratings\:show\ statistics force\:force-rate))' \
-      '-s:file:_files' \
-      '-a:file:_files' \
-      '-z:file:_files' \
-      '-y:file:_files' \
-      '-p:file:_files' \
-      '-w:ratings:(b t)' \
-      '-W:repeats:(a c)' \
-      '-G:age bypass method:(t s n)' \
-      '-e:pattern' \
-      '-O:device:_files' \
-      '-M:minimum age val' \
-      '-S[disable saving scorelist]' \
-      '-A[disable saving agelist]' \
-      '-Z[disable saving countlist]' \
-      '-Y[disable missing log]' \
-      '-c[disable rating check]' \
-      '-d[disable rating updates on play]' \
-      '-l[disable rating updates on skip]' \
-      '-j[disable repeat check]' \
-      '-b[disable repeat updates on play]' \
-      '-k[disable repeat updates on skip]' \
-      '-n[disable player]' \
-      '-t:percent' \
-      '-T:percent' \
-      '-C:factor' \
-      '-D:factor' \
-      '-I:factor' \
-      '-U:rating' \
-      '-X:score' \
-      '-N:count' \
-      '-f:rating' \
-      '-J[accelerate decreases]' \
-      '-K[accelerate increases]' \
-      '-u[check age before rating]' \
-      '-R[show ratings after processing]' \
-      '-V[verbose file manipulation]' \
-      '-v[show version and exit]' \
-      '-F[skip songs with -n and -xf]' \
-      '-q[minimize vux output]' \
-      '-P[always play new songs]' \
-      '-g[print stats in xgraph format]' \
-      '-h[show summary of options]'
-  ;;
-
-  (vuxctl)
-
-    _wanted vuxcmd expl 'vux control command' \
-      compadd start clean double half up down next previous forward \
-	      replay pause resume stop reload save history help
-  ;;
-esac