.emacs-my
changeset 337 17e3c74b7c22
parent 336 a252995f7d6b
child 338 ebf88f988c37
equal deleted inserted replaced
336:a252995f7d6b 337:17e3c74b7c22
   794 
   794 
   795 (setq-default comment-style (quote indent))
   795 (setq-default comment-style (quote indent))
   796 (setq-default comment-column 44)
   796 (setq-default comment-column 44)
   797 (setq-default comment-fill-column my-fill-column)
   797 (setq-default comment-fill-column my-fill-column)
   798 
   798 
   799 (mapc (lambda (mode)
   799 (mapc (lambda (hook) (add-hook hook (lambda () (setq fill-column my-fill-column)) ))
   800         (add-hook mode
   800       my-devel-mode-hook-list)
   801                   (lambda ()
       
   802                     (setq fill-column my-fill-column) )
       
   803                   ))
       
   804       '(c-mode-hook lisp-mode-hook))
       
   805 
   801 
   806 ;; ----------------------------------------------------------------------
   802 ;; ----------------------------------------------------------------------
   807 ;; diff, patch.
   803 ;; diff, patch.
   808 
   804 
   809 (setq diff-switches "-u")
   805 (setq diff-switches "-u")