diff options
Diffstat (limited to 'tag-emacs/emacs.d/init.org')
| -rw-r--r-- | tag-emacs/emacs.d/init.org | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/tag-emacs/emacs.d/init.org b/tag-emacs/emacs.d/init.org index 3395029..054fe67 100644 --- a/tag-emacs/emacs.d/init.org +++ b/tag-emacs/emacs.d/init.org @@ -175,14 +175,14 @@ because I manage those in my [[file:~/projects/dotfiles/tag-xresources/xresource (interactive) (cond ((eq window-system 'w32) - (ap/set-fonts "Consolas" 10 "Segoe UI" 11)) + (ap/set-fonts "Consolas" 10 "Segoe UI" 11 t)) ((eq window-system 'ns) (let ((displays (string-to-number (shell-command-to-string "system_profiler SPDisplaysDataType | grep \"Online: Yes\" | wc -l")))) (if (eq displays 1) (ap/set-fonts "PT Mono" 12 "Lucide Grande" 12 t) (ap/set-fonts "Anonymous Pro" 11 "Lucida Grande" 12 nil)))) ((eq window-system 'x) - (ap/set-fonts "Source Code Pro" 10 "Input Sans" 10)))) + (ap/set-fonts "Source Code Pro" 10 "Input Sans" 10 t)))) (ap/set-fonts-according-to-system)) #+END_SRC @@ -1387,6 +1387,11 @@ works really nicely. (defun setup-ledger-mode () (setq-local indent-tabs-mode nil)) (add-hook 'ledger-mode-hook #'setup-ledger-mode) + (defun open-budget () + (interactive) + (projectile-persp-switch-project "~/Sync") + (find-file (expand-file-name "ledger/my.ledger" (projectile-project-root))) + (ledger-report "Budget (Cumulative)" nil)) (setq ledger-use-iso-dates t ledger-post-use-completion-engine :built-in ledger-reconcile-default-commodity "€" |