branch: externals/taxy
commit 4fd9565bab7b8a1f3fdf669e444774ba1730c737
Author: Adam Porter <a...@alphapapa.net>
Commit: Adam Porter <a...@alphapapa.net>
Fix: (deffy) Bookmarking deffy-files
---
examples/deffy.el | 7 +++----
1 file changed, 3 insertions(+), 4 deletions(-)
diff --git a/examples/deffy.el b/examples/deffy.el
index c5f4295..83ac121 100644
--- a/examples/deffy.el
+++ b/examples/deffy.el
@@ -284,18 +284,17 @@ Interactively, with prefix, display in dedicated side
window."
(defvar bookmark-make-record-function)
-;; FIXME: Also save and use files list.
-
(defun deffy--bookmark-make-record ()
"Return a bookmark record for current Deffy buffer."
(list (concat "Deffy: %s" deffy-directory)
(cons 'directory deffy-directory)
+ (cons 'files deffy-files)
(cons 'handler #'deffy--bookmark-handler)))
(defun deffy--bookmark-handler (record)
"Show Deffy buffer for bookmark RECORD."
- (pcase-let* ((`(,_ . ,(map directory)) record))
- (deffy :project (project-current nil directory))
+ (pcase-let* ((`(,_ . ,(map directory files)) record))
+ (deffy :files files :project (project-current nil directory))
(current-buffer)))
(provide 'deffy)
