Re: Permanently increase size of minibuffer / echo area
Jean Louis <[email protected]> Sun, 31 May 2026 14:32:18 +0300
| Newsgroups | gmane.emacs.help |
|---|---|
| Organization | GNU Support |
| Message-ID | <[email protected]> |
Thanks Eli, good if we could get isolated face for minibuffer, so that
it can be increased, and in addition to number of lines.
So far I am using this method to get it increased:
(defun rcd-ask (&optional prompt initial-input default-value
auto-initial-input)
"Modified function `read-string'.
This is shorter, simpler function that generates the prompt
automatically, generates history variable automatically and
inherits the input method. The input will be returned trimmed."
(let* ((prompt (or prompt "Input data: "))
(history (rcd-ask-history-variable prompt))
(initial-input (cond (auto-initial-input (car (symbol-value history)))
(initial-input initial-input)))
(input (minibuffer-with-setup-hook 'rcd-minibuffer-text-scale-adjust
(read-string prompt initial-input history default-value t)))
(input (string-trim input)))
input))
whereby the line:
(input (minibuffer-with-setup-hook 'rcd-minibuffer-text-scale-adjust
(read-string prompt initial-input history default-value t)))
uses:
(defun rcd-minibuffer-text-scale-adjust ()
"Adjust text scale with prompt proportionally larger."
(let ((scale rcd-minibuffer-text-scale-adjust))
;; Prompt: scale MORE than the text
(face-remap-add-relative 'minibuffer-prompt
:height (- scale 0.2) ; Prompt is 0.2
larger
:weight 'bold)
;; Text: base scale
(text-scale-increase scale)))
and
(defcustom rcd-minibuffer-text-scale-adjust 1.5
"The RCD Notes text scale adjustment for minibuffer."
:group 'rcd
:type 'number)
That way I always get somewhat increased minibuffer prompt and text.
I would really like if possible to get:
- prompt text face, to be customizable;
- input text face to be customizable;
- number of line to be customizable;
--
Jean Louis