[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[PATCH] packages/excorporate: org: Bind q to bury-buffer
From: |
Mitchel Humpherys |
Subject: |
[PATCH] packages/excorporate: org: Bind q to bury-buffer |
Date: |
Thu, 31 Mar 2016 16:25:08 -0700 |
It's handy to be able to bury the exporporate org buffer with a single
key. Bind `q' to bury buffer as is convention in many other read-only
buffers.
---
Not sure if this is the right place to send Elpa patches... There's
documentation for submitting new packages to Elpa but no much for
contributing patches to Elpa packages...
---
packages/excorporate/excorporate-org.el | 2 ++
1 file changed, 2 insertions(+)
diff --git a/packages/excorporate/excorporate-org.el
b/packages/excorporate/excorporate-org.el
index 73aaa52b6d43..2e9c725cab50 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" 'bury-buffer)
(display-buffer (current-buffer))
(let ((inhibit-read-only t))
(delete-region (point-min) (point-max))
--
Qualcomm Innovation Center, Inc.
The Qualcomm Innovation Center, Inc. is a member of the Code Aurora Forum,
a Linux Foundation Collaborative Project
- [PATCH] packages/excorporate: org: Bind q to bury-buffer,
Mitchel Humpherys <=