From c82baa3aa9e3cbf0cd37e4142aa2d68a4cfd88e8 Mon Sep 17 00:00:00 2001
From: Alex Shinn <alexshinn@gmail.com>
Date: Fri, 4 Sep 2020 14:04:53 +0900
Subject: [PATCH] ignore snow package meta files whose installed files have
 been removed

---
 lib/chibi/snow/commands.scm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/lib/chibi/snow/commands.scm b/lib/chibi/snow/commands.scm
index 240c09a7..9f84f905 100644
--- a/lib/chibi/snow/commands.scm
+++ b/lib/chibi/snow/commands.scm
@@ -1559,7 +1559,9 @@
           ((and (equal? "meta" (path-extension file))
                 (guard (exn (else #f))
                   (let ((pkg (call-with-input-file file read)))
-                    (and (package? pkg) pkg))))
+                    (and (package? pkg)
+                         (every file-exists? (package-installed-files pkg))
+                         pkg))))
            => (lambda (pkg)
                 (append
                  (map