diff --git a/config/init.org b/config/init.org index a96e0b9..f1279ea 100644 --- a/config/init.org +++ b/config/init.org @@ -56,12 +56,14 @@ ** Show Whitespace #+begin_src emacs-lisp + (setq whitespace-style '(face tabs spaces trailing lines-tail)) + (setq whitespace-display-mappings - '((space-mark ?\ [?\u00B7] [?.]) - (tab-mark ?\t [?\u00BB ?\t]))) - - (global-whitespace-mode 1) + '((space-mark ?\ [?\u00B7] [?.]) + (tab-mark ?\t [?\u00BB ?\t]))) + (add-hook 'prog-mode-hook 'whitespace-mode) + (add-hook 'org-src-mode-hook 'whitespace-mode) (add-hook 'before-save-hook 'whitespace-cleanup) #+end_src @@ -329,22 +331,6 @@ (add-hook 'c++-mode-hook 'hide-ifdef-mode) (setq hide-ifdef-initially t) (setq hide-ifdef-shadow 'font-lock-comment-face) - - ;; Load posframe for popups - (use-package eldoc-box - :ensure t) - - (add-hook 'eglot-managed-mode-hook #'eldoc-box-hover-mode t) - (defun my/eldoc-box-post-frame-hook (frame) - (modify-frame-parameters - eldoc-box--frame - `( - (background-color . "white") - (internal-border-width . ,1) - ) - ) - ) - (add-hook 'eldoc-box-frame-hook #'my/eldoc-box-post-frame-hook) #+end_src ** Corfu Completions @@ -449,6 +435,12 @@ #+begin_src emacs-lisp (global-set-key (kbd "C-S-c") 'kill-ring-save) (global-set-key (kbd "C-S-v") 'yank) + + ;; Load posframe for popups + (use-package eldoc-box + :ensure t) + + (evil-define-key 'normal 'global (kbd "SPC k") #'eldoc-box-help-at-point) #+end_src ** Org Mode Templates @@ -462,6 +454,10 @@ (require 'org-tempo) (add-to-list 'org-modules 'org-tempo t) + + (defun org-babel-edit-prep:emacs-lisp (babel-info) + (setq-local buffer-file-name (->> babel-info caddr (alist-get :tangle))) + (lsp)) #+end_src * Tab Management