zsh-workers
 help / color / mirror / code / Atom feed
From: Clint Adams <schizo@debian.org>
To: zsh-workers@sunsite.auc.dk
Subject: PATCH: _dpkg to handle dpkg-deb options too
Date: Wed, 22 Dec 1999 11:42:51 -0500	[thread overview]
Message-ID: <19991222114251.A538@dman.com> (raw)

I could've sworn I did this already, but apparently I was dreaming.

Index: Completion/Debian/_dpkg
===================================================================
RCS file: /cvs/zsh/zsh/Completion/Debian/_dpkg,v
retrieving revision 1.1.1.2
diff -u -r1.1.1.2 _dpkg
--- Completion/Debian/_dpkg	1999/11/22 00:41:58	1.1.1.2
+++ Completion/Debian/_dpkg	1999/12/22 16:37:16
@@ -1,11 +1,37 @@
-#compdef dpkg
+#compdef dpkg dpkg-deb
 
+_dpkg_deb_args=('(--build)-b[build archive]:directory:_files -/' \
+           '(-b)--build:directory:_files -/' \
+           '(--contents)-c[list contents]:Debian package:_files -g \*.deb' \
+           '(-c)--contents:Debian package:_files -g \*.deb' \
+           '(--info)-I[show info]:Debian package:_files -g \*.deb' \
+           '(-I)--info:Debian package:_files -g \*.deb' \
+           '(--field)-f[show fields]:Debian package:_files -g \*.deb' \
+           '(-f)--field:Debian package:_files -g \*.deb' \
+           '(--control)-e[extract control]:Debian package:_files -g \*.deb' \
+           '(-e)--control:Debian package:_files -g \*.deb' \
+           '(--extract)-x[extract files]:Debian package:_files -g \*.deb' \
+           '(-x)--extract:Debian package:_files -g \*.deb' \
+           '(--vextract)-X[extract and list files]:Debian package:_files -g \*.deb' \
+           '(-X)--vextract[extract and list]:Debian package:_files -g \*.deb' \
+           '--fsys-tarfile[output fs tarfile]:Debian package:_files -g \*.deb')
+
+_dpkg_common_args=('--help[show help]' \
+           '--version[show version]' \
+           '--licence[show licensing]')
+
+case "$words[1]" in
+dpkg)
 _arguments -s '(--install)-i[install packages]:Debian package:_files -g \*.deb' \
+           '--install(-i):Debian package:_files -g \*.deb' \
            '--unpack[unpack package]:Debian package:_files -g \*.deb' \
            '(--record-avail)-A[record available]:package file:_files' \
+           '(-A)--record-avail:package file:_files' \
            '--configure:package:_deb_packages installed' \
            '(--remove)-r[remove package]:package:_deb_packages installed' \
+           '(-r)--remove:package:_deb_packages installed' \
            '(--purge)-P[purge package]:package:_deb_packages installed' \
+           '(-P)--purge:package:_deb_packages installed' \
            '--get-selections[get selections]:pattern:' \
            '--set-selections[set selections]' \
            '--update-avail[update available]:package file:_files' \
@@ -13,30 +39,48 @@
            '--clear-avail[clear available]' \
            '--forget-old-unavail[forget uninstalled unavailable]' \
            '(--status)-s[display package status]:packages:_deb_packages avail' \
+           '(-s)--status:packages:_deb_packages avail' \
            '(--print-avail)-p[display available details]:packages:_deb_packages avail' \
+           '(-p)--print-avail:packages:_deb_packages avail' \
            '(--listfiles)-L[list owned files]:packages:_deb_packages installed' \
+           '(-L)--listfiles:packages:_deb_packages installed' \
            '(--list)-l[list packages]:packages:_deb_packages avail' \
+           '(-l)--list:packages:_deb_packages avail' \
            '(--search)-S[search for file owner]:pattern:' \
+           '(-S)--search:pattern:' \
            '(--audit)-C[check for broken pkgs]' \
+           '(-C)--audit' \
            '--abort-after[abort after errors]:number of errors:' \
            '--print-architecture[print target architecture]' \
            '--print-gnu-build-architecture[print GNU version of target architecture]' \
            '--print-installation-architecture[print host architecture]' \
            '--compare-versions[compare version numbers]:expression:' \
-           '--help[show help]' \
-           '--version[show version]' \
-           '--licence[show licensing]' \
            '--admindir=[data directory]:directory:_files -/' \
            '--root=[alternative root]:root:_files -/' \
            '--instdir=[change inst root but not data dir]:_files -/' \
            '(--selected-only)-O[skip unselected packages]' \
+           '(-O)--selected-only' \
            '(--skip-same-version)-E[skip packages with same version as installed]' \
+           '(-E)--skip-same-version' \
            '(--refuse-downgrade)-G[skip packages with earlier version than installed]' \
+           '(-G)--refuse-downgrade' \
            '(--auto-deconfigure)-B[install can break other packages]' \
+           '(-B)--auto-deconfigure' \
            '--largemem[optimize for >4Mb RAM]' \
            '--smallmem[optimize for <4Mb RAM]' \
            '--no-act[show potential actions but do not follow through]' \
            '-D+[debug options]:debug options:(h 1 2 3)' \
            '--debug=[debug options]:debug options:(help 1 2 3)' \
            '--ignore-depends=[ignore depends involving package]:package:_deb_packages avail' \
-           --{force,refuse,no-force}'--[forcing options]:what:(auto-select downgrade configure-any hold bad-path not-root overwrite overwrite-diverted depends-version depends confnew confold confdef confmiss conflicts architecture overwrite-dir remove-reinstreq remove-essential)'
+           --{force,refuse,no-force}'--[forcing options]:what:(auto-select downgrade configure-any hold bad-path not-root overwrite overwrite-diverted depends-version depends confnew confold confdef confmiss conflicts architecture overwrite-dir remove-reinstreq remove-essential)' \
+           "$_dpkg_deb_args[@]" \
+           "$_dpkg_common_args[@]"
+;;
+
+dpkg-deb)
+_arguments "$_dpkg_deb_args[@]" \
+           "$_dpkg_common_args[@]"
+
+;;
+
+esac


                 reply	other threads:[~1999-12-22 16:43 UTC|newest]

Thread overview: [no followups] expand[flat|nested]  mbox.gz  Atom feed

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=19991222114251.A538@dman.com \
    --to=schizo@debian.org \
    --cc=zsh-workers@sunsite.auc.dk \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this public inbox

	https://git.vuxu.org/mirror/zsh/

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).