Re: Increase text size of the minibuffer

(defcustom rcd-minibuffer-text-scale-adjust 1.5
   "The RCD Notes text scale adjustment for minibuffer."
   :group 'rcd
   :type 'number)

(defun rcd-minibuffer-text-scale-adjust ()
   "Adjust text scale with prompt proportionally larger."
   (let ((scale rcd-minibuffer-text-scale-adjust))
     (face-remap-add-relative 'minibuffer-prompt
                             :height (- scale 0.2)  ; Prompt is 0.2 
larger
                             :weight 'bold)
     ;; Text: base scale
     (text-scale-increase scale)))

(defun rcd-ask (&optional prompt)
   "Read a string with larger minibuffer text."
   (let ((prompt (or prompt "Input data: ")))
     (string-trim
      (minibuffer-with-setup-hook 'rcd-minibuffer-text-scale-adjust
        (read-string prompt)))))

(rcd-ask "Name: ")

I am using it like that daily, so one could play with properties. This 
way increasing font only in my functions, not in whole Emacs.

-- 
Jean Louis