From 66c5ef25cf4dd973503f591db70ab9f446d5e90b Mon Sep 17 00:00:00 2001 From: Jakub Date: Tue, 28 Oct 2025 09:12:38 +0800 Subject: [PATCH 1/6] Fix an issue with eglot and projects.el loading --- init.el | 5 +++++ userland/{projects.el => theurgy-projects.el} | 6 +++--- 2 files changed, 8 insertions(+), 3 deletions(-) rename userland/{projects.el => theurgy-projects.el} (94%) diff --git a/init.el b/init.el index d86cad3..939d5a9 100644 --- a/init.el +++ b/init.el @@ -50,6 +50,11 @@ (require 'use-package-ensure) (setq use-package-always-ensure t) +;; TODO: https://github.com/joaotavora/eglot/discussions/1436 +(use-package eglot + :defer t) +(require 'project) + ;; TODO: https://github.com/joaotavora/eglot/discussions/1487 (use-package eldoc :straight (:type built-in)) (use-package org :straight (:type built-in)) diff --git a/userland/projects.el b/userland/theurgy-projects.el similarity index 94% rename from userland/projects.el rename to userland/theurgy-projects.el index 189b159..0a34740 100644 --- a/userland/projects.el +++ b/userland/theurgy-projects.el @@ -1,4 +1,4 @@ -;;; projects.el --- Project management configuration with whaler -*- lexical-binding: t -*- +;;; theurgy-projects.el --- Project management configuration with whaler -*- lexical-binding: t -*- ;; This file is not part of GNU Emacs @@ -75,6 +75,6 @@ This returns nil if no project is found." (interactive) (customize-group 'whaler)) -(provide 'projects) +(provide 'theurgy-projects) -;;; projects.el ends here +;;; theurgy-projects.el ends here From ed7f0479fac1d2b76686923153f9fbac5455d8bb Mon Sep 17 00:00:00 2001 From: Jakub Date: Tue, 28 Oct 2025 09:12:55 +0800 Subject: [PATCH 2/6] Fix function names for nm --- userland/system-util.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/userland/system-util.el b/userland/system-util.el index 49403c7..e7eb22e 100644 --- a/userland/system-util.el +++ b/userland/system-util.el @@ -56,7 +56,7 @@ ["Networking" ("d" "Dashboard" nm-ui-dashboard) ("S" "Status" nm-status) ("w" "WiFi Browser" nm-ui-wifi-list) - ("c" "Connections" nm-ui-connections)] + ("c" "Connections" nm-ui-connections-list)] ["Bluetooth" ("l" "List Devices" bluetooth-list-devices)]) (define-key global-map (kbd "C-c o s") #'system-interactions-transient)) From 40790fde5a76ea2d77fe209737aa652a352d2de8 Mon Sep 17 00:00:00 2001 From: Jakub Date: Tue, 28 Oct 2025 09:13:06 +0800 Subject: [PATCH 3/6] Set geiser next to the bottom terminal --- window-utils.el | 2 +- workflows/lisp-custom.el | 8 +++++++- 2 files changed, 8 insertions(+), 2 deletions(-) diff --git a/window-utils.el b/window-utils.el index 973b49d..f6a34f7 100644 --- a/window-utils.el +++ b/window-utils.el @@ -39,7 +39,7 @@ ;; left, top, right, bottom (setq window-sides-slots (if (equal system-type 'android) '(1 1 0 1) - '(5 1 5 1))) + '(5 1 5 2))) (add-to-list 'display-buffer-alist `("\\*Help\\*" diff --git a/workflows/lisp-custom.el b/workflows/lisp-custom.el index 17e404d..e554463 100644 --- a/workflows/lisp-custom.el +++ b/workflows/lisp-custom.el @@ -45,7 +45,13 @@ (use-package geiser) (use-package geiser-chicken - :after (geiser)) + :after (geiser) + :config (add-to-list 'display-buffer-alist + '("\\*Geiser" + (display-buffer-in-side-window) + (side . bottom) + (slot . 1) + (window-height . 0.2)))) ;; SICP my beloved (use-package sicp From 864c494037d05a41b419854bf37b2b69d631bc69 Mon Sep 17 00:00:00 2001 From: Jakub Date: Tue, 28 Oct 2025 09:13:25 +0800 Subject: [PATCH 4/6] Support yaml in .yaml files --- workflows/config-custom.el | 1 + 1 file changed, 1 insertion(+) diff --git a/workflows/config-custom.el b/workflows/config-custom.el index b8fc12b..b657cbf 100644 --- a/workflows/config-custom.el +++ b/workflows/config-custom.el @@ -26,6 +26,7 @@ (use-package yaml-mode :config (add-to-list 'auto-mode-alist '("\\.yml\\'" . yaml-mode)) + (add-to-list 'auto-mode-alist '("\\.yaml\\'" . yaml-mode)) (add-hook 'yaml-mode-hook '(lambda () (define-key yaml-mode-map "\C-m" 'newline-and-indent)))) From d33bf6d36e8a6478c967354ed7b6d2fb522fc8fc Mon Sep 17 00:00:00 2001 From: Jakub Date: Tue, 28 Oct 2025 09:13:34 +0800 Subject: [PATCH 5/6] Don't open org-roam-ui on start for real, and mermaid support --- workflows/org-custom.el | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/workflows/org-custom.el b/workflows/org-custom.el index 67d9c1d..1a65a6e 100644 --- a/workflows/org-custom.el +++ b/workflows/org-custom.el @@ -647,7 +647,8 @@ :config (setq org-roam-ui-sync-theme t org-roam-ui-follow t - org-roam-ui-update-on-save t)) + org-roam-ui-update-on-save t + org-roam-ui-open-on-start nil)) ;; Bibliography stuff (setq bibtex-dialect 'biblatex) ;; Use biblatex instead of bibtex. @@ -687,10 +688,15 @@ :type git :host github :repo "hasu/emacs-ob-racket" :files ("*.el" "*.rkt"))) +;; Mermaid support, for graphing +(use-package mermaid-mode) +(use-package ob-mermaid) + (org-babel-do-load-languages 'org-babel-load-languages '((emacs-lisp . t) (racket . t) + (mermaid . t) )) ;;; LaTeX configuration From a93fa78c4faa82f94c46d2e63d210a0347d31c28 Mon Sep 17 00:00:00 2001 From: Jakub Date: Tue, 28 Oct 2025 09:13:58 +0800 Subject: [PATCH 6/6] Add PL/SQL support --- workflows/sql-custom.el | 30 ++++++++++++++++++++++++++++++ 1 file changed, 30 insertions(+) create mode 100644 workflows/sql-custom.el diff --git a/workflows/sql-custom.el b/workflows/sql-custom.el new file mode 100644 index 0000000..5297a5a --- /dev/null +++ b/workflows/sql-custom.el @@ -0,0 +1,30 @@ +;;; sql-custom.el --- Custom SQL configuration -*- lexical-binding: t -*- + +;; This file is not part of GNU Emacs + +;; This program is free software: you can redistribute it and/or modify +;; it under the terms of the GNU General Public License as published by +;; the Free Software Foundation, either version 3 of the License, or +;; (at your option) any later version. + +;; This program is distributed in the hope that it will be useful, +;; but WITHOUT ANY WARRANTY; without even the implied warranty of +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;; GNU General Public License for more details. + +;; You should have received a copy of the GNU General Public License +;; along with this program. If not, see . + + +;;; Commentary: + +;; commentary + +;;; Code: + +;; PL/SQL Support +(use-package plsql) + +(provide 'sql-custom) + +;;; sql-custom.el ends here