From a33f14f216695f5bf3d3a3af6f3036f673a384b2 Mon Sep 17 00:00:00 2001 From: Daniel Borchmann Date: Mon, 2 Sep 2019 12:00:26 +0200 Subject: [PATCH] =?UTF-8?q?[Misc]=20Fix=20candidate=20list=20of=20importan?= =?UTF-8?q?t=20documents=20for=20=E2=80=98db/helm-shortcuts=E2=80=99?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Now actions work again. --- init.el | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/init.el b/init.el index 88a0ac7..a9dbd69 100644 --- a/init.el +++ b/init.el @@ -658,7 +658,11 @@ With given ARG, display files in `db/important-document-path’." (let ((search-path (expand-file-name db/important-documents-path))) (helm-make-source "Important files" 'helm-source-sync :candidates (mapcar #'(lambda (file) - (string-remove-prefix search-path file)) + ;; display only relative path, + ;; but keep absolute path for + ;; actions + (cons (string-remove-prefix search-path file) + file)) (directory-files-recursively search-path "")) :action '(("Open externally" . db/system-open) ("Find file" . find-file))))))))