config

commit 4eb1520c7de27ed3f7e53db5bd38d97b98bf0f5b
parent 6fc7b3cb6d259763abcec5297c1f460ca69662ef
Author: dwrz <dwrz@dwrz.net>
Date:   Fri, 18 Oct 2024 08:38:07 +0000

Update Emacs init

Diffstat:
M
emacs/init.el
 | 
11
++++++++---

1 file changed, 8 insertions(+), 3 deletions(-)
diff --git a/emacs/init.el b/emacs/init.el
@@ -576,7 +576,7 @@
 
   (defun dwrz-switch-org-ctx (ctx)
     "Switch org agenda context."
-    (cond ((string= ctx "all") (setq org-agenda-files (append
+    (cond ((string= ctx "") (setq org-agenda-files (append
 						       chimerical-agenda-files
 						       dwrz-agenda-files
 						       eti-agenda-files)))
@@ -587,7 +587,7 @@
 	  ((string= ctx "eti") (setq org-agenda-files eti-agenda-files))))
 
   ;; Set the default context.
-  (dwrz-switch-org-ctx "dwrz")
+  (dwrz-switch-org-ctx "")
 
   (setq org-agenda-follow-indirect nil
 	org-agenda-include-diary t
@@ -848,7 +848,11 @@
 		web-mode-engines-alist '(("go" . "\\.gohtml\\'"))
 		web-mode-indent-style 2
 		web-mode-markup-indent-offset 2)
-  :hook ((web-mode . (lambda () (setq indent-tabs-mode nil))))
+  :hook ((web-mode . (lambda ()
+                       (setq indent-tabs-mode nil)
+                       (when (string-equal
+			      "gohtml" (file-name-extension buffer-file-name))
+                         (web-mode-set-engine "go")))))
   :mode (("\\.html?\\'" . web-mode)
 	 ("\\.gohtml\\'" . web-mode))
   :ensure t)
@@ -1126,3 +1130,4 @@
 ;; KEYBINDINGS
 (global-set-key (kbd "C-z") dwrz-prefix-map)
 (global-set-key (kbd "C-;") dwrz-prefix-map)
+(global-set-key (kbd "C-,") dwrz-prefix-map)