Mercurial > emacs

changeset 99089:d78006bea879

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(pcomplete/rpm): Make "rpm -qp" use file completion.
author Chong Yidong <cyd@stupidchicken.com>
date Thu, 23 Oct 2008 22:09:09 +0000
parents df7905beb96c
children 2065a0209098
files lisp/pcmpl-rpm.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/pcmpl-rpm.el	Thu Oct 23 22:09:00 2008 +0000
+++ b/lisp/pcmpl-rpm.el	Thu Oct 23 22:09:09 2008 +0000
@@ -135,7 +135,9 @@
 		 (pcmpl-rpm-all-query "--requires")))))
 	  (if (pcomplete-match "^-" 0)
 	      (pcomplete-opt "af.p(pcmpl-rpm-files)ilsdcvR")
-	    (pcomplete-here (pcmpl-rpm-packages)))))
+	    (if (pcomplete-test "-[^-]*p" 'first 1)
+		(pcomplete-here (pcmpl-rpm-files))	
+	      (pcomplete-here (pcmpl-rpm-packages))))))
        ((pcomplete-test "--pipe")
 	(pcomplete-here* (funcall pcomplete-command-completion-function)))
        ((pcomplete-test "--rmsource")