diff options
| -rw-r--r-- | init.el | 2 | ||||
| -rw-r--r-- | lib/eos/jao-minibuffer.el | 11 |
2 files changed, 12 insertions, 1 deletions
@@ -518,7 +518,7 @@ (minibuffer-electric-default-mode 1) (jao-d-l - (jao-minibuffer-mode-line-mode) + (jao-minibuffer-frame-title-mode) (jao-minibuffer-mode)) ;;; Mode line diff --git a/lib/eos/jao-minibuffer.el b/lib/eos/jao-minibuffer.el index b12ed71..05750ca 100644 --- a/lib/eos/jao-minibuffer.el +++ b/lib/eos/jao-minibuffer.el @@ -173,5 +173,16 @@ (add-to-list 'global-mode-string e) (setq global-mode-string (delete e global-mode-string))))) +(defvar jao-minibuffer--title-format nil) + +(define-minor-mode jao-minibuffer-frame-title-mode + "Show info in frame title instead of minibuffer" + :global t :lighter "" :group 'jao + (when (not jao-minibuffer--title-format) + (setq jao-minibuffer--title-format frame-title-format)) + (if jao-minibuffer-frame-title-mode + (setq frame-title-format '("emacs - " (:eval jao-minibuffer-info))) + (setq frame-title-format jao-minibuffer--title-format))) + (provide 'jao-minibuffer) ;;; jao-minibuffer.el ends here |