->と<-を割り当てといた。
(add-hook 'haskell-mode-hook '(lambda () (local-set-key "\C-j" (lambda () (interactive)(insert "->"))) (local-set-key "\M-j" (lambda ()(interactive)(insert "<-"))) ))
->と<-を割り当てといた。
(add-hook 'haskell-mode-hook '(lambda () (local-set-key "\C-j" (lambda () (interactive)(insert "->"))) (local-set-key "\M-j" (lambda ()(interactive)(insert "<-"))) ))