871 ;; XXX org-todo-keywords '((sequence "TODO" "START" "|" "DONE")) for org-version 4.67c |
871 ;; XXX org-todo-keywords '((sequence "TODO" "START" "|" "DONE")) for org-version 4.67c |
872 ;; XXX (setq org-todo-keywords '("TODO" "START" "DONE")) for org-version 6.05b |
872 ;; XXX (setq org-todo-keywords '("TODO" "START" "DONE")) for org-version 6.05b |
873 (if (or (featurep 'org) (featurep 'org-install)) |
873 (if (or (featurep 'org) (featurep 'org-install)) |
874 (progn |
874 (progn |
875 (add-to-list 'auto-mode-alist '("\\.org$" . org-mode)) |
875 (add-to-list 'auto-mode-alist '("\\.org$" . org-mode)) |
876 (setq org-directory (expand-file-name "~/.gtd")) |
876 (setq |
877 (setq org-default-notes-file (expand-file-name "~/.gtd/notes")) |
877 org-directory "~/.gtd" |
878 (setq org-agenda-ndays 31 |
878 org-default-notes-file "~/.gtd/notes" |
879 org-deadline-warning-days 7 |
879 org-agenda-ndays 31 |
880 org-agenda-show-all-dates t |
880 org-deadline-warning-days 7 |
881 org-agenda-format-date "%Y-%m-%d, %A %e %B" |
881 org-agenda-show-all-dates t |
882 org-agenda-skip-deadline-if-done t |
882 org-agenda-format-date "%Y-%m-%d, %A %e %B" |
883 org-agenda-skip-scheduled-if-done t |
883 org-agenda-skip-deadline-if-done t |
884 org-agenda-start-on-weekday nil |
884 org-agenda-skip-scheduled-if-done t |
885 org-reverse-note-order t |
885 org-agenda-start-on-weekday nil |
886 org-hide-leading-stars t |
886 org-reverse-note-order t |
887 org-tags-column 64 |
887 org-hide-leading-stars t |
888 ) |
888 org-tags-column 64 |
|
889 ) |
889 (define-key global-map "\C-ca" 'org-agenda) |
890 (define-key global-map "\C-ca" 'org-agenda) |
890 |
891 |
891 (when |
892 (when |
892 (or (featurep 'remember) (fboundp 'remember)) |
893 (or (featurep 'remember) (fboundp 'remember)) |
893 (progn |
894 (progn |