diff options
| author | Phil Sainty <psainty@orcon.net.nz> | 2021-09-09 19:53:25 +1200 |
|---|---|---|
| committer | Phil Sainty <psainty@orcon.net.nz> | 2021-09-19 03:46:39 +1200 |
| commit | 045a4fe94c18cd36ef297e62a80cdff449af3aa5 (patch) | |
| tree | fa5907378f9633e940fb9fa6328d655911d4873b /lisp/so-long.el | |
| parent | bda9abb68081e45c5c46e662a4997254cb74f0ef (diff) | |
| download | emacs-045a4fe94c18cd36ef297e62a80cdff449af3aa5.tar.gz emacs-045a4fe94c18cd36ef297e62a80cdff449af3aa5.tar.bz2 emacs-045a4fe94c18cd36ef297e62a80cdff449af3aa5.zip | |
; * lisp/so-long.el (so-long-mode): Use `so-long-mode-line-active' face
Diffstat (limited to 'lisp/so-long.el')
| -rw-r--r-- | lisp/so-long.el | 15 |
1 files changed, 11 insertions, 4 deletions
diff --git a/lisp/so-long.el b/lisp/so-long.el index 800a68e9c67..e271ff6be3c 100644 --- a/lisp/so-long.el +++ b/lisp/so-long.el @@ -8,7 +8,7 @@ ;; Keywords: convenience ;; Created: 23 Dec 2015 ;; Package-Requires: ((emacs "24.4")) -;; Version: 1.1.1 +;; Version: 1.1.2 ;; This file is part of GNU Emacs. @@ -410,6 +410,7 @@ ;; * Change Log: ;; +;; 1.1.2 - Use `so-long-mode-line-active' face on `mode-name' in `so-long-mode'. ;; 1.1.1 - Identical to 1.1, but fixing an incorrect GNU ELPA release. ;; 1.1 - Utilise `buffer-line-statistics' in Emacs 28+, with the new ;; `so-long-predicate' function `so-long-statistics-excessive-p'. @@ -477,7 +478,7 @@ '(so-long ("1.0" . "27.1") ("1.1" . "28.1"))) -(defconst so-long--latest-version "1.1") +(defconst so-long--latest-version "1.1.2") (declare-function buffer-line-statistics "fns.c" t t) ;; Emacs 28+ (declare-function longlines-mode "longlines") @@ -969,7 +970,12 @@ If nil, no mode line indicator will be displayed." (defface so-long-mode-line-active '((t :inherit mode-line-emphasis)) - "Face for `so-long-mode-line-info' when mitigations are active." + "Face for the mode line construct when mitigations are active. + +Applied to `mode-name' in the `so-long-mode' major mode, and to +`so-long-mode-line-label' otherwise (for non-major-mode actions). + +See also `so-long-mode-line-info'." :package-version '(so-long . "1.0")) (defface so-long-mode-line-inactive @@ -1355,7 +1361,8 @@ This minor mode is a standard `so-long-action' option." "Major mode keymap and menu for `so-long-mode'.") ;;;###autoload -(define-derived-mode so-long-mode nil "So Long" +(define-derived-mode so-long-mode nil + (propertize "So Long" 'face 'so-long-mode-line-active) "This major mode is the default `so-long-action' option. The normal reason for this mode being active is that `global-so-long-mode' is |