From 43fcc18a256823e093a3aea795451f71e795c553 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Fri, 24 Aug 2007 02:30:59 +0000 Subject: [PATCH] Nikolaj Schumacher (tiny change) (eldoc-highlight-function-argument): New face. (eldoc-highlight-function-argument): Use it. --- lisp/emacs-lisp/eldoc.el | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/emacs-lisp/eldoc.el b/lisp/emacs-lisp/eldoc.el index 8b2538d299c..1d2441f884a 100644 --- a/lisp/emacs-lisp/eldoc.el +++ b/lisp/emacs-lisp/eldoc.el @@ -101,6 +101,11 @@ truncated to make more of the arglist or documentation string visible." enable argument list to fit on one line" truncate-sym-name-if-fit)) :group 'eldoc) +(defface eldoc-highlight-function-argument + '((t (:inherit bold))) + "Face used for the argument at point in a function's argument list." + :group 'eldoc) + ;;; No user options below here. (defvar eldoc-message-commands-table-size 31 @@ -303,7 +308,7 @@ highlights argument number INDEX. " In the absence of INDEX, just call `eldoc-docstring-format-sym-doc'." (let ((start nil) (end 0) - (argument-face 'bold)) + (argument-face 'eldoc-highlight-function-argument)) ;; Find the current argument in the argument string. We need to ;; handle `&rest' and informal `...' properly. ;; -- 2.39.2