Test eglot+cclp, history/forward key + exwm simulation keys

6 files changed, 27 insertions, 6 deletions

diff --git a/.config/emacs/modules/bd--devel.el b/.config/emacs/modules/bd--devel.el
index c9d2ff1..863a72a 100644
--- a/.config/emacs/modules/bd--devel.el
+++ b/.config/emacs/modules/bd--devel.el
@@ -62,6 +62,12 @@ to.")
   :custom
   (Man-notify-method 'pushy))
 
+(use-package eglot
+  :hook ((c-mode . eglot-ensure))
+  :config
+  (add-to-list 'eglot-server-programs
+               '(c-mode . ("ccls" "--init={\"clang\": {\"extraArgs\": [\"-std=c++20\"]}}"))))
+
 (use-package rainbow-mode
   :hook css-mode)
 
@@ -70,8 +76,8 @@ to.")
 ;; fix to force-load newest transient
 (use-package transient
   :load-path (lambda () (car (directory-files
-			      "/home/bdunahu/.guix-home/profile/share/emacs/site-lisp/"
-			      t "transient-"))))
+                              "/home/bdunahu/.guix-home/profile/share/emacs/site-lisp/"
+                              t "transient-"))))
 (use-package magit
   :commands magit-status
   :custom
diff --git a/.config/emacs/modules/bd--exwm-windowing.el b/.config/emacs/modules/bd--exwm-windowing.el
index ab5b243..cfacf28 100644
--- a/.config/emacs/modules/bd--exwm-windowing.el
+++ b/.config/emacs/modules/bd--exwm-windowing.el
@@ -84,7 +84,9 @@ that buffer."
      ([?\C-y] . [C-v])
      ([?\M-d] . [C-delete])
      ([?\M-b] . [C-left])
-     ([?\M-f] . [C-right]))))
+     ([?\M-f] . [C-right])
+     ([?\H-b] . [M-left])
+     ([?\H-f] . [M-right]))))
 
 (setopt tab-bar-select-tab-modifiers '(super))
 
diff --git a/.config/emacs/modules/bd--org.el b/.config/emacs/modules/bd--org.el
index bb589ef..fc24f14 100644
--- a/.config/emacs/modules/bd--org.el
+++ b/.config/emacs/modules/bd--org.el
@@ -22,13 +22,16 @@ each org file open."
     (org-latex-preview '(16)))
   (add-hook 'org-mode-hook 'bd/org-mode-setup-hook)
 
+  (plist-put org-format-latex-options :scale 1.2)
+
   (org-babel-do-load-languages
    'org-babel-load-languages
    '((emacs-lisp . t)
      (shell . t)
      (lisp . t)
      (scheme . t)
-     (dot . t)))
+     (dot . t)
+     (python . t)))
 
   (advice-add 'org-refile :after 'org-save-all-org-buffers)
   :custom
@@ -42,6 +45,7 @@ each org file open."
   (org-deadline-warning-days 7)
   (org-log-done 'time)
   (org-log-into-drawer "history")
+  (org-babel-python-command "python3")
 
   (org-todo-keywords
    '((sequence "TODO(t)" "NEXT(n!)" "HOLD(h!)" "|" "DONE(d)" "CANC(c)")))
diff --git a/.config/emacs/modules/bd--tabs.el b/.config/emacs/modules/bd--tabs.el
index 3bdf282..5ee4007 100644
--- a/.config/emacs/modules/bd--tabs.el
+++ b/.config/emacs/modules/bd--tabs.el
@@ -11,6 +11,8 @@
   (display-time-default-load-average nil))
 
 (use-package tab-bar
+  :bind (("H-f" . tab-bar-history-forward)
+         ("H-b" . tab-bar-history-back))
   :config
   (defun bd/get-mode-line-modes (buffer)
     (with-current-buffer buffer
diff --git a/.config/guix/modules/base.scm b/.config/guix/modules/base.scm
index 581b79b..edad2a1 100644
--- a/.config/guix/modules/base.scm
+++ b/.config/guix/modules/base.scm
@@ -54,6 +54,7 @@
  package-management ;; stow
  password-utils ;; pass-otp, password-store
  pdf ;; xpdf, pdfgrep
+ python ;; python
  rsync ;; rsync
  screen ;; screen
  rust-apps ;; ripgrep
@@ -90,6 +91,7 @@
    netcat
    nsxiv
    pdfgrep
+   python
    recutils
    ripgrep
    rsync
diff --git a/.config/guix/modules/emacs.scm b/.config/guix/modules/emacs.scm
index 8d46f54..0bbade1 100644
--- a/.config/guix/modules/emacs.scm
+++ b/.config/guix/modules/emacs.scm
@@ -17,8 +17,11 @@
   #:export (bd-home-emacs-service-type))
 
 (use-package-modules
- aspell emacs-xyz
- mail lisp)
+ aspell
+ emacs-xyz
+ cpp
+ mail
+ lisp)
 
 
 (define (bd-emacs-package-list config)
@@ -45,6 +48,8 @@
 
    aspell
    aspell-dict-en
+
+   ccls
    ))