From 8c3a83526b6d09b438eb38eedb3d1e5dff240d17 Mon Sep 17 00:00:00 2001 From: ErnestDong Date: Mon, 5 Jul 2021 15:06:54 +0800 Subject: [PATCH] Filter directories when purging straight repos in macOS there is always an annoying ".DS_Store" in straight/repos, which breaks `doom purge` --- core/cli/packages.el | 13 +++++++------ 1 file changed, 7 insertions(+), 6 deletions(-) diff --git a/core/cli/packages.el b/core/cli/packages.el index 73c23f6b0..a6434e405 100644 --- a/core/cli/packages.el +++ b/core/cli/packages.el @@ -532,12 +532,13 @@ declaration) or dependency thereof that hasn't already been." (defun doom--cli-packages-purge-repo (repo) (let ((repo-dir (straight--repos-dir repo))) - (delete-directory repo-dir 'recursive) - (delete-file (straight--modified-file repo)) - (if (file-directory-p repo-dir) - (ignore (print! (error "Failed to purge repos/%s" repo))) - (print! (success "Purged repos/%s" repo)) - t))) + (when (file-directory-p repo-dir) + (delete-directory repo-dir 'recursive) + (delete-file (straight--modified-file repo)) + (if (file-directory-p repo-dir) + (ignore (print! (error "Failed to purge repos/%s" repo))) + (print! (success "Purged repos/%s" repo)) + t)))) (defun doom--cli-packages-purge-repos (repos) (if (not repos)