From 2bb6addc869b13aacd87a4126b70e1a59b867a22 Mon Sep 17 00:00:00 2001
From: David Paleino <dapal@debian.org>
Date: Sat, 5 Nov 2011 11:38:25 +0100
Subject: Correctly list purgeable packages for dpkg --listfiles and dpkg
 --purge (Debian: #647684)

---
 completions/dpkg | 22 +++++++++++++++++++++-
 1 file changed, 21 insertions(+), 1 deletion(-)

diff --git a/completions/dpkg b/completions/dpkg
index 247171c5..5794c2e1 100644
--- a/completions/dpkg
+++ b/completions/dpkg
@@ -7,6 +7,22 @@ _comp_dpkg_installed_packages()
 }
 } || {
 _comp_dpkg_installed_packages()
+{
+    command grep -A 1 "Package: $1" /var/lib/dpkg/status | \
+        command grep -B 1 -Ee "ok installed|half-installed|unpacked| \
+            half-configured" \
+            -Ee "^Essential: yes" | \
+        command grep "Package: $1" | cut -d\  -f2
+}
+}
+
+_have grep-status && {
+_comp_dpkg_purgeable_packages()
+{
+    grep-status -P -e '^ruby' -a -FStatus 'install ok installed' -o -FStatus 'deinstall ok config-files' -n -s Package
+}
+} || {
+_comp_dpkg_purgeable_packages()
 {
     command grep -A 1 "Package: $1" /var/lib/dpkg/status | \
         command grep -B 1 -Ee "ok installed|half-installed|unpacked| \
@@ -54,10 +70,14 @@ _dpkg()
             _filedir
             return 0
             ;;
-        -r|-L|-P|--remove|--purge|--listfiles)
+        -r|--remove)
             COMPREPLY=( $( _comp_dpkg_installed_packages "$cur" ) )
             return 0
             ;;
+        -L|-P|--listfiles|--purge)
+            COMPREPLY=( $( _comp_dpkg_purgeable_packages "$cur" ) )
+            return 0
+            ;;
     esac
 
     $split && return
-- 
cgit v1.2.1