diff options
| author | Glenn Morris <rgm@gnu.org> | 2009-06-23 07:43:17 +0000 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2009-06-23 07:43:17 +0000 |
| commit | 33e2c2e5b3228c21232499296f7b7c39ade3b673 (patch) | |
| tree | a59d779de7aba31b1f2b263915678763e9ff4f88 /lisp/pcmpl-rpm.el | |
| parent | f529f302e95a908ab6c5ce46853a8caf6cde3a19 (diff) | |
| download | emacs-33e2c2e5b3228c21232499296f7b7c39ade3b673.tar.gz | |
(pcomplete/rpm): Doc fix.
Diffstat (limited to 'lisp/pcmpl-rpm.el')
| -rw-r--r-- | lisp/pcmpl-rpm.el | 11 |
1 files changed, 4 insertions, 7 deletions
diff --git a/lisp/pcmpl-rpm.el b/lisp/pcmpl-rpm.el index 9335248dcfe..0f596304c9a 100644 --- a/lisp/pcmpl-rpm.el +++ b/lisp/pcmpl-rpm.el @@ -20,7 +20,7 @@ ;;; Commentary: -;; These functions provide completion rules for RedHat's `rpm' tool. +;; These functions provide completion rules for the `rpm' command. ;;; Code: @@ -53,11 +53,8 @@ ;;;###autoload (defun pcomplete/rpm () - "Completion for RedHat's `rpm' command. -These rules were taken from the output of `rpm --help' on a RedHat 6.1 -system. They follow my interpretation of what followed, but since I'm -not a major rpm user/builder, please send me any corrections you find. -You can use \\[report-emacs-bug] to do so." + "Completion for the `rpm' command." + ;; Originally taken from the output of `rpm --help' on a Red Hat 6.1 system. (let (mode) (while (<= pcomplete-index pcomplete-last) (unless mode @@ -136,7 +133,7 @@ You can use \\[report-emacs-bug] to do so." (if (pcomplete-match "^-" 0) (pcomplete-opt "af.p(pcmpl-rpm-files)ilsdcvR") (if (pcomplete-test "-[^-]*p" 'first 1) - (pcomplete-here (pcmpl-rpm-files)) + (pcomplete-here (pcmpl-rpm-files)) (pcomplete-here (pcmpl-rpm-packages)))))) ((pcomplete-test "--pipe") (pcomplete-here* (funcall pcomplete-command-completion-function))) |