diff options
-rw-r--r-- | config.org | 27 |
1 files changed, 19 insertions, 8 deletions
diff --git a/config.org b/config.org index 5c1b300..ad872f8 100644 --- a/config.org +++ b/config.org | |||
@@ -552,7 +552,7 @@ I want the git version. | |||
552 | 552 | ||
553 | *** Mode line | 553 | *** Mode line |
554 | 554 | ||
555 | **** Simple modeline :package: | 555 | **** COMMENT Simple modeline :package: |
556 | 556 | ||
557 | After trying =doom-mode-line= and =smart-mode-line=, I think I've finally | 557 | After trying =doom-mode-line= and =smart-mode-line=, I think I've finally |
558 | landed on a good one: =simple-modeline=. | 558 | landed on a good one: =simple-modeline=. |
@@ -581,9 +581,9 @@ landed on a good one: =simple-modeline=. | |||
581 | (simple-modeline-mode +1) | 581 | (simple-modeline-mode +1) |
582 | #+end_src | 582 | #+end_src |
583 | 583 | ||
584 | **** Simple modeline custom segments | 584 | ***** Simple modeline custom segments |
585 | 585 | ||
586 | ***** COMMENT Functions to figure out what window is focused | 586 | ****** COMMENT Functions to figure out what window is focused |
587 | 587 | ||
588 | How is this not built into Emacs? Oh well, I have [[https://github.com/jamesnvc/dotfiles/blob/master/emacs.d/modules/cogent-modeline.el][Cogent]] to thank. | 588 | How is this not built into Emacs? Oh well, I have [[https://github.com/jamesnvc/dotfiles/blob/master/emacs.d/modules/cogent-modeline.el][Cogent]] to thank. |
589 | 589 | ||
@@ -613,7 +613,7 @@ How is this not built into Emacs? Oh well, I have [[https://github.com/jamesnvc | |||
613 | (advice-add 'select-window :after #'cogent-line-set-selected-window) | 613 | (advice-add 'select-window :after #'cogent-line-set-selected-window) |
614 | #+end_src | 614 | #+end_src |
615 | 615 | ||
616 | ***** Tweak =simple-modeline-segment-modified= | 616 | ****** Tweak =simple-modeline-segment-modified= |
617 | 617 | ||
618 | #+begin_src emacs-lisp :noweb-ref functions | 618 | #+begin_src emacs-lisp :noweb-ref functions |
619 | (defun acdw/modeline/modified () | 619 | (defun acdw/modeline/modified () |
@@ -642,7 +642,7 @@ How is this not built into Emacs? Oh well, I have [[https://github.com/jamesnvc | |||
642 | "_")) | 642 | "_")) |
643 | #+end_src | 643 | #+end_src |
644 | 644 | ||
645 | ***** Easier minor-modes | 645 | ****** Easier minor-modes |
646 | 646 | ||
647 | #+begin_src emacs-lisp :noweb-ref functions | 647 | #+begin_src emacs-lisp :noweb-ref functions |
648 | (defun acdw/modeline/acdw-minions () | 648 | (defun acdw/modeline/acdw-minions () |
@@ -663,7 +663,7 @@ How is this not built into Emacs? Oh well, I have [[https://github.com/jamesnvc | |||
663 | 'mouse-face 'mode-line-highlight)) | 663 | 'mouse-face 'mode-line-highlight)) |
664 | #+end_src | 664 | #+end_src |
665 | 665 | ||
666 | ****** Minions mode :package: | 666 | ******* Minions mode :package: |
667 | 667 | ||
668 | The segment above requires minions-mode. | 668 | The segment above requires minions-mode. |
669 | 669 | ||
@@ -672,7 +672,7 @@ The segment above requires minions-mode. | |||
672 | (require 'minions) | 672 | (require 'minions) |
673 | #+end_src | 673 | #+end_src |
674 | 674 | ||
675 | ***** Shorter VC-mode segment | 675 | ****** Shorter VC-mode segment |
676 | 676 | ||
677 | #+begin_src emacs-lisp :noweb-ref functions | 677 | #+begin_src emacs-lisp :noweb-ref functions |
678 | (defun acdw/modeline/vc-status () | 678 | (defun acdw/modeline/vc-status () |
@@ -707,7 +707,7 @@ The segment above requires minions-mode. | |||
707 | 'mouse-face 'mode-line-highlight))))) | 707 | 'mouse-face 'mode-line-highlight))))) |
708 | #+end_src | 708 | #+end_src |
709 | 709 | ||
710 | ***** Position in file | 710 | ****** Position in file |
711 | 711 | ||
712 | #+begin_src emacs-lisp :noweb-ref functions | 712 | #+begin_src emacs-lisp :noweb-ref functions |
713 | (defun acdw/modeline/position () | 713 | (defun acdw/modeline/position () |
@@ -770,6 +770,17 @@ But I still have to enable the mode ?! | |||
770 | (nyan-mode +1) | 770 | (nyan-mode +1) |
771 | #+end_src | 771 | #+end_src |
772 | 772 | ||
773 | **** Mode-line faces | ||
774 | |||
775 | #+begin_src emacs-lisp :noweb-ref linux-specific | ||
776 | (doremi-face-set 'mode-line | ||
777 | '((t (:family "Terminus" | ||
778 | :height 1.0)))) | ||
779 | (doremi-face-set 'mode-line-inactive | ||
780 | '((t (:family "Terminus" | ||
781 | :height 1.0)))) | ||
782 | #+end_src | ||
783 | |||
773 | *** Setting faces | 784 | *** Setting faces |
774 | 785 | ||
775 | It took me a while to find a function that'll let me customize faces | 786 | It took me a while to find a function that'll let me customize faces |