From f48f46fe1fb69d8fb0e019cec2410a45e37c6e26 Mon Sep 17 00:00:00 2001
From: pupbrained <mars@pupbrained.xyz>
Date: Wed, 2 Oct 2024 15:33:38 -0400
Subject: [PATCH] this is so confusign :sob:

---
 config/init.org | 36 ++++++++++++++++--------------------
 1 file changed, 16 insertions(+), 20 deletions(-)

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