From 184d5aa6e4d594b044a62e15b6eab084da0abb29 Mon Sep 17 00:00:00 2001 From: Mathieu Marques Date: Fri, 12 Mar 2021 19:45:18 +0100 Subject: [PATCH 2/2] * lisp/emacs-lisp/eldoc.el (eldoc--format-doc-buffer): Allow custom separator --- lisp/emacs-lisp/eldoc.el | 13 ++++++++++++- 1 file changed, 12 insertions(+), 1 deletion(-) diff --git a/lisp/emacs-lisp/eldoc.el b/lisp/emacs-lisp/eldoc.el index 485ea26379..93cb6e7df5 100644 --- a/lisp/emacs-lisp/eldoc.el +++ b/lisp/emacs-lisp/eldoc.el @@ -129,6 +129,13 @@ window. If the value is the symbol `maybe', then the echo area is only skipped if the documentation doesn't fit there." :type 'boolean) +(defcustom eldoc-documentation-separator "" + "Separator to use between each documentation thing, when multiple." + :type 'string) + +(defface eldoc-documentation-separator '((t (:extend t :inherit shadow))) + "Face to use for the separator between documentation things.") + (defface eldoc-highlight-function-argument '((t (:inherit bold))) "Face used for the argument at point in a function's argument list. @@ -490,7 +497,11 @@ This holds the results of the last documentation request." ": " this-doc)) do (insert this-doc) - when rest do (insert "\n") + when rest + do (insert (concat + "\n" + (propertize eldoc-documentation-separator + 'face 'eldoc-documentation-separator))) finally (goto-char (point-min))) ;; Rename the buffer, taking into account whether it was ;; hidden or not -- 2.30.1