[修正済(12.10.22)] Haskell用key-combo.elの設定

haskell-key-combo.el

;; key-combo
;; add-hook: on init.el
(defun my-haskell-key-combo ()
  (key-combo-define-local (kbd "-") '("-" " -> " "--"))
  (key-combo-define-local (kbd "<") '("<" " <- " " <= " " =<< " "<<" "<"))
  (key-combo-define-local (kbd ">") '(">" " >= " " >>= " ">"))
  (key-combo-define-local (kbd "=") '("=" " = " " == " " => " "=="))
  (key-combo-define-local (kbd ":") '(":" " :: " "::"))
  (key-combo-define-local (kbd "+") '("+" " + " " ++ " "++"))
  )

(defun my-haskell-add-hook ()
  (turn-on-haskell-indentation)
  (font-lock-mode)
  (my-haskell-key-combo)
  )

;; on init.el
;; (custom-set-variables
;;  '(haskell-mode-hook 'my-haskell-add-hook) ;; haskell-mode   
;;  )