diff options
| -rw-r--r-- | .config/emacs/modules/bd--devel.el | 37 | ||||
| -rw-r--r-- | .config/emacs/modules/bd--exwm.el | 1 | ||||
| -rw-r--r-- | .config/guix/modules/services/emacs.scm | 3 |
3 files changed, 8 insertions, 33 deletions
diff --git a/.config/emacs/modules/bd--devel.el b/.config/emacs/modules/bd--devel.el index 2c6ef02..73b5969 100644 --- a/.config/emacs/modules/bd--devel.el +++ b/.config/emacs/modules/bd--devel.el @@ -145,33 +145,6 @@ Otherwise, open the repository's main page." (require 'geiser-mode) (require 'geiser-guile) -(defcustom doc-dirs '() - "Defines a buffer-local list of directories to find -documentation." - :type 'list - :group 'docs - :safe 'listp - :local t) - -(defun bd/selector-doc (dir) - "List all HTML files in a directory (recursive), and -display for opening with browser." - (selector-source-create - dir - :candidates - (-map - (lambda (d) (selector-candidate-create (file-relative-name d dir) :value d)) - (directory-files-recursively dir ".html")) - :actions - (list (lambda (x) (eww-open-file x))))) - -(defun bd/doc-finder () - (interactive) - (unwind-protect - (selector - (append (-map (lambda (x) (bd/selector-doc x)) doc-dirs) - (list (bd/selector-search)))))) - (use-package gdb-mi :config (setopt gdb-debuginfod-enable-setting nil)) @@ -179,7 +152,9 @@ display for opening with browser." (use-package eglot :defer t :hook ((c-mode . eglot-ensure) - (c++-mode . eglot-ensure)) + (c++-mode . eglot-ensure) + (python-mode . eglot-ensure) + (python-ts-mode . eglot-ensure)) :bind (:map eglot-mode-map ("C-c C-f" . eglot-format) ("C-c C-e" . eglot-rename)) @@ -188,10 +163,8 @@ display for opening with browser." eglot-prefer-plaintext t jsonrpc-event-hook nil) (add-to-list 'eglot-server-programs - '(c-mode . ("ccls" "--init={\"clang\": {\"extraArgs\": [\"-std=c++20\"]}}")))) - -(use-package cc-mode - :hook (((c-mode c++-mode) . (lambda () (setq-local doc-dirs '("~/dc/cppreference")))))) + '(c-mode . ("ccls" "--init={\"clang\": {\"extraArgs\": [\"-std=c++20\"]}}")) + '((python-mode python-ts-mode) . ("pylsp")))) (use-package rainbow-mode :hook css-mode) diff --git a/.config/emacs/modules/bd--exwm.el b/.config/emacs/modules/bd--exwm.el index c24a916..0cc510b 100644 --- a/.config/emacs/modules/bd--exwm.el +++ b/.config/emacs/modules/bd--exwm.el @@ -47,7 +47,6 @@ that buffer." ([f10] . emms-next) ([print] . bd/shoot-part) ([S-print] . bd/shoot-full) - ([?\s-I] . bd/doc-finder) ([?\s-O] . bd/browse-dispatcher) ([?\s-P] . bd/password) ([?\s-r] . exwm-reset) diff --git a/.config/guix/modules/services/emacs.scm b/.config/guix/modules/services/emacs.scm index f284cef..7e83da6 100644 --- a/.config/guix/modules/services/emacs.scm +++ b/.config/guix/modules/services/emacs.scm @@ -18,6 +18,7 @@ emacs-xyz cpp gnupg + python-xyz mail lisp) @@ -45,7 +46,9 @@ aspell-dict-en perl-image-exiftool ;; for emms + ccls ;; for eglot + python-lsp-server ;; )) |