branch: elpa/pcmpl-args
commit 43229e1096f89c277190f09a3d794781f8fa0015
Author: Valeriy Litkovskyy <vlr.ltk...@protonmail.com>
Commit: Troy Hinckley <t.mac...@gmail.com>
Add pwgen completion
---
pcmpl-args.el | 11 ++++++++++-
1 file changed, 10 insertions(+), 1 deletion(-)
diff --git a/pcmpl-args.el b/pcmpl-args.el
index ddf88e4291..90388babfa 100644
--- a/pcmpl-args.el
+++ b/pcmpl-args.el
@@ -3572,6 +3572,15 @@ entered, it will be removed from returned list."
(setq argspecs (pcmpl-args-make-argspecs specs)))))
(list arguments argspecs seen)))))))
+(defun pcomplete/pwgen ()
+ "Pwgen completion."
+ (pcmpl-args-pcomplete
+ (pcmpl-args-cached 'pwgen pcmpl-args-cache-max-duration
+ (pcmpl-args-make-argspecs
+ (append (pcmpl-args-extract-argspecs-from-manpage "pwgen")
+ `((argument 0 (("pw_length" none)))
+ (argument 1 (("num_pw" none)))))))))
+
;;; Testing
@@ -3856,7 +3865,7 @@ will print completions for `ls -'."
;; (insert (format "\n\n;;;###autoload (dolist (func '(%s)) (autoload func
\"pcmpl-args\"))\n"
;; (mapconcat 'identity accum " "))))
-;;;###autoload (dolist (func '(pcomplete/chgrp pcomplete/chmod pcomplete/chown
pcomplete/chroot pcomplete/cp pcomplete/date pcomplete/dd pcomplete/dir
pcomplete/echo pcomplete/env pcomplete/false pcomplete/groups pcomplete/id
pcomplete/ln pcomplete/ls pcomplete/mv pcomplete/nice pcomplete/nohup
pcomplete/printenv pcomplete/printf pcomplete/rm pcomplete/rmdir pcomplete/sort
pcomplete/stat pcomplete/test pcomplete/true pcomplete/vdir pcomplete/basename
pcomplete/cat pcomplete/cksum pcomple [...]
+;;;###autoload (dolist (func '(pcomplete/chgrp pcomplete/chmod pcomplete/chown
pcomplete/chroot pcomplete/cp pcomplete/date pcomplete/dd pcomplete/dir
pcomplete/echo pcomplete/env pcomplete/false pcomplete/groups pcomplete/id
pcomplete/ln pcomplete/ls pcomplete/mv pcomplete/nice pcomplete/nohup
pcomplete/printenv pcomplete/printf pcomplete/rm pcomplete/rmdir pcomplete/sort
pcomplete/stat pcomplete/test pcomplete/true pcomplete/vdir pcomplete/basename
pcomplete/cat pcomplete/cksum pcomple [...]
(provide 'pcmpl-args)
;;; pcmpl-args.el ends here
