diff options
| author | Vineet Kumar <git@vineetk.net> | 2026-05-28 17:38:56 -0400 |
|---|---|---|
| committer | Vineet Kumar <git@vineetk.net> | 2026-06-01 12:03:11 -0400 |
| commit | c125e1deefa22992d29588673741feb9f3e108cd (patch) | |
| tree | f5af2641f58c323783ea3bd5eef1936ec81dbb82 | |
| parent | fccbf17d58388f6cc1d5192cd26e1ea92ba85a2b (diff) | |
files/emacs: indent
| -rw-r--r-- | epistemia/files/emacs/.config/emacs/init.el | 38 |
1 files changed, 19 insertions, 19 deletions
diff --git a/epistemia/files/emacs/.config/emacs/init.el b/epistemia/files/emacs/.config/emacs/init.el index ae28a8e..44d961c 100644 --- a/epistemia/files/emacs/.config/emacs/init.el +++ b/epistemia/files/emacs/.config/emacs/init.el | |||
| @@ -194,11 +194,11 @@ | |||
| 194 | ;; Replace bindings. Lazily loaded by `use-package'. | 194 | ;; Replace bindings. Lazily loaded by `use-package'. |
| 195 | :bind (;; C-c bindings in `mode-specific-map' | 195 | :bind (;; C-c bindings in `mode-specific-map' |
| 196 | ("C-c M-x" . consult-mode-command) | 196 | ("C-c M-x" . consult-mode-command) |
| 197 | ;("C-c h" . consult-history) | 197 | ;("C-c h" . consult-history) |
| 198 | ;("C-c k" . consult-kmacro) | 198 | ;("C-c k" . consult-kmacro) |
| 199 | ;("C-c m" . consult-man) | 199 | ;("C-c m" . consult-man) |
| 200 | ;("C-c i" . consult-info) | 200 | ;("C-c i" . consult-info) |
| 201 | ;([remap Info-search] . consult-info) | 201 | ;([remap Info-search] . consult-info) |
| 202 | ;; C-x bindings in `ctl-x-map' | 202 | ;; C-x bindings in `ctl-x-map' |
| 203 | ("C-x M-:" . consult-complex-command) ;; orig. repeat-complex-command | 203 | ("C-x M-:" . consult-complex-command) ;; orig. repeat-complex-command |
| 204 | ("C-x b" . consult-buffer) ;; orig. switch-to-buffer | 204 | ("C-x b" . consult-buffer) ;; orig. switch-to-buffer |
| @@ -454,10 +454,10 @@ | |||
| 454 | 'org-babel-load-languages | 454 | 'org-babel-load-languages |
| 455 | '((emacs-lisp . t) | 455 | '((emacs-lisp . t) |
| 456 | (latex . t))) | 456 | (latex . t))) |
| 457 | :config ; I have menu bar disabled, but org-agenda tries to update | 457 | :config ; I have menu bar disabled, but org-agenda tries to update |
| 458 | ; it when a new org-mode buffer is created. this leads to a | 458 | ; it when a new org-mode buffer is created. this leads to a |
| 459 | ; cryptic "Wrong type argument: keymapp, nil" (real issue | 459 | ; cryptic "Wrong type argument: keymapp, nil" (real issue |
| 460 | ; only visible via toggle-debug-on-error) | 460 | ; only visible via toggle-debug-on-error) |
| 461 | (advice-add 'easy-menu-add-item :around | 461 | (advice-add 'easy-menu-add-item :around |
| 462 | (lambda (orig map path item &optional before) | 462 | (lambda (orig map path item &optional before) |
| 463 | (when map | 463 | (when map |
| @@ -573,18 +573,18 @@ | |||
| 573 | (interactive) | 573 | (interactive) |
| 574 | (let* ((path-dirs (parse-colon-path (getenv "PATH"))) | 574 | (let* ((path-dirs (parse-colon-path (getenv "PATH"))) |
| 575 | (executables (delete-dups | 575 | (executables (delete-dups |
| 576 | (mapcan (lambda (dir) | 576 | (mapcan (lambda (dir) |
| 577 | (when (file-directory-p dir) | 577 | (when (file-directory-p dir) |
| 578 | (directory-files dir nil "^[^.]"))) | 578 | (directory-files dir nil "^[^.]"))) |
| 579 | path-dirs))) | 579 | path-dirs))) |
| 580 | (cmd (completing-read "Run: " executables nil nil))) | 580 | (cmd (completing-read "Run: " executables nil nil))) |
| 581 | (start-process-shell-command cmd nil cmd))) | 581 | (start-process-shell-command cmd nil cmd))) |
| 582 | 582 | ||
| 583 | (use-package exwm | 583 | (use-package exwm |
| 584 | :custom | 584 | :custom |
| 585 | (exwm-input-global-keys | 585 | (exwm-input-global-keys |
| 586 | `(([?\s-r] . exwm-reset) ;; s-r: Reset (to line-mode). | 586 | `(([?\s-r] . exwm-reset) ;; s-r: Reset (to line-mode). |
| 587 | ([?\s-p] . exwm-program-launcher))) ;; s-p: Launch programs. | 587 | ([?\s-p] . exwm-program-launcher))) ;; s-p: Launch programs. |
| 588 | :bind | 588 | :bind |
| 589 | (:map exwm-mode-map | 589 | (:map exwm-mode-map |
| 590 | ("C-q" . exwm-input-send-next-key)) | 590 | ("C-q" . exwm-input-send-next-key)) |
| @@ -608,12 +608,12 @@ | |||
| 608 | (if (and (save-excursion | 608 | (if (and (save-excursion |
| 609 | (goto-char (point-min)) | 609 | (goto-char (point-min)) |
| 610 | (looking-at ".*-\\*-"))) ; If there's a -*- line | 610 | (looking-at ".*-\\*-"))) ; If there's a -*- line |
| 611 | ;; First remove any existing eval, then add the new one | 611 | ;; First remove any existing eval, then add the new one |
| 612 | (modify-file-local-variable-prop-line | 612 | (modify-file-local-variable-prop-line |
| 613 | 'eval nil 'delete)) | 613 | 'eval nil 'delete)) |
| 614 | ;; Always add our eval | 614 | ;; Always add our eval |
| 615 | (add-file-local-variable-prop-line | 615 | (add-file-local-variable-prop-line |
| 616 | 'eval '(and (fboundp 'gptel-mode) (gptel-mode 1)))))) | 616 | 'eval '(and (fboundp 'gptel-mode) (gptel-mode 1)))))) |
| 617 | 617 | ||
| 618 | (use-package gptel | 618 | (use-package gptel |
| 619 | :after age ; because of ~/.authinfo.age | 619 | :after age ; because of ~/.authinfo.age |
