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

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

[elpa] externals/nano-modeline 5956e5a4fe 14/18: Fixed and simplified cu


From: ELPA Syncer
Subject: [elpa] externals/nano-modeline 5956e5a4fe 14/18: Fixed and simplified custom format for modes
Date: Thu, 12 May 2022 07:57:50 -0400 (EDT)

branch: externals/nano-modeline
commit 5956e5a4fe5338bfc33f9e5ff0a35bc91d6ca014
Author: Nicolas P. Rougier <Nicolas.Rougier@inria.fr>
Commit: Nicolas P. Rougier <Nicolas.Rougier@inria.fr>

    Fixed and simplified custom format for modes
---
 nano-modeline.el | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/nano-modeline.el b/nano-modeline.el
index 9ed01ec72f..8bc3e99593 100644
--- a/nano-modeline.el
+++ b/nano-modeline.el
@@ -212,7 +212,7 @@ This is useful (aesthetically) if the face of prefix uses a 
different background
 (defcustom nano-modeline-mode-formats
   '(;; with :mode-p first
 
-    (imenu-list-mode        :mode nano-modeline-imenu-list-mode-p
+    (imenu-list-mode        :mode-p nano-modeline-imenu-list-mode-p
                             :format nano-modeline-imenu-list-mode
                             :icon "") ;; nerd-font / oct-three-bars
     (prog-mode              :mode-p nano-modeline-prog-mode-p
@@ -324,8 +324,7 @@ KEY mode name, for reference only. Easier to do lookups 
and/or replacements.
                                                      (const :format)
                                                      (const :icon)
                                                      (const :on-activate)
-                                                     (const :on-inactivate))
-                                   :value-type (radio function string)))
+                                                     (const :on-inactivate))))
   :group 'nano-modeline)
 
 (defcustom nano-modeline-mode-format-activate-hook nil
@@ -973,7 +972,6 @@ depending on the version of mu4e."
 
 ;; ---------------------------------------------------------------------
 (defun nano-modeline-imenu-list-mode-p ()
-  (message "imenu mode: %s"   (derived-mode-p 'imenu-list-major-mode))
   (derived-mode-p 'imenu-list-major-mode))
 
 (defun nano-modeline-imenu-list-mode (&optional icon)



reply via email to

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