From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 7235 invoked by alias); 27 May 2011 01:37:25 -0000 Mailing-List: contact zsh-workers-help@zsh.org; run by ezmlm Precedence: bulk X-No-Archive: yes List-Id: Zsh Workers List List-Post: List-Help: X-Seq: 29387 Received: (qmail 24697 invoked from network); 27 May 2011 01:37:15 -0000 X-Spam-Checker-Version: SpamAssassin 3.3.1 (2010-03-16) on f.primenet.com.au X-Spam-Level: X-Spam-Status: No, score=-2.7 required=5.0 tests=BAYES_00,DKIM_SIGNED, DKIM_VALID,DKIM_VALID_AU,FREEMAIL_FROM,RCVD_IN_DNSWL_LOW, T_TO_NO_BRKTS_FREEMAIL autolearn=ham version=3.3.1 Received-SPF: pass (ns1.primenet.com.au: SPF record at _spf.google.com designates 74.125.82.43 as permitted sender) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=gamma; h=domainkey-signature:from:to:subject:date:message-id:x-mailer; bh=DZyj6xGvB4DDi4pzRJBgnctay7bOlcIwnXTpuCK1t+Y=; b=bq51hLiP2m9RhwZmpGLrKDa8lqBQbL2SggL/uWD47+EykL5EecVRZWhRWYdrFrGu2a FptYrG2dlfQAWrk7JltWXizs6hYGkVcBRQzMtbhne6atuL7HRcAwaOb5vKxJCAnjKruj OmMMMV/qckSW49C0DfHII4aTOolqtFF9EszR4= DomainKey-Signature: a=rsa-sha1; c=nofws; d=gmail.com; s=gamma; h=from:to:subject:date:message-id:x-mailer; b=cmbFp6Vas3Y/Je/ctov9DM76Q02MfoSJC53jHLGODi0+YXDQQfDUeCPOL15ljM1Pes 3tzcCI4YBxWBKML2+Fr7eE9EvXhGCUH+cIL35mRAhKyo6tI6wQIhzOuApseZcDYhv3zj CSNFqs1gWHUNib1iDhp1luBRwBlEPCEQkRTDU= From: Mikael Magnusson To: zsh-workers@zsh.org Subject: PATCH: _at: Add at/atrm/atq/batch completion. Date: Fri, 27 May 2011 03:37:04 +0200 Message-Id: <1306460224-19009-1-git-send-email-mikachu@gmail.com> X-Mailer: git-send-email 1.7.4-rc1 Been sitting on this one forever too. --- Completion/Unix/Command/.distfiles | 1 + Completion/Unix/Command/_at | 39 ++++++++++++++++++++++++++++++++++++ 2 files changed, 40 insertions(+), 0 deletions(-) create mode 100644 Completion/Unix/Command/_at diff --git a/Completion/Unix/Command/.distfiles b/Completion/Unix/Command/.distfiles index 9b28418..cc47a7a 100644 --- a/Completion/Unix/Command/.distfiles +++ b/Completion/Unix/Command/.distfiles @@ -8,6 +8,7 @@ _apachectl _apm _arp _arping +_at _attr _awk _baz diff --git a/Completion/Unix/Command/_at b/Completion/Unix/Command/_at new file mode 100644 index 0000000..f8ff8d1 --- /dev/null +++ b/Completion/Unix/Command/_at @@ -0,0 +1,39 @@ +#compdef atrm atq at batch + +local context state line expl +typeset -A opt_args + +#todo (when extremely bored) make -l and -d do the atq and atrm completions +case $service in +atrm) + _arguments \ + '-V[Print version number]' \ + '*:job number:->jobs' + ;; +atq) + _arguments \ + '-V[Print version number]' \ + '-q[Uses specified queue]:a-z+A-Z' + ;; +at|batch) + _arguments \ + - new-job \ + '-V[Print version number]' \ + '-q[Uses specified queue, uppercase acts as batch]:a-z+A-Z' \ + '-f[Read job from file rather than from stdin]:file:_files' \ + '-v[Show the time the job will be executed]' \ + '-m[Send mail even if there was no output]' \ + ':time:' \ + - atq \ + '-l[Alias for atq]' \ + - atrm \ + '-d[Alias for atrm]' \ + - show-job \ + '-c[Cat specified jobs to stdout]:*:job number:->jobs' +esac + +case $state in +jobs) + _wanted job expl 'job number' compadd $(_call_program job atq|cut -f 1 -d \ ) + ;; +esac -- 1.7.4-rc1