dotfiles

commit 91bcedc830d16d1722f7db634f22841601a0b5a0
parent 5803cdbd0d96016ca99f67aa9f759baeb7231b0d
Author: Alex Balgavy <alexander.balgavy@spaceapplications.com>
Date:   Fri, 17 May 2024 11:04:43 +0200

emacs: misc config

Diffstat:
M
emacs/config.org
 | 
39
++++++++++++++++++++++++++++++++-------
M
emacs/jokull-theme.el
 | 
5
++---

2 files changed, 34 insertions(+), 10 deletions(-)
diff --git a/emacs/config.org b/emacs/config.org
@@ -666,15 +666,18 @@ Some functions to start/stop syncthing.
            (delete-other-windows)
            (setq-local za/tmp/mode-line-format mode-line-format)
            (setq-local mode-line-format nil)
+           (setq-local za/tmp/internal-border-width (frame-parameter nil 'internal-border-width))
+           (set-frame-parameter nil 'internal-border-width 20)
            (setq-local za/no-distractions t)
            (message "Window configuration stored in register W"))
           (za/no-distractions
-           (olivetti-mode 0)
+           (set-frame-parameter nil 'internal-border-width za/tmp/internal-border-width)
            (line-number-mode 0)
            (display-line-numbers-mode 1)
            (setq-local mode-line-format za/tmp/mode-line-format)
-           (setq-local za/no-distractions nil)
-           (jump-to-register ?w))))
+           (jump-to-register ?w)
+           (olivetti-mode 0)
+           (setq-local za/no-distractions nil))))
 #+end_src
 * Interface
 ** Theme
@@ -1457,7 +1460,8 @@ Prism changes the color of text depending on their depth. Makes it easier to see
 #+end_src
 ** olivetti: distraction-free writing
 #+begin_src emacs-lisp
-  (use-package olivetti)
+  (use-package olivetti
+    :diminish)
 #+end_src
 ** nov.el: EPUB support
 #+begin_src emacs-lisp
@@ -1528,6 +1532,16 @@ Gives ideas for phrases to use in academic writing.
     :custom-face
     (highlight-indent-guides-character-face ((t (:foreground "#adadad")))))
 #+end_src
+** cc-avy
+#+begin_src emacs-lisp
+  (use-package cc-avy
+    :ensure nil ; local
+    :bind ("C-M-:" . cc/avy-menu))
+#+end_src
+** annotate
+#+begin_src emacs-lisp
+  (use-package annotate)
+#+end_src
 * Mode/language specific packages
 ** Org
 *** Custom functions
@@ -1691,7 +1705,8 @@ Install Org and require additional components that I use.
     ;; Tempo expansions
     (add-to-list 'org-structure-template-alist '("se" . "src emacs-lisp"))
     (add-to-list 'org-structure-template-alist '("sb" . "src bibtex"))
-    (add-to-list 'org-structure-template-alist '("ss" . "src sh")))
+    (add-to-list 'org-structure-template-alist '("ss" . "src sh"))
+    (add-to-list 'org-structure-template-alist '("sy" . "src yaml")))
 #+end_src
 *** Agenda & GTD
 **** Agenda mode settings
@@ -3091,8 +3106,6 @@ See discussion here: https://github.com/ledger/ledger/issues/1450#issuecomment-3
     :custom
     (dired-listing-switches "-alhv")
     (dired-dwim-target t "If I have another dired window open, use that as target")
-    (dired-omit-files
-        (concat dired-omit-files "\\|^\\..+$"))
     ;; By default, hide details (show again by pressing oparen):
     :hook (dired-mode . dired-hide-details-mode))
 #+end_src
@@ -3237,6 +3250,18 @@ Also, counsel doesn't provide some keybindings that I can get from helpful.
   (use-package casual
     :bind (:map calc-mode-map ("C-o" . 'casual-main-menu)))
 #+end_src
+** casual-dired
+#+begin_src emacs-lisp
+  (use-package casual-dired
+    :bind (:map dired-mode-map
+                ("C-o" . 'casual-dired-tmenu)
+                ("C-u C-o" . 'dired-display-file)))
+#+end_src
+
+** json
+#+begin_src emacs-lisp
+  (use-package json-mode)
+#+end_src
 * Override some faces
 #+begin_src emacs-lisp
   (with-eval-after-load 'org-faces
diff --git a/emacs/jokull-theme.el b/emacs/jokull-theme.el
@@ -82,6 +82,7 @@
         `(minibuffer-prompt ((,class (:bold t :foreground ,keyword))))
         `(default-italic ((,class (:italic t))))
 	`(link ((,class (:foreground ,const :underline t))))
+        `(calendar-today ((,class (:inherit font-lock-keyword-face))))
 	`(org-code ((,class (:foreground "#005f87"))))
 	`(org-hide ((,class (:foreground ,bg1))))
         `(org-level-1 ((,class (:bold t :foreground ,fg2 :height 1.1))))
@@ -246,9 +247,7 @@
         `(jde-java-font-lock-constant-face ((t (:foreground ,const))))
         `(jde-java-font-lock-modifier-face ((t (:foreground ,fg2))))
         `(jde-jave-font-lock-protected-face ((t (:foreground ,keyword))))
-        `(jde-java-font-lock-number-face ((t (:foreground ,var))))
-
-        )
+        `(jde-java-font-lock-number-face ((t (:foreground ,var)))))
   ;; emacs >= 26.1
   (when (>= emacs-major-version 26)
     (custom-theme-set-faces