[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/nano-modeline acd020a045 10/18: Added imenu-list mode
From: |
ELPA Syncer |
Subject: |
[elpa] externals/nano-modeline acd020a045 10/18: Added imenu-list mode |
Date: |
Thu, 12 May 2022 07:57:49 -0400 (EDT) |
branch: externals/nano-modeline
commit acd020a045320c40bcde11c8ef62525d8fee7067
Author: Nicolas P. Rougier <Nicolas.Rougier@inria.fr>
Commit: Nicolas P. Rougier <Nicolas.Rougier@inria.fr>
Added imenu-list mode
---
nano-modeline.el | 21 +++++++++++++++++++++
1 file changed, 21 insertions(+)
diff --git a/nano-modeline.el b/nano-modeline.el
index 184f5ccbbb..cb383c17bc 100644
--- a/nano-modeline.el
+++ b/nano-modeline.el
@@ -211,6 +211,10 @@ 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
+ :format nano-modeline-imenu-list-mode
+ :icon "") ;; nerd-font / oct-three-bars
(prog-mode :mode-p nano-modeline-prog-mode-p
:format nano-modeline-prog-mode
:icon "") ;; nerd-font / oct-file-code
@@ -966,6 +970,23 @@ depending on the version of mu4e."
""
position)))
+;; ---------------------------------------------------------------------
+(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)
+ (let ((icon (or icon
+ (plist-get (cdr (assoc 'text-mode
nano-imenu-list-mode-formats)) :icon)))
+ ;; We take into account the case of narrowed buffers
+ (buffer-name (buffer-name imenu-list--displayed-buffer)
+ (branch (nano-modeline-vc-branch))
+ (position (format-mode-line "%l:%c")))
+ (nano-modeline-render icon
+ buffer-name
+ "(imenu list)"
+ ""))))
+
;; ---------------------------------------------------------------------
(with-eval-after-load 'deft
(defun nano-modeline-deft-print-header ()
- [elpa] externals/nano-modeline 3e020163fe 01/18: Experimental branch, (continued)
- [elpa] externals/nano-modeline 3e020163fe 01/18: Experimental branch, ELPA Syncer, 2022/05/12
- [elpa] externals/nano-modeline 87d658bf37 08/18: Fix to make sure org-clock-mode is really on, ELPA Syncer, 2022/05/12
- [elpa] externals/nano-modeline fee1f3c1e0 12/18: Changed default option to status, ELPA Syncer, 2022/05/12
- [elpa] externals/nano-modeline ce924479de 05/18: Moved dedcited/modified status at end of modeline., ELPA Syncer, 2022/05/12
- [elpa] externals/nano-modeline f75b90da5d 09/18: Read status from base buffer in case buffer is indirect, ELPA Syncer, 2022/05/12
- [elpa] externals/nano-modeline 5948e191f1 06/18: Bugfix: uncommented text mode, ELPA Syncer, 2022/05/12
- [elpa] externals/nano-modeline 5956e5a4fe 14/18: Fixed and simplified custom format for modes, ELPA Syncer, 2022/05/12
- [elpa] externals/nano-modeline cdedb79ab5 17/18: Fixed imenu list mode (faulty code), ELPA Syncer, 2022/05/12
- [elpa] externals/nano-modeline 960ff4f01a 16/18: Version 0.7, ELPA Syncer, 2022/05/12
- [elpa] externals/nano-modeline d37ff5b014 18/18: Merge branch 'no-prefix', ELPA Syncer, 2022/05/12
- [elpa] externals/nano-modeline acd020a045 10/18: Added imenu-list mode,
ELPA Syncer <=
- [elpa] externals/nano-modeline 6ab5d5b94d 15/18: Better display format for org headings, ELPA Syncer, 2022/05/12
- [elpa] externals/nano-modeline a4e72d1486 11/18: Added handling of indirect buffer, ELPA Syncer, 2022/05/12
- [elpa] externals/nano-modeline 532f557c08 13/18: Space computation now takes right margin into account, ELPA Syncer, 2022/05/12