 (add-hook 'haskell-mode-hook 'sensible-haskell-keys)
 
 
+;; emacs lisp mode
+;; ============================================================
+
+(defun sensible-emacs-lisp-keys ()
+  (interactive)
+
+  (local-unset-key (kbd "C-M-x")))
+(add-hook 'emacs-lisp-mode-hook 'sensible-emacs-lisp-keys)
+
+
+
 ;; Note: we also have to mess around with some other mode's keybinds. In
 ;; particular:
 

  ;; Unbind keys we use elsewhere
  (local-set-key (kbd "C-c") nil)
  (define-key flyspell-mode-map (kbd "C-c") nil)
  (local-set-key (kbd "C-x") nil)
  (local-set-key (kbd "C-j") nil)
  (local-set-key (kbd "C-y") nil)



;; yas mode

;; (defun sensible-yas-mode-keys ()
;;   (interactive)

;;   ;; kill C-c
;;   (define-key yas-minor-mode-map (kbd "C-c") 'nil))

;; (when (boundp 'yas-minor-mode-hook)
;;   (add-hook 'yas-minor-mode-hook 'sensible-yas-mode-keys))


;; Haskell mode
