[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/nano-modeline 8b30f74a13 2/3: Fixed org capture mode
From: |
ELPA Syncer |
Subject: |
[elpa] externals/nano-modeline 8b30f74a13 2/3: Fixed org capture mode |
Date: |
Wed, 25 May 2022 12:57:53 -0400 (EDT) |
branch: externals/nano-modeline
commit 8b30f74a130fc085e1eb9c965a1f3dac85aa9cd2
Author: Nicolas P. Rougier <Nicolas.Rougier@inria.fr>
Commit: Nicolas P. Rougier <Nicolas.Rougier@inria.fr>
Fixed org capture mode
---
nano-modeline.el | 13 +++++++------
1 file changed, 7 insertions(+), 6 deletions(-)
diff --git a/nano-modeline.el b/nano-modeline.el
index 1a23baf54f..90cc7ccaa2 100644
--- a/nano-modeline.el
+++ b/nano-modeline.el
@@ -220,6 +220,12 @@ This is useful (aesthetically) if the face of prefix uses
a different background
(imenu-list-mode :mode-p nano-modeline-imenu-list-mode-p
:format nano-modeline-imenu-list-mode
:icon "") ;; nerd-font / oct-three-bars
+ (org-capture-mode :mode-p nano-modeline-org-capture-mode-p
+ :format nano-modeline-org-capture-mode
+ :on-activate nano-modeline-org-capture-activate
+ :on-inactivate nano-modeline-org-capture-inactivate
+ :icon "") ;; nerd-font / oct-calendar
+
(prog-mode :mode-p nano-modeline-prog-mode-p
:format nano-modeline-prog-mode
:icon "") ;; nerd-font / oct-file-code
@@ -296,11 +302,6 @@ This is useful (aesthetically) if the face of prefix uses
a different background
(org-agenda-mode :mode-p nano-modeline-org-agenda-mode-p
:format nano-modeline-org-agenda-mode
:icon "") ;; nerd-font / oct-calendar
- (org-capture-mode :mode-p nano-modeline-org-capture-mode-p
- :format nano-modeline-org-capture-mode
- :on-activate nano-modeline-org-capture-activate
- :on-inactivate nano-modeline-org-capture-inactivate
- :icon "") ;; nerd-font / oct-calendar
(org-clock-mode :mode-p nano-modeline-org-clock-mode-p
:format nano-modeline-org-clock-mode
:on-activate nano-modeline-org-clock-activate
@@ -605,7 +606,7 @@ KEY mode name, for reference only. Easier to do lookups
and/or replacements.
(nano-modeline-render (plist-get (cdr (assoc 'org-capture-mode
nano-modeline-mode-formats)) :icon)
"Capture"
(concat "(" (org-capture-get :description) ")")
- ""))
+ "Finish: C-c C-c, refile: C-c C-w, cancel: C-c C-k "))
(defun nano-modeline-org-capture-turn-off-header-line ()
(setq-local header-line-format (default-value 'header-line-format))