[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/taxy 683c559 2/2: Example: (deffy) Ignore missing files
From: |
ELPA Syncer |
Subject: |
[elpa] externals/taxy 683c559 2/2: Example: (deffy) Ignore missing files |
Date: |
Tue, 5 Oct 2021 02:57:30 -0400 (EDT) |
branch: externals/taxy
commit 683c559e3e7500886dfb5a634f9837eb004ffb0b
Author: Adam Porter <adam@alphapapa.net>
Commit: Adam Porter <adam@alphapapa.net>
Example: (deffy) Ignore missing files
When restoring a bookmarked Deffy buffer, some files might not be
present anymore, and it's better to just use ones that are present and
not signal an error.
---
examples/deffy.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/examples/deffy.el b/examples/deffy.el
index 62f8170..0352430 100644
--- a/examples/deffy.el
+++ b/examples/deffy.el
@@ -163,7 +163,7 @@ buffer."
(def-name (def) (format "%s" (cl-second (deffy-def-form def)))))
;; (when (get-buffer buffer-name)
;; (kill-buffer buffer-name))
- (setf files (cl-reduce #'cl-remove-if-not (list #'elisp-file-p
#'file-visible-p)
+ (setf files (cl-reduce #'cl-remove-if-not (list #'file-exists-p
#'elisp-file-p #'file-visible-p)
:initial-value (or files (project-files project))
:from-end t))
(unless files