branch: master
commit 8912e3036d224c29d2ab8beb3946bbc9e13167ba
Author: Mitchel Humpherys <mitch.spec...@gmail.com>
Commit: Thomas Fitzsimmons <fitz...@fitzsim.org>
packages/excorporate/excorporate-org.el: Allow quitting window
* packages/excorporate/excorporate-org.el
(exco-org-initialize-buffer): Use a copy of org-mode-map as the
local keymap. Bind q to quit-window.
Copyright-paperwork-exempt: yes
---
packages/excorporate/excorporate-org.el | 2 ++
1 files changed, 2 insertions(+), 0 deletions(-)
diff --git a/packages/excorporate/excorporate-org.el
b/packages/excorporate/excorporate-org.el
index 73aaa52..a06057a 100644
--- a/packages/excorporate/excorporate-org.el
+++ b/packages/excorporate/excorporate-org.el
@@ -35,6 +35,8 @@
(with-current-buffer (get-buffer-create excorporate-org-buffer-name)
(setq buffer-read-only t)
(org-mode)
+ (use-local-map (copy-keymap org-mode-map))
+ (local-set-key "q" 'quit-window)
(display-buffer (current-buffer))
(let ((inhibit-read-only t))
(delete-region (point-min) (point-max))
