 ;;; -*- coding: utf-8-unix -*-
 
-(server-start)
+;; (server-start)
 
 (setq inhibit-startup-message t) ; don't show startup screen
 

(eval-after-load "org-archive"
  '(org-defkey org-mode-map "\C-c\C-x\C-a"
	       'org-archive-subtree-default-with-confirmation))
;; (global-set-key (kbd "C-M-r") 'org-capture)
;;; --------------------------------------------------------------------

;;; Spell check
(global-set-key (kbd "C-c ib") 'ispell-buffer)
(global-set-key (kbd "C-c ir") 'ispell-region)
;XXX; (add-hook 'c-mode-hook 'flyspell-prog-mode)

(eval-after-load "ps-print"
  '(setq ps-paper-type 'a4


(eval-after-load "org"
  '(progn
    (setq org-startup-indented t)
    (setq org-directory "~/.org")

    ;; http://doc.norang.ca/org-mode.html#TodoKeywords
    (setq org-todo-keywords
