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