584 ;; Organize, todo mode. |
584 ;; Organize, todo mode. |
585 |
585 |
586 ;; ---------------------------------------------------------------------- |
586 ;; ---------------------------------------------------------------------- |
587 ;; org-mode |
587 ;; org-mode |
588 |
588 |
|
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 ;; XXX org-default-notes-file "~/notes.org" not worked as I not using remember.el. |
|
592 (if (featurep 'org) |
592 (if (featurep 'org) |
593 (progn |
593 (progn |
594 (add-to-list 'auto-mode-alist '("\\.org$" . org-mode)) |
594 (add-to-list 'auto-mode-alist '("\\.org$" . org-mode)) |
|
595 (setq org-directory (expand-file-name "~/.gtd")) |
|
596 (setq org-default-notes-file (expand-file-name "~/.gtd/notes")) |
595 (setq org-agenda-ndays 20 |
597 (setq org-agenda-ndays 20 |
596 org-deadline-warning-days 14 |
598 org-deadline-warning-days 14 |
597 org-agenda-show-all-dates t |
599 org-agenda-show-all-dates t |
598 org-agenda-skip-deadline-if-done t |
600 org-agenda-skip-deadline-if-done t |
599 org-agenda-skip-scheduled-if-done t |
601 org-agenda-skip-scheduled-if-done t |
600 org-agenda-start-on-weekday nil |
602 org-agenda-start-on-weekday nil |
601 org-reverse-note-order t |
603 org-reverse-note-order t |
602 org-remember-store-without-prompt t) |
604 org-remember-store-without-prompt t) |
603 (setq org-agenda-files '("~/todo.org")) )) |
605 (setq org-agenda-files '("~/.gtd/todo.org")) )) |
604 |
606 |
605 ;; ---------------------------------------------------------------------- |
607 ;; ---------------------------------------------------------------------- |
606 ;; TODO, XXX, FIXME highlight. |
608 ;; TODO, XXX, FIXME highlight. |
607 ;; Show blanks and FIXME |
609 ;; Show blanks and FIXME |
608 ;; http://www.emacswiki.org/cgi-bin/wiki/EightyColumnRule |
610 ;; http://www.emacswiki.org/cgi-bin/wiki/EightyColumnRule |