diff options
| author | Timo Wilken | 2022-11-25 00:08:56 +0100 |
|---|---|---|
| committer | Timo Wilken | 2022-11-25 00:08:56 +0100 |
| commit | 2a28af9c2d80a35e13aecbc4b0114a70dd1c74da (patch) | |
| tree | e2cb942b52b0290b9aea3187f22e12f821d8d369 /emacs-init.el | |
| parent | 15eaa0b85def45855cc6c67bf7a323335bf94440 (diff) | |
Improve ledger editing support in Emacs
Diffstat (limited to 'emacs-init.el')
| -rw-r--r-- | emacs-init.el | 28 |
1 files changed, 25 insertions, 3 deletions
diff --git a/emacs-init.el b/emacs-init.el index c3ca5b56..635cf44d 100644 --- a/emacs-init.el +++ b/emacs-init.el @@ -151,7 +151,7 @@ :bind-keymap ("<leader>g" . vc-prefix-map)) (use-package company - :hook prog-mode + :hook (prog-mode ledger-mode) ;; Use TAB for selecting completions. Config from: ;; https://github.com/company-mode/company-mode/blob/master/company-tng.el :bind (:map company-active-map @@ -217,8 +217,6 @@ ;; Non-LSP language modes. (use-package mmm-mode :commands (mmm-mode)) -(use-package ledger-mode - :mode (rx ".journal" eos)) (use-package cmake-mode :mode (rx (or (: (or bos "/") "CMakeLists.txt") ".cmake") eos)) (use-package puppet-mode @@ -234,6 +232,19 @@ (use-package graphviz-dot-mode :mode (rx ".dot" eos) :custom (graphviz-dot-view-command "xdot %s" "Use xdot for previewing graphviz files.")) +(use-package tcl + :mode ((rx ".tcl" eos) . tcl-mode) + :magic ((rx "#%Module1.0") . tcl-mode)) + +(use-package ledger-mode + :mode (rx ".journal" eos) + :custom + (ledger-default-date-format ledger-iso-date-format "Use hledger-style dates.") + (ledger-reconcile-default-date-format ledger-iso-date-format "Use hledger-style dates.") + (ledger-reconcile-default-commodity "€" "Make euros the default currency.") + (ledger-post-account-alignment-column 2 "Use 2-space indents.") + (ledger-post-amount-alignment-at :decimal "Align amounts at decimal points/commas.") + (ledger-post-amount-alignment-column 52 "Align amounts' decimal points to the 52nd column.")) (use-package geiser :after (evil) @@ -253,6 +264,17 @@ (use-package geiser-guile :after (geiser)) +;; Org-mode +(use-package org) +(use-package org-babel + :after (org)) + +(use-package outline + :commands (outline-mode outline-minor-mode) + :custom + ;; Mirror the default "C-c @" binding for `outline-minor-mode'. + (outline-minor-mode-prefix (kbd "<localleader>@") "Use localleader for `outline-minor-mode' keybindings.")) + ;; My own custom packages, and stuff that isn't on MELPA. ;; (use-package actionlint ; TODO: port to flymake ;; :after (flycheck) |