From 6aae32758647110a49d2414352d2cd13abc2c8c7 Mon Sep 17 00:00:00 2001 From: jao Date: Wed, 27 Mar 2024 14:19:45 +0000 Subject: jao-minibuffer-inhibit --- lib/eos/jao-minibuffer.el | 12 +++++++----- 1 file changed, 7 insertions(+), 5 deletions(-) diff --git a/lib/eos/jao-minibuffer.el b/lib/eos/jao-minibuffer.el index 71d5976..e63099a 100644 --- a/lib/eos/jao-minibuffer.el +++ b/lib/eos/jao-minibuffer.el @@ -32,6 +32,7 @@ (defvar jao-minibuffer-frame-width nil) (defvar jao-minibuffer-active-buffer-line-color "azure4") (defvar jao-minibuffer-inactive-buffer-line-color "grey25") +(defvar jao-minibuffer-inhibit nil) (defconst jao-minibuffer--name " *Minibuf-0*") @@ -87,11 +88,12 @@ (defun jao-minibuffer--set-message (msg) (when jao-minibuffer-mode - (let* ((info (when jao-minibuffer-msg-info - (jao-minibuffer--format-info jao-minibuffer-msg-info))) - (info (when info (propertize info 'face 'jao-themes-dimm))) - (msg (if info (format "%s - %s" info msg) msg))) - (jao-minibuffer--format-msg (or msg ""))))) + (or jao-minibuffer-inhibit + (let* ((info (when jao-minibuffer-msg-info + (jao-minibuffer--format-info jao-minibuffer-msg-info))) + (info (when info (propertize info 'face 'jao-themes-dimm))) + (msg (if info (format "%s - %s" info msg) msg))) + (jao-minibuffer--format-msg (or msg "")))))) (setq set-message-function #'jao-minibuffer--set-message) -- cgit v1.2.3