config

commit 38c24d6cdb18fc285b0e901da94e2346ddb10aaa
parent c069101a97dfc2ffd051ebacacf3d1c5401e318b
Author: dwrz <dwrz@dwrz.net>
Date:   Tue, 31 Oct 2023 19:57:34 +0000

Update Emacs init

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

1 file changed, 12 insertions(+), 8 deletions(-)
diff --git a/emacs/init.el b/emacs/init.el
@@ -101,6 +101,7 @@
 
 ;; Packages
 ;; TODO: try corfu, vertico, consult.
+(require 'package)
 (add-to-list 'package-archives '("melpa" . "https://melpa.org/packages/") t)
 
 (use-package abbrev :ensure nil :init (abbrev-mode t))
@@ -122,9 +123,9 @@
   :ensure t)
 
 (use-package base16-theme
-  :config (setq base16-theme-256-color-source 'colors)
   :ensure t
-  :init (load-theme 'base16-tomorrow t)
+  :init (setq base16-theme-256-color-source 'colors)
+  (load-theme 'base16-tomorrow t)
   (set-face-attribute 'fringe nil :background "#ffffff"))
 
 (use-package bookmark :config (setq bookmark-save-flag 1) :ensure nil)
@@ -163,7 +164,10 @@
   :config (setq compilation-message-face 'default)
   :ensure nil)
 
-(use-package conf-mode :hook (conf-mode . rainbow-mode) :ensure nil)
+(use-package conf-mode
+  :ensure nil
+  :hook (conf-mode . rainbow-mode)
+  :requires rainbow-mode)
 
 (use-package csv-mode :mode "\\.csv\\'" :ensure t)
 
@@ -175,11 +179,10 @@
   :config (setq dired-listing-switches "-alh"
 		dired-recursive-copies 'always)
   (put 'dired-find-alternate-file 'disabled nil)
-  (dired-hide-dotfiles-mode t)
   :ensure nil)
 
 (use-package dired-hide-dotfiles
-  :config (define-key dired-mode-map (kbd ".") 'dired-hide-dotfiles-mode)
+  :bind (:map dired-mode-map ("." . dired-hide-dotfiles-mode))
   :ensure t)
 
 (use-package dired-x
@@ -375,8 +378,7 @@
 (use-package novice :disabled t :ensure nil)
 
 (use-package ol
-  :config (require 'ol-notmuch)
-  (setq org-link-frame-setup
+  :config (setq org-link-frame-setup
 	'((vm . vm-visit-folder-other-frame)
 	  (vm-imap . vm-visit-imap-folder-other-frame)
 	  (gnus . org-gnus-no-new-news)
@@ -385,7 +387,7 @@
   :defer t
   :ensure nil)
 
-(use-package ol-notmuch :defer t :ensure t)
+(use-package ol-notmuch :bind ("C-c l" . org-store-link) :defer t :ensure t)
 
 (use-package org
   :bind (:map org-mode-map
@@ -420,6 +422,7 @@
   :defer t
   :functions org-redisplay-inline-images
   :hook ((org-mode . flyspell-mode)
+	 (org-mode . (lambda () (electric-indent-local-mode -1)))
 	 (org-babel-after-execute . (lambda ()
 				      (when org-inline-image-overlays
 					(org-redisplay-inline-images)))))
@@ -535,6 +538,7 @@
 
 (use-package register
   :config (set-register ?c '(file . "~/.config/"))
+  (set-register ?c '(file . "~/org/contacts/contacts.org"))
   (set-register ?d '(file . "~/org/diary.org"))
   (set-register ?f '(file . "~/projects/finances/finances.org"))
   (set-register ?g '(file . "~/org/gtd.org"))