From f01b03a73fb933a1cdc1889effefef5d897a07db Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Johan=20Thor=C3=A9n?= Date: Sun, 9 Feb 2020 14:32:19 +0100 Subject: [PATCH 1/2] Fix list passed as argument to executable-find Previously, a list would be passed as an argument to 'executable-find' in '+ledger--check-version-a'. This instead passes "hledger" as an argument if found, else "ledger". --- modules/lang/ledger/config.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/modules/lang/ledger/config.el b/modules/lang/ledger/config.el index ff3453be3..597fe9c4e 100644 --- a/modules/lang/ledger/config.el +++ b/modules/lang/ledger/config.el @@ -8,7 +8,8 @@ :config (setq ledger-binary-path - (or (cl-delete-if-not #'executable-find (list "hledger" "ledger")) + (if (executable-find "hledger") + "hledger" "ledger")) (defadvice! +ledger--check-version-a (orig-fn) From f4d5953be5694ff6556c4941061362681a5e5689 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Sun, 9 Feb 2020 14:55:44 -0500 Subject: [PATCH 2/2] Fix indentation --- modules/lang/ledger/config.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/modules/lang/ledger/config.el b/modules/lang/ledger/config.el index 597fe9c4e..c516e7bfe 100644 --- a/modules/lang/ledger/config.el +++ b/modules/lang/ledger/config.el @@ -10,7 +10,7 @@ (setq ledger-binary-path (if (executable-find "hledger") "hledger" - "ledger")) + "ledger")) (defadvice! +ledger--check-version-a (orig-fn) "Fail gracefully if ledger binary isn't available."