From 1b0e0ce333bae2d3befa2d15551dd2cd77b3dc3c Mon Sep 17 00:00:00 2001 From: jao Date: Thu, 27 Nov 2025 12:34:12 +0000 Subject: eldoc nits --- custom/jao-custom-programming.el | 25 +++++++++++++++++++++++-- init.el | 20 -------------------- 2 files changed, 23 insertions(+), 22 deletions(-) diff --git a/custom/jao-custom-programming.el b/custom/jao-custom-programming.el index fb98314..925c2f0 100644 --- a/custom/jao-custom-programming.el +++ b/custom/jao-custom-programming.el @@ -1,6 +1,26 @@ ;; -*- lexical-binding: t -*- ;;; Tools +;;;; eldoc +(use-package eldoc + :init (setq eldoc-minor-mode-string nil + eldoc-idle-delay 0.1 + eldoc-echo-area-display-truncation-message nil + eldoc-echo-area-use-multiline-p 5 + eldoc-echo-area-prefer-doc-buffer 'maybe + eldoc-display-functions '(eldoc-display-in-echo-area)) + :config (global-eldoc-mode 1)) + +(defun jao-eldoc-toggle () + "Toggle eldoc's documentation buffer." + (interactive) + (let ((buffer (eldoc-doc-buffer))) + (if-let (w (and buffer (get-buffer-window buffer))) + (delete-window w) + (eldoc-doc-buffer t)))) + +(jao-define-attached-buffer "\\*eldoc\\( .*\\)?\\*" 12) + ;;;; automatic modes (add-to-list 'auto-mode-alist '("\\.mix\\'" . hexl-mode)) (add-to-list 'auto-mode-alist '("\\.m4\\'" . m4-mode)) @@ -35,8 +55,9 @@ (use-package eglot :init ;; (setq eglot-ignored-server-capabilites '(:inlayHintProvider)) (defun jao-eglot-managed-mode-hook () - (flymake-mode -1) - (eglot-inlay-hints-mode -1)) + (flymake-mode 1) + (eglot-inlay-hints-mode -1) + (setq-local eldoc-display-functions '(eldoc-display-in-buffer))) :config :hook (eglot--managed-mode . jao-eglot-managed-mode-hook) :bind (:map eglot-mode-map (("C-h ." . jao-eldoc-toggle)))) diff --git a/init.el b/init.el index 041bb34..84d5ae5 100644 --- a/init.el +++ b/init.el @@ -468,24 +468,6 @@ ("C-h C-k" . find-function-on-key) ("C-h C-l" . find-library))) -;;;; eldoc -(use-package eldoc - :init (setq eldoc-minor-mode-string nil - eldoc-idle-delay 0.1 - eldoc-echo-area-display-truncation-message nil - eldoc-echo-area-use-multiline-p 5 - eldoc-echo-area-prefer-doc-buffer 'maybe - eldoc-display-functions '(eldoc-display-in-echo-area)) - :config (global-eldoc-mode 1)) - -(defun jao-eldoc-toggle () - "Toggle eldoc's documentation buffer." - (interactive) - (let ((buffer (eldoc-doc-buffer))) - (if-let (w (and buffer (get-buffer-window buffer))) - (delete-window w) - (eldoc-doc-buffer t)))) - ;;;; bookmarks (setq bookmark-default-file "~/.emacs.d/emacs.bmk" bookmark-fringe-mark nil) @@ -955,8 +937,6 @@ (add-to-list 'display-buffer-alist (jao-attached-buffer-entry name-rx height))) -(jao-define-attached-buffer "\\*eldoc\\( .*\\)?\\*" 0.33) - ;;;; same mode (defun jao-buffer-same-mode (&optional mode pre-fn switch-fn) (interactive) -- cgit v1.2.3