Function: quail-minibuffer-message-overlay

quail-minibuffer-message-overlay is a byte-compiled function defined in quail.el.gz.

Signature

(quail-minibuffer-message-overlay STRING)

Documentation

Show STRING at the end of the minibuffer, using an overlay.

Unlike quail-minibuffer-message, this leaves the minibuffer contents alone.

Source Code

;; Defined in /usr/src/emacs/lisp/international/quail.el.gz
(defun quail-minibuffer-message-overlay (string)
  "Show STRING at the end of the minibuffer, using an overlay.
Unlike `quail-minibuffer-message', this leaves the minibuffer contents
alone."
  (quail--delete-guidance-overlay)
  (let ((ov (make-overlay (point-max) (point-max) nil t t)))
    ;; With a trailing newline the `cursor' property below has no
    ;; effect and the cursor drops to the next screen line.
    (when (string-suffix-p "\n" string)
      (setq string (concat string " ")))
    (unless (zerop (length string))
      (setq string (copy-sequence string))
      (put-text-property 0 1 'cursor t string))
    (overlay-put ov 'after-string string)
    (overlay-put ov 'priority 1100)
    (setq quail--guidance-overlay ov
          quail--guidance-timer
          (run-at-time 1000000 nil #'quail--delete-guidance-overlay))
    (add-hook 'pre-command-hook #'quail--delete-guidance-overlay)))