From eb770f6303cc102652b184df64b3c56c89a31892 Mon Sep 17 00:00:00 2001 From: stardiviner Date: Thu, 8 Feb 2018 11:39:31 +0800 Subject: [PATCH] fix keybinding is global, set keybinding under org-babel-map prefix --- ob-clojure-literate.el | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/ob-clojure-literate.el b/ob-clojure-literate.el index 20526f4..296eb93 100644 --- a/ob-clojure-literate.el +++ b/ob-clojure-literate.el @@ -220,13 +220,14 @@ Don't auto jack in by default for not rude." (defvar ob-clojure-literate-mode-map (let ((map (make-sparse-keymap))) - (define-key map (kbd "C-c C-v M-s") 'ob-clojure-literate-specify-session-header-argument) - (define-key map (kbd "C-c C-v M-j") 'ob-clojure-literate-auto-jackin) - ;; (define-key map (kbd "C-c C-e") 'cider-eval-last-sexp) - ;; (define-key map (kbd "C-c C-d") 'cider-doc) map) "Keymap for `ob-clojure-literate-mode'.") +(define-key org-babel-map (kbd "M-s") 'ob-clojure-literate-specify-session-header-argument) +(define-key org-babel-map (kbd "M-j") 'ob-clojure-literate-auto-jackin) +;; (define-key org-babel-map (kbd "M-e") 'cider-eval-last-sexp) +;; (define-key org-babel-map (kbd "M-d") 'cider-doc) + ;;;###autoload (defun ob-clojure-literate-enable () "Enable Org-mode buffer locally for `ob-clojure-literate'." -- 2.11.4.GIT