(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)