be amenable to systems without aptitude

[distro-functions] / src / package-manager-abstractions

diff --git a/src/package-manager-abstractions b/src/package-manager-abstractions
index ca3b43bac7d8b7a08704c5b949e1ecbaa50a978e..6936c9271e33bd4f6123bcd724ae694de5030365 100644 (file)
--- a/src/package-manager-abstractions
+++ b/src/package-manager-abstractions
@@ -64,7 +64,7 @@ elif command -v apt-get &>/dev/null; then
     pi() {
         pupdate
         local s; [[ $EUID != 0 ]] && s=sudo
-        $s apt-get -y install "$@"
+        $s apt-get -y install --purge --auto-remove "$@"
     }
     pi-nostart() {
         local s; [[ $EUID != 0 ]] && s=sudo
@@ -78,29 +78,38 @@ EOF
         $s rm $f
     }
     pf() {
-        # scratch a very annoying itch.  package description width as
+        # package name and descriptions
+        apt-cache search "$@"
+    }
+    pff() {
+        local s; [[ $EUID != 0 ]] && s=sudo
+        # nice aptitude search from emacs shell. package description width as
         # wide as the screen, and package name field small aptitude
         # manual can't figure out how wide emacs terminal is, of course
         # it doesn't consult the $COLUMNS variable...  and in a normal
         # terminal, it makes the package name field ridiculously big
         # also, remove that useless dash before the description
-        local s; [[ $EUID != 0 ]] && s=sudo
-        $s aptitude -F "%c%a%M %p %$((COLUMNS - 30))d" -w $COLUMNS search "$@"
+        aptitude -F "%c%a%M %p %$((COLUMNS - 30))d" -w $COLUMNS search "$@"
     }
     pu() {
         local s; [[ $EUID != 0 ]] && s=sudo
-        $s apt-get -y purge "$@"
+        $s apt-get -y remove --purge --auto-remove  "$@"
+        # seems slightly redundant, but it removes more stuff sometimes.
         $s apt-get -y autoremove
     }
     pup() { # upgrade
         pupdate
         local s; [[ $EUID != 0 ]] && s=sudo
-        $s apt-get -y dist-upgrade "$@"
+        $s apt-get -y dist-upgrade --purge --auto-remove "$@"
         $s apt-get -y autoremove
     }
     # package info
     pl() {
-        aptitude show "$@"
+        if type -p aptitude &>/dev/null; then
+            aptitude show "$@"
+        else
+            apt-cache show "$@"
+        fi
     }
     pfile() {
         local file=$1
@@ -110,8 +119,8 @@ EOF
         # package name. So, commenting this, waiting to find
         # a config file only tracked by ucfq to see if it gives the
         # package name and if I can identify this kind of file.
-#        if [[ $file == /* ]] && ! ucfq -w $file | grep ::: &>/dev/null; then
-#            ucfq $file
+        # if [[ $file == /* ]] && ! ucfq -w $file | grep ::: &>/dev/null; then
+        #    ucfq $file
 
         if [[ $file == */* ]]; then
             apt-file find -x "$file"\$