* PATCH: replace a for-loop by a K flag in _telnet
@ 2000-01-30 4:12 Tanaka Akira
0 siblings, 0 replies; only message in thread
From: Tanaka Akira @ 2000-01-30 4:12 UTC (permalink / raw)
To: zsh-workers
This replaces a for-loop by a K flag in _telnet.
Index: Completion/User/_telnet
===================================================================
RCS file: /projects/zsh/zsh/Completion/User/_telnet,v
retrieving revision 1.1.1.12
diff -u -r1.1.1.12 _telnet
--- Completion/User/_telnet 1999/11/23 15:44:13 1.1.1.12
+++ Completion/User/_telnet 2000/01/30 03:46:33
@@ -9,38 +9,34 @@
typeset -A opt_args
if (( ! $+_telnet_args )); then
- local k help="$(telnet -\? < /dev/null 2>&1)"
+ local help="$(telnet -\? < /dev/null 2>&1)"
local -A optionmap
- optionmap=( "[-8]" '-8[allow 8-Bit data]' \
- "[-E]" '-E[disable an escape character]' \
- "[-K]" '-K[no automatic login]' \
- "[-L]" '-L[allow 8-Bit data on output]' \
- "[-N]" '-N[supress reverse lookup]' \
- "[-S tos]" '-S+:IP type-of-service:' \
- "[-X atype]" '-X+:authentication type to disable:' \
- "[-a]" '-a[attempt automatic login]' \
- "[-c]" '-c[disable .telnetrc]' \
- "[-d]" '-d[debug mode]' \
- "[-e char]" '-e+[specify escape character]:escape character:' \
- "[-f/" '-f' \
- "/-F]" '-F' \
- "[-k realm]" '-k+:realm:' \
- "[-l user]" '-l+[specify user]:user:->users' \
- "[-n tracefile]" '-n+[specify tracefile]:tracefile:_files' \
- "[-r]" '-r[rlogin like user interface]' \
- "[-s src_addr]" '-s+[set source IP address]:src_addr:' \
- "[-x]" '-x' \
- "[-t transcom]" '-t+:transcom:' \
- "[-noasynch]" '-noasynch' \
- "[-noasyncnet]" '-noasyncnet' \
- "[-noasynctty]" '-noasynctty' )
-
- _telnet_args=()
- for k in ${(k)optionmap}
- do
- [[ "$help" = *"$k"* ]] &&
- _telnet_args=( "$_telnet_args[@]" "$optionmap[$k]" )
- done
+ optionmap=(
+ '*\[-8\]*' '-8[allow 8-Bit data]'
+ '*\[-E\]*' '-E[disable an escape character]'
+ '*\[-K\]*' '-K[no automatic login]'
+ '*\[-L\]*' '-L[allow 8-Bit data on output]'
+ '*\[-N\]*' '-N[supress reverse lookup]'
+ '*\[-S tos\]*' '-S+:IP type-of-service:'
+ '*\[-X atype\]*' '-X+:authentication type to disable:'
+ '*\[-a\]*' '-a[attempt automatic login]'
+ '*\[-c\]*' '-c[disable .telnetrc]'
+ '*\[-d\]*' '-d[debug mode]'
+ '*\[-e char\]*' '-e+[specify escape character]:escape character:'
+ '*\[-f/*' '-f'
+ '*/-F\]*' '-F'
+ '*\[-k realm\]*' '-k+:realm:'
+ '*\[-l user\]*' '-l+[specify user]:user:->users'
+ '*\[-n tracefile\]*' '-n+[specify tracefile]:tracefile:_files'
+ '*\[-r\]*' '-r[rlogin like user interface]'
+ '*\[-s src_addr\]*' '-s+[set source IP address]:src_addr:'
+ '*\[-x\]*' '-x'
+ '*\[-t transcom\]*' '-t+:transcom:'
+ '*\[-noasynch\]*' '-noasynch'
+ '*\[-noasyncnet\]*' '-noasyncnet'
+ '*\[-noasynctty\]*' '-noasynctty'
+ )
+ _telnet_args=($optionmap[(K)"$help"])
fi
_arguments -C -s \
--
Tanaka Akira
^ permalink raw reply [flat|nested] only message in thread
only message in thread, other threads:[~2000-01-30 4:13 UTC | newest]
Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2000-01-30 4:12 PATCH: replace a for-loop by a K flag in _telnet Tanaka Akira
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).