docker-cleanup: also delete things more than 1 year old

[monosys] / pacorphan

diff --git a/pacorphan b/pacorphan
index ed6a9ac1fdd2ab48e5c762e46dd2ba33875cb3a9..e34e6dad8402cc876304cade01a6711d80712d30 100755 (executable)
--- a/pacorphan
+++ b/pacorphan
@@ -1,4 +1,4 @@
-#!/usr/bin/python3
+#!/usr/bin/env python3
 
 import codecs
 import subprocess
@@ -41,8 +41,9 @@ def pacorphan_main():
         print()
 
     if explicit_pkg_list:
-        print("# Found explicitly installed packages to keep")
+        print("# Found explicitly installed packages to keep or remove")
         print("echo " + " ".join(explicit_pkg_list) + " | tr ' ' '\\n' >> ~/.pacorphan/keep")
+        print("sudo pacman -D --asdeps " + " ".join(explicit_pkg_list))
         print()
 
     if mark_explicit_list:
@@ -129,12 +130,13 @@ def load_keep_pkg_list(name):
             pkg = strip_comment(pkg).strip()
             if not pkg:
                 continue
-            if filename[0] != "~":
+            if filename[0] != "~" and pkg[0] != "~":
                 if pkg in result:
                     print("# Duplicate entry:", pkg, "in file", filename)
                     continue
                 result.append(pkg)
             else:
+                pkg = pkg.strip("~")
                 if pkg not in result:
                     print("# Redundant removal:", pkg, "in file", filename)
                     continue