PATCH: _pon, poff

[Clint Adams <clint@xxxxxxx>]

It would probably be saner to check for running pppds for poff.

Index: Completion/Unix/Command/_pon
===================================================================
RCS file: /cvsroot/zsh/zsh/Completion/Unix/Command/_pon,v
retrieving revision 1.1
diff -u -r1.1 _pon
--- Completion/Unix/Command/_pon	4 Oct 2006 09:40:40 -0000	1.1
+++ Completion/Unix/Command/_pon	7 Oct 2006 08:49:24 -0000
@@ -1,7 +1,23 @@
-#compdef pon
+#compdef pon poff
 
-provider=(/etc/ppp/peers/*(:t))
+case "$service" in
+  (pon)
 
 _arguments \
   '(-q --quick)'{-q,--quick}'[hangs up after all ip-up scripts are run]' \
-  '1:provider to call:(${provider[@]})'
+  '1:provider to call:_files -W /etc/ppp/peers'
+
+  ;;
+
+  (poff)
+_arguments \
+  '-r[drop the line and redial]' \
+  '-d[toggle state of debug option]' \
+  '-c[renegotiate compression]' \
+  '-a[stop all pppds]' \
+  '-h[help]' \
+  '-v[version]' \
+  '1:provider to disconnect:_files -W /etc/ppp/peers'
+
+  ;;
+esac