From: Frederik Vanrenterghem <frederik@vanrenterghem.biz>
Date: Wed, 3 Apr 2024 13:01:04 +0000 (+0800)
Subject: Update emacs configuratie.
X-Git-Url: http://git.vanrenterghem.biz/Dotty.git/commitdiff_plain/daaf8486c1129d7e6c97bd55eac12d0d18aef9c3?ds=sidebyside

Update emacs configuratie.

- Configureer minibuffer mbv enkele packages
- Configureer dired
- Configureer denote
- Gebruik nieuw theme
---

diff --git a/emacs/.emacs.d/init.el b/emacs/.emacs.d/init.el
index a72a016..8b56c18 100644
--- a/emacs/.emacs.d/init.el
+++ b/emacs/.emacs.d/init.el
@@ -4,8 +4,14 @@
 ;; You may delete these explanatory comments.
 (package-initialize)
 
+(add-to-list 'load-path "~/.emacs.d/lisp/")
+
 ;; Use a dark theme now
-(load-theme 'wheatgrass)
+;(load-theme 'wheatgrass)
+
+;; Use light theme
+;;(load-theme 'leuven t)
+(load-theme 'modus-operandi t)
 
 ;; ESS - for working in R
 (autoload 'R-mode "ess-site.el" "Major mode for editing R source." t)
@@ -50,7 +56,8 @@
       ("\\.R\\'" . R-mode)
       ("\\.org\\'" . org-mode)
       ("\\.sh\\'" . shell-script-mode)
-      ("\\.hs\\'" . haskell-mode)))
+      ("\\.hs\\'" . haskell-mode)
+      ("\\.el\\'" . emacs-lisp-mode)))
 
 ;; Enable the melpa archive for packages
 (require 'package)
@@ -66,9 +73,12 @@
  ;; Your init file should contain only one such instance.
  ;; If there is more than one, they won't work right.
  '(browse-url-browser-function 'browse-url-firefox)
+ '(custom-safe-themes
+   '("0cf95236abcf59e05b1ea69b4edd53d293a5baec4fe4c3484543fee99bfd2204" "80b00f3bf7cdbdca6c80aadfbbb03145f3d0aacf6bf2a559301e61109954e30a" default))
+ '(denote-directory "/home/frederik/Nextcloud/notes/" t)
  '(org-export-backends '(ascii html icalendar latex md odt))
  '(package-selected-packages
-   '(haskell-mode julia-mode elfeed-protocol ack company magit auctex lsp-mode elpy ## org htmlize leuven-theme lua-mode ess-smart-underscore ess-R-data-view ess)))
+   '(ftable flx nerd-icons-dired nerd-icons all-the-icons-dired marginalia vertico denote ox-rss org-ql org-contrib mustache org-static-blog haskell-mode julia-mode elfeed-protocol ack company magit auctex lsp-mode elpy ## org htmlize leuven-theme lua-mode ess-smart-underscore ess-R-data-view ess)))
 (custom-set-faces
  ;; custom-set-faces was added by Custom.
  ;; If you edit it by hand, you could mess it up, so be careful.
@@ -118,3 +128,41 @@
       mu4e-drafts-folder "/Drafts"
       mu4e-trash-folder  "/Trash")
 	       
+;; Load configuration for website
+;(load "mustache-html")
+
+;; Denote config
+(setq denote-directory "/home/frederik/Nextcloud/notes/")
+
+;; Dired configuration
+(with-eval-after-load 'dired
+  (require 'dired-x)
+  ;; Set dired-x global variables here.  For example:
+  ;; (setq dired-x-hands-off-my-keys nil)
+  )
+(add-hook 'dired-mode-hook
+          (lambda ()
+            ;; Set dired-x buffer-local variables here.
+            (dired-omit-mode 1)
+	    (dired-hide-details-mode 1)
+	    (nerd-icons-dired-mode 1)
+            ))
+(setq delete-by-moving-to-trash t)
+(setq dired-guess-shell-alist-user
+      '(("\\.\\(png\\|jpe?g\\|tiff\\)" "feh" "xdg-open")
+        ("\\.\\(mp[34]\\|m4a\\|ogg\\|flac\\|webm\\|mkv\\)" "mpv" "xdg-open")
+		(".*" "xdg-open")))
+
+;; Use `vertico' package to get a vertical view of the minibuffer.
+(setq vertico-resize nil)
+(vertico-mode 1)
+
+;; Use `marginalia' package.  This will display useful
+;; annotations next to entries in the minibuffer.  For example, when
+;; using M-x it will show a brief description of the command as well
+;; as the keybinding associated with it (if any).
+(marginalia-mode 1)
+
+;; Use 'winner' mode to undo and redo windows changes
+;; using C-c <left> and C-c <right>.
+(winner-mode 1)