emacsでコードの折りたたみ

hs-minor-modeというのがあるらしい。
ここを参考にemacselを変更。
Dadakusa Log: Emacsでソースコードの折りたたみ
ブロックの中でC-\を押すと折り畳める。

(add-hook 'c++-mode-hook                                                                                                                                                                                                                      
          '(lambda ()                                                                                                                                                                                                                         
             (hs-minor-mode 1)))                                                                                                                                                                                                              
(add-hook 'c-mode-hook                                                                                                                                                                                                                        
          '(lambda ()                                                                                                                                                                                                                         
             (hs-minor-mode 1)))                                                                                                                                                                                                              
(add-hook 'scheme-mode-hook                                                                                                                                                                                                                   
          '(lambda ()                                                                                                                                                                                                                         
             (hs-minor-mode 1)))                                                                                                                                                                                                              
(add-hook 'emacs-lisp-mode-hook                                                                                                                                                                                                               
          '(lambda ()                                                                                                                                                                                                                         
             (hs-minor-mode 1)))                                                                                                                                                                                                              
(add-hook 'lisp-mode-hook                                                                                                                                                                                                                     
          '(lambda ()                                                                                                                                                                                                                         
             (hs-minor-mode 1)))                                                                                                                                                                                                              
(add-hook 'python-mode-hook                                                                                                                                                                                                                   
          '(lambda ()                                                                                                                                                                                                                         
             (hs-minor-mode 1)))                                                                                                                                                                                                              
(add-hook 'ruby-mode-hook                                                                                                                                                                                                                     
          '(lambda ()                                                                                                                                                                                                                         
             (hs-minor-mode 1)))                                                                                                                                                                                                              
                                                                                                                                                                                                                                              
(define-key global-map (kbd "C-\\") 'hs-toggle-hiding)