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

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

[elpa] externals/org-real 186830b 060/160: Detect return and backspace w


From: ELPA Syncer
Subject: [elpa] externals/org-real 186830b 060/160: Detect return and backspace without gui
Date: Wed, 6 Oct 2021 16:58:15 -0400 (EDT)

branch: externals/org-real
commit 186830b86c151366cdb88067eff997b9e78035f9
Author: Tyler Grinn <tylergrinn@gmail.com>
Commit: Tyler Grinn <tylergrinn@gmail.com>

    Detect return and backspace without gui
---
 org-real.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/org-real.el b/org-real.el
index d075a3b..513863a 100644
--- a/org-real.el
+++ b/org-real.el
@@ -195,9 +195,9 @@ describing where BOX is."
         (org-real--pp (org-real--make-instance 'org-real-box containers) 
containers)
         (let ((response (read-event "RETURN    - Confirm\nBACKSPACE - Remove 
context\n+         - Add context")))
           (cond
-           ((eq response 'return)
+           ((or (eq response 'return) (eq response 13))
             (throw 'confirm containers))
-           ((eq response 'backspace)
+           ((or (eq response 'backspace) (eq response 127))
             (pop containers)
             (if (= 0 (length containers))
                 (setq containers (org-real--complete-thing "Thing: " 
container-matrix containers))))



reply via email to

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