Default to ledger search from files with .beancount extensions

This commit is contained in:
Debanjum Singh Solanky
2022-08-05 17:33:45 +03:00
parent cc9a395e0a
commit 19c4701f3f

View File

@@ -153,7 +153,7 @@
(let ((file-extension (file-name-extension buffer-name)))
(cond
((equal buffer-name "Music.org") "music")
((equal file-extension "bean") "ledger")
((or (equal file-extension "bean") (equal file-extension "beancount")) "ledger")
((equal file-extension "org") "org")
((or (equal file-extension "markdown") (equal file-extension "md")) "markdown")
(t "org"))))