diff options
-rw-r--r-- | init.el | 26 | ||||
-rw-r--r-- | lib/eos/jao-mode-line.el | 10 |
2 files changed, 20 insertions, 16 deletions
@@ -491,13 +491,16 @@ (if (jao-colors-scheme-dark-p) (setq jao-minibuffer-active-buffer-line-color "azure4" jao-minibuffer-inactive-buffer-line-color "grey25") - (setq jao-minibuffer-active-buffer-line-color "burlywood3" - jao-minibuffer-inactive-buffer-line-color "grey65")) - (setq jao-minibuffer-adaptive-alignment nil) + (setq jao-minibuffer-active-buffer-line-color + (jao-d-l "#cfcfcf" "burlywood3") + jao-minibuffer-inactive-buffer-line-color + (jao-d-l "#dfdfdf" "grey65"))) + (setq jao-minibuffer-adaptive-alignment nil + jao-minibuffer-info-face-alt 'jao-themes-dimm) :commands (jao-minibuffer-add-variable jao-minibuffer-refresh jao-minibuffer-mode - jao-minibuffer-mode-line-mode)) + jao-minibuffer-mode-line-mode)) (setq enable-recursive-minibuffers t) (require 'mb-depth) @@ -550,10 +553,9 @@ (seconds-to-time (/ v 1000.0)))))) ;;;; mode line toggle -(defvar jao-mode-line-in-minibuffer (jao-is-linux)) +(defvar jao-mode-line-in-minibuffer (display-graphic-p)) (use-package jao-mode-line - :if (jao-is-linux) :commands (jao-mode-line-add-to-minibuffer-left jao-mode-line-add-to-minibuffer-right jao-mode-line-remove-from-minibuffer) @@ -1119,9 +1121,10 @@ (menu-bar . nil) ,@(jao-when-darwin '((internal-border-width . 5) (width . 163) - (height . 70) - (right-divider-width . 6) - (bottom-divider-width . 6))))) + (height . 63) + ;; (right-divider-width . 6) + ;; (bottom-divider-width . 6) + )))) ;;;; frame layout, title, etc (setq frame-title-format '("%b - emacs")) @@ -1776,7 +1779,10 @@ (defun jao-wayland-enabled-p () nil) (defun jao-river-enabled-p () nil)) -(jao-when-linux (require 'jao-custom-x11)) +(jao-d-l + (setq jao-minibuffer-info-face 'jao-themes-dimm) + (jao-mode-line-add-to-minibuffer-left 90) + (require 'jao-custom-x11)) ;;; Global transients (defun jao-list-packages () diff --git a/lib/eos/jao-mode-line.el b/lib/eos/jao-mode-line.el index 0dd1abd..d3388e4 100644 --- a/lib/eos/jao-mode-line.el +++ b/lib/eos/jao-mode-line.el @@ -31,7 +31,7 @@ ;;;; mode line toggle (defun jao-mode-line--face-height (face &optional all) (let* ((h (face-attribute face :height (window-frame))) - (nh (if (eq 'unspecified h) 1 'unspecified))) + (nh (if (eq 'unspecified h) 10 'unspecified))) (set-face-attribute face (when (not all) (window-frame)) :height nh))) (defun jao-mode-line--set-inactive-face (x frame) @@ -62,7 +62,7 @@ ;;;###autoload (defun jao-mode-line-hide-inactive (frame) - (jao-mode-line--set-inactive-face 1 frame)) + (jao-mode-line--set-inactive-face 10 frame)) ;;;###autoload (defun jao-mode-line-show-inactive (frame) @@ -85,8 +85,6 @@ 'gnus-article-mode 'gnus-summary-mode) mode-line-buffer-identification) - ;; ((derived-mode-p 'circe-channel-mode) - ;; (format "%s [%d]" (buffer-name) (length (circe-channel-nicks)))) ((not (null eww-data)) (or (plist-get eww-data :title) "No title")) (t "%b")))) @@ -135,10 +133,10 @@ jao-minibuffer-inactive-buffer-line-color))) (jao-mode-line--extract-face nil) (jao-mode-line--extract-face t) - (set-face-attribute 'mode-line nil :box nil :height 1 + (set-face-attribute 'mode-line-active nil :box nil :height 10 :background bg :foreground bg :overline ol :underline ul :extend t) - (set-face-attribute 'mode-line-inactive nil :box nil :height 1 + (set-face-attribute 'mode-line-inactive nil :box nil :height 10 :background bg :foreground bg ;; :overline bg :underline ul :extend t))) |