From 5a883339d74021115be65ab7f3ad71ba2ab6ff76 Mon Sep 17 00:00:00 2001
From: Peng Li <seudut@gmail.com>
Date: Fri, 4 Sep 2015 00:34:24 +0800
Subject: [PATCH 1/1] emacs add mapping of keychord

---
 emacs.d/config/init-keychord.el | 28 ++++++++++++++++++++++++++++
 emacs.d/init.el                 |  2 +-
 2 files changed, 29 insertions(+), 1 deletion(-)
 create mode 100644 emacs.d/config/init-keychord.el

diff --git a/emacs.d/config/init-keychord.el b/emacs.d/config/init-keychord.el
new file mode 100644
index 0000000..e15e56b
--- /dev/null
+++ b/emacs.d/config/init-keychord.el
@@ -0,0 +1,28 @@
+
+
+(require 'key-chord)
+
+(setq key-chord-two-keys-delay 0.5)
+
+;; from emacs conference 2015 workshop
+(defun keychord-keymap (keychord bindings)
+  (setq keymap (make-sparse-keymap))
+  (dolist (binding bindings)
+    (define-key keymap (car binding) (cdr binding)))
+  (key-chord-define-global keychord keymap))
+
+;; main keymap
+(keychord-keymap "dk"
+                 '(("f" . helm-mini)
+                   ("a" . find-file)))
+
+
+;; helm-mini find buffer and recent file 
+(key-chord-define-global "sj" 'helm-mini)
+(key-chord-define-global "sk" 'helm-find-files)
+;(key-chord-define-global ";s" ')
+
+(key-chord-define-global "jj" "\C-g")
+(key-chord-mode 1)
+
+(provide 'init-keychord)
diff --git a/emacs.d/init.el b/emacs.d/init.el
index c281acc..c1e9cec 100644
--- a/emacs.d/init.el
+++ b/emacs.d/init.el
@@ -133,4 +133,4 @@
    "eim-py" "euc-cn" 'eim-use-package
    "拼音" "汉字拼音输入法" "~/.emacs.d/site-lisp/eim/py.txt")
 
-
+(require 'init-keychord)
-- 
2.11.0