From 0edaf6175815a8de141f08caaf5c43cfd3f2c499 Mon Sep 17 00:00:00 2001
From: Adrian Kummerlaender
Date: Sun, 26 Oct 2025 11:38:15 +0100
Subject: emacs: Symlink init.el for easier editing, tweak Org setup

---
 gui/conf/init.el | 38 ++++++++++++++++++--------------------
 gui/emacs.nix    |  2 +-
 2 files changed, 19 insertions(+), 21 deletions(-)

(limited to 'gui')

diff --git a/gui/conf/init.el b/gui/conf/init.el
index b768c84..fc5e344 100644
--- a/gui/conf/init.el
+++ b/gui/conf/init.el
@@ -201,6 +201,8 @@
   (org-icalendar-timezone "Europe/Berlin")
   (org-icalendar-use-deadline  '(event-if-not-todo event-if-todo))
   (org-icalendar-use-scheduled '(event-if-not-todo event-if-todo))
+  (org-default-priority ?D)
+  (org-lowest-priority ?D)
   :init
   (require 'org-protocol)
   (require 'ox-bibtex)
@@ -218,7 +220,8 @@
     (sequence "TALK(k)" "|" "DONE(d)")
     (sequence "MEET(e)" "|" "DONE(d)")
     (sequence "MAIL(m)" "|" "DONE(d)")
-    (sequence "IDEA(i)" "TODO(t)" "|" "DONE(d)")))
+    (sequence "IDEA(i)" "TODO(t)" "|" "DONE(d)")
+    (sequence "IDEA(i)" "PAPER(t)" "|" "DONE(d)")))
 
 (setq org-capture-templates
   '(("t" "Todo item" entry
@@ -245,6 +248,19 @@
      "* %:description\n%:link %U"
      :immediate-finish t)))
 
+(setq org-agenda-custom-commands
+  '(("p" "Priorities Dashboard"
+     ((tags-todo "+PRIORITY=\"A\""
+                 ((org-agenda-overriding-header "Top")))
+      (tags-todo "+PRIORITY=\"B\""
+                 ((org-agenda-overriding-header "Next Best")))
+      (tags-todo "+PRIORITY=\"C\""
+                 ((org-agenda-overriding-header "Sometime soon")))))
+    ("a" "Daily Agenda"
+     ((tags-todo "+PRIORITY={A}"
+                 ((org-agenda-overriding-header "Top Priorities")))
+      (agenda "" nil)))))
+
 (use-package org-fragtog
   :ensure t
   :config
@@ -253,9 +269,6 @@
 (use-package ob-async
   :ensure t)
 
-(use-package org-ql
-  :ensure t)
-
 (custom-theme-set-faces
  'user
  '(org-level-1 ((t (:family "Iosevka Aile" :weight light))))
@@ -271,11 +284,6 @@
   (setq org-bullets-bullet-list '("◉" "◉" "⤷" "⤷"))
   (add-hook 'org-mode-hook #'org-bullets-mode))
 
-;(use-package org-re-reveal
-;  :ensure t
-;  :custom
-;  (org-re-reveal-revealjs-version "4"))
-
 (use-package org-present
   :ensure t
   :config
@@ -396,9 +404,6 @@
 (use-package helm-org-rifle
   :ensure t)
 
-(use-package helm-org-ql
-  :ensure t)
-
 (defhydra hydra-org-mode (:exit t)
   "Org mode"
   ("y" org-store-link   "Store link"   :column "Links")
@@ -506,9 +511,6 @@
 (use-package rainbow-mode
   :ensure t)
 
-(use-package gnuplot
-  :ensure t)
-
 (use-package darkroom
   :ensure t
   :custom
@@ -524,12 +526,8 @@
   :init
   (evil-collection-pdf-setup))
 
-(use-package edit-server
-  :ensure t
-  :init
-  (edit-server-start))
-
 (setq browse-url-browser-function 'eww-browse-url)
+(setq browse-url-secondary-browser-function 'browse-url-firefox)
 
 (add-hook 'eshell-mode-hook
   (lambda ()
diff --git a/gui/emacs.nix b/gui/emacs.nix
index 6425ddd..92d7ae3 100644
--- a/gui/emacs.nix
+++ b/gui/emacs.nix
@@ -97,7 +97,7 @@
     org-protocol-shortcut
   ];
 
-  home.file.".emacs.d/init.el".source = ./conf/init.el;
+  home.file.".emacs.d/init.el".source = config.lib.file.mkOutOfStoreSymlink "${config.home.homeDirectory}/dotfiles/home/gui/conf/init.el";
 
   systemd.user.services.emacs.Service.ExecStart = pkgs.lib.mkForce "${pkgs.runtimeShell} -l -c 'exec emacs --fg-daemon'";
 
-- 
cgit v1.2.3