Fix: (helm-org-ql-map) Use make-composed-keymap

Fixes #99.  Thanks to Akira Komamura (@akirak).
This commit is contained in:
Adam Porter 2020-03-02 00:45:27 -06:00
parent 20f3ce747c
commit 11a0466f92

View file

@ -56,13 +56,13 @@
;;;; Variables
(defvar helm-org-ql-map
(let ((map (copy-keymap helm-map))
(let ((map (make-sparse-keymap))
(mappings '(
"C-x C-s" helm-org-ql-save
)))
(cl-loop for (key fn) on mappings by #'cddr
do (define-key map (kbd key) fn))
map)
(make-composed-keymap map helm-map))
"Keymap for `helm-org-ql' sessions.
Based on `helm-map'.")