;;
;; C-style
;;
(load "compile")
(load "cc-mode")
(setq c-mode-common-hook '(lambda ()
              (turn-on-font-lock)
            (setq comment-column 48)
                (setq indent-tabs-mode nil)
              ))
(setq c-style-alist
      (cons
       '("MY"
   (c-basic-offset . 2)
   (c-comment-only-line-offset . 0)
   (c-offsets-alist . ((statement-block-intro . +)
           (knr-argdecl-intro . 0)
           (substatement-open . 0)
           (label . -)
           (statement-cont . +)
           (arglist-intro . c-lineup-arglist-intro-after-paren)
           (arglist-close . c-lineup-arglist)
           ))
   )
       c-style-alist))
(c-set-style "MY")
(setq c-default-style "MY")

(setq cperl-brace-offset -2)