.emacs-my
changeset 79 f80cd58e09cb
parent 78 ed24027492e3
child 80 bfc8c3d03527
equal deleted inserted replaced
78:ed24027492e3 79:f80cd58e09cb
   584 ;; ======================================================================
   584 ;; ======================================================================
   585 ;; GTD, PIM, organize, todo mode.
   585 ;; GTD, PIM, organize, todo mode.
   586 
   586 
   587 ;; ----------------------------------------------------------------------
   587 ;; ----------------------------------------------------------------------
   588 ;; org-mode
   588 ;; org-mode
       
   589 
   589 ;; XXX org-todo-keywords '((sequence "TODO" "START" "|" "DONE")) для org-version 4.67c
   590 ;; XXX org-todo-keywords '((sequence "TODO" "START" "|" "DONE")) для org-version 4.67c
   590 ;; XXX (setq org-todo-keywords '("TODO" "START" "DONE")) для org-version 6.05b
   591 ;; XXX (setq org-todo-keywords '("TODO" "START" "DONE")) для org-version 6.05b
   591 (if (featurep 'org)
   592 (if (or (featurep 'org) (featurep 'org-install))
   592     (progn
   593     (progn
   593       (add-to-list 'auto-mode-alist '("\\.org$" . org-mode))
   594       (add-to-list 'auto-mode-alist '("\\.org$" . org-mode))
   594       (setq org-directory (expand-file-name "~/.gtd"))
   595       (setq org-directory (expand-file-name "~/.gtd"))
   595       (setq org-default-notes-file (expand-file-name "~/.gtd/notes"))
   596       (setq org-default-notes-file (expand-file-name "~/.gtd/notes"))
   596       (setq org-agenda-ndays 14
   597       (setq org-agenda-ndays 14