emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/ace-window 0799fdd 31/92: Add aw-minibuffer-flag


From: Stefan Monnier
Subject: [elpa] externals/ace-window 0799fdd 31/92: Add aw-minibuffer-flag
Date: Wed, 17 Mar 2021 18:39:16 -0400 (EDT)

branch: externals/ace-window
commit 0799fddb067a74f889ef76afda08021e505a4e2f
Author: Bob Weiner <rsw@gnu.org>
Commit: Oleh Krehel <ohwoeowho@gmail.com>

    Add aw-minibuffer-flag
    
    Fixes #114
---
 ace-window.el | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/ace-window.el b/ace-window.el
index ae55bfd..105fe99 100644
--- a/ace-window.el
+++ b/ace-window.el
@@ -80,6 +80,10 @@
           (const :tag "global" global)
           (const :tag "frame" frame)))
 
+(defcustom aw-minibuffer-flag nil
+  "When non-nil, also display `ace-window-mode' string in the minibuffer when 
ace-window is active."
+  :type 'boolean)
+
 (defcustom aw-ignored-buffers '("*Calc Trail*" "*LV*")
   "List of buffers to ignore when selecting window."
   :type '(repeat string))
@@ -276,6 +280,7 @@ LEAF is (PT . WND)."
 (defun aw-set-mode-line (str)
   "Set mode line indicator to STR."
   (setq ace-window-mode str)
+  (if aw-minibuffer-flag (message "%s" str))
   (force-mode-line-update))
 
 (defvar aw-dispatch-alist



reply via email to

[Prev in Thread] Current Thread [Next in Thread]