diff options
| author | Craig Jennings <c@cjennings.net> | 2026-01-24 12:25:38 -0600 |
|---|---|---|
| committer | Craig Jennings <c@cjennings.net> | 2026-01-24 12:25:38 -0600 |
| commit | 9ac1d01c7e4ba9cc1acf6ac63f3569e3706e513c (patch) | |
| tree | 574df466ea04bc9c159e0013bd8ae7cf89d5a212 /modules | |
| parent | dba4094623e7a6255d9da597933f75680733cca0 (diff) | |
fix(org-refile): skip airootfs directories to avoid permission errors
Diffstat (limited to 'modules')
| -rw-r--r-- | modules/org-refile-config.el | 17 |
1 files changed, 11 insertions, 6 deletions
diff --git a/modules/org-refile-config.el b/modules/org-refile-config.el index 1cf976d4..05450338 100644 --- a/modules/org-refile-config.el +++ b/modules/org-refile-config.el @@ -101,13 +101,18 @@ so caching improves performance from 15-20 seconds to instant." (push (cons file file-rule) new-files))))) ;; Add todo.org files from known directories + ;; Skip directories that cause permission errors (e.g., archiso airootfs) (dolist (dir (list user-emacs-directory code-dir projects-dir)) - (let* ((todo-files (directory-files-recursively - dir "^[Tt][Oo][Dd][Oo]\\.[Oo][Rr][Gg]$")) - (file-rule '(:maxlevel . 1))) - (dolist (file todo-files) - (unless (assoc file new-files) - (push (cons file file-rule) new-files))))) + (condition-case nil + (let* ((todo-files (directory-files-recursively + dir "^[Tt][Oo][Dd][Oo]\\.[Oo][Rr][Gg]$" + nil + (lambda (d) (not (string-match-p "airootfs" d))))) + (file-rule '(:maxlevel . 1))) + (dolist (file todo-files) + (unless (assoc file new-files) + (push (cons file file-rule) new-files)))) + (permission-denied nil))) ;; Silently skip permission errors ;; Update targets and cache (setq new-files (nreverse new-files)) |