[elpa] externals/nano-modeline 67ad139060 15/26: Org capture mode with buttons

[ELPA Syncer]

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

    Org capture mode with buttons
---
 nano-modeline.el | 16 +++++++++-------
 1 file changed, 9 insertions(+), 7 deletions(-)

diff --git a/nano-modeline.el b/nano-modeline.el
index 0e04e299c6..8eacd849ef 100644
--- a/nano-modeline.el
+++ b/nano-modeline.el
@@ -790,13 +790,15 @@ made DEFAULT."
 
 (defun nano-modeline-org-capture-mode ()
   "Nano line for org capture mode"
-  
-  (funcall nano-modeline-position
-            '((nano-modeline-buffer-status "ORG") " "
-              (nano-modeline-buffer-name "Capture") " "
-              (nano-modeline-org-capture-description))
-            '("Finish: C-c C-c, refile: C-c C-w, cancel: C-c C-k "
-              (nano-modeline-window-dedicated))))
+
+  (let ((buttons '(("CAPTURE" . org-capture-finalize)
+                   ("CANCEL" . org-capture-kill))))  
+    (funcall nano-modeline-position
+             `((nano-modeline-buffer-status "ORG") " "
+               (nano-modeline-buffer-name "Capture") " "
+               (nano-modeline-org-capture-description))
+             `((nano-modeline-buttons ,buttons t) " "
+               (nano-modeline-window-dedicated)))))
 
 (defun nano-modeline-org-agenda-mode ()
   "Nano line for org capture mode"