chris/emacs
1
0
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity

updating kaladins stuff

Browse source
This commit is contained in:
Chris Cochrun 2023-12-15 21:21:47 -06:00
parent 1cc7effa15
commit 45b94fd6a2
3 changed files with 41 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
README.org
View file

@ -3715,7 +3715,16 @@ Ledger mode
#'cape-abbrev))
tab-always-indent 'complete
completion-cycle-threshold t
ledger-complete-in-steps t))
ledger-complete-in-steps t)
(defun chris/ledger-clean ()
(interactive)
(when (eq major-mode #'ledger-mode)
(ledger-mode-clean-buffer)))
(add-hook 'after-save-hook #'chris/ledger-clean)
(add-hook 'ledger-reconcile-mode-hook #'(ledger-mode-clean-buffer))
:general
(general-def 'normal ledger-mode-map
"ga" 'ledger-add-transaction))
#+end_src
** MU4E

31
init.el
View file

@ -2695,7 +2695,16 @@ targets."
#'cape-abbrev))
tab-always-indent 'complete
completion-cycle-threshold t
ledger-complete-in-steps t))
ledger-complete-in-steps t)
(defun chris/ledger-clean ()
(interactive)
(when (eq major-mode #'ledger-mode)
(ledger-mode-clean-buffer)))
(add-hook 'after-save-hook #'chris/ledger-clean)
(add-hook 'ledger-reconcile-mode-hook #'(ledger-mode-clean-buffer))
:general
(general-def 'normal ledger-mode-map
"ga" 'ledger-add-transaction))
(use-package mu4e
;; :load-path "~/.guix-home/profile/share/emacs/site-lisp/mu4e/"
@ -3665,3 +3674,23 @@ interfere with the default `bongo-playlist-buffer'."
gcmh-verbose nil))
(setq warning-suppress-types '((comp)))
(custom-set-variables
;; custom-set-variables was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right.
'(ledger-reports
'(("bal Income" "ledger bal Income")
("bal" "%(binary) -f %(ledger-file) bal")
("reg" "%(binary) -f %(ledger-file) reg")
("payee" "%(binary) -f %(ledger-file) reg @%(payee)")
("account" "%(binary) -f %(ledger-file) reg %(account)")))
'(pdf-misc-print-program-args
'("-o media=Letter" "-o fitplot" "-o sides=two-sided-long-edge"))
'(pdf-misc-print-program-executable "lpr"))
(custom-set-faces
;; custom-set-faces was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right.
'(org-modern-tag ((t :background "#9aedfe" :foreground "#282a36"))))

2
templates
View file

@ -177,4 +177,4 @@ nix-mode
ledger-mode
(contribution "2022-12-01 Contributions" n> "Income:Supporters:" (p "supporter") > n> "Assets:Core")
(contribution "2023-11-01 Contributions" n> "Income:Supporters:" (p "supporter") > n> "Assets:Core")