awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-03 12:27:26 -05:00
Code Issues Packages Projects Releases Wiki Activity

lang/ledger: don't error if ledger isn't installed

Browse Source
This commit is contained in:
Henrik Lissner
2018-08-20 23:33:29 +02:00
parent ce4891ea0d
commit a6f575ab1d
1 changed files with 7 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
modules/lang/ledger/config.el
View File

@ -3,6 +3,13 @@
;; `ledger-mode' ;; `ledger-mode'
(setq ledger-clear-whole-transactions 1) (setq ledger-clear-whole-transactions 1)
(defun +ledger*check-version (orig-fn)
"Fail gracefully if ledger binary isn't available."
(if (executable-find ledger-binary-path)
(funcall orig-fn)
(message "Couldn't find '%s' executable" ledger-binary-path)))
(advice-add #'ledger-check-version :around #'+ledger*check-version)
;; Restore leader key in ledger reports ;; Restore leader key in ledger reports
(after! ledger-mode (after! ledger-mode
(define-key! (ledger-report-mode-map ledger-reconcile-mode-map) (define-key! (ledger-report-mode-map ledger-reconcile-mode-map)