 
 (setq ring-bell-function 'ignore)
 
+;; 默认 80 列自动换行, 需要 M-x auto-fill-mode 模式下
+(defun auto-fill ()
+  "Set for auto fill Config."
+  (setq-default auto-fill-function 'do-auto-fill)
+  (setq-default fill-column 80)
+  (setq-default comment-auto-fill-only-comments t))
+
 (add-hook 'emacs-startup-hook
           (lambda ()
+            (auto-fill)
             (evil-mode)
             (projectile-global-mode)
             (setf enable-local-variables nil)))


;; org 自动换行
(add-hook 'org-mode-hook
          (lambda () (setq truncate-lines t)))

;; 默认 120 列自动换行, 需要 M-x auto-fill-mode 模式下
(setq fill-column 120)

(when (featurep 'ns)
  (defun ns-raise-emacs ()

  (setq ac-clang-flags
        (mapcar (lambda (item) (concat "-I" item))
                (split-string
                 " /usr/include/c++/4.8
/usr/include/x86_64-linux-gnu/c++/4.8
/usr/include/c++/4.8/backward
/usr/lib/gcc/x86_64-linux-gnu/4.8/include /usr/local/include
/usr/lib/gcc/x86_64-linux-gnu/4.8/include-fixed
/usr/include/x86_64-linux-gnu /usr/include
")))
  (setq ac-sources (append '(ac-source-clang) ac-sources)))
(add-hook 'c-mode-hook 'my-ac-cc-mode-setup)
(add-hook 'c++-mode-hook 'my-ac-cc-mode-setup)

(desktop-save-mode 0)
(setq slime-contribs '(slime-repl slime-fuzzy slime-scratch))
