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 |
876 (setq |
877 org-directory "~/.gtd" |
877 org-directory "~/.gtd" |
878 org-default-notes-file "~/.gtd/notes" |
878 org-default-notes-file nil |
879 org-agenda-ndays 31 |
879 org-agenda-ndays 31 |
880 org-deadline-warning-days 7 |
880 org-deadline-warning-days 7 |
881 org-agenda-show-all-dates t |
881 org-agenda-show-all-dates t |
882 org-agenda-format-date "%Y-%m-%d, %A %e %B" |
882 org-agenda-format-date "%Y-%m-%d, %A %e %B" |
883 org-agenda-skip-deadline-if-done t |
883 org-agenda-skip-deadline-if-done t |
885 org-agenda-start-on-weekday nil |
885 org-agenda-start-on-weekday nil |
886 org-reverse-note-order t |
886 org-reverse-note-order t |
887 org-hide-leading-stars t |
887 org-hide-leading-stars t |
888 org-tags-column 64 |
888 org-tags-column 64 |
889 ) |
889 ) |
|
890 (setq my-org-agenda-todo-file "~/.gtd/todo.org") |
|
891 (setq my-org-agenda-note-file "~/.gtd/note.org") |
|
892 (setq org-agenda-files `(,my-org-agenda-todo-file ,my-org-agenda-note-file)) |
890 (define-key global-map "\C-ca" 'org-agenda) |
893 (define-key global-map "\C-ca" 'org-agenda) |
891 |
894 |
892 (when |
895 (when |
893 (or (featurep 'remember) (fboundp 'remember)) |
896 (or (featurep 'remember) (fboundp 'remember)) |
894 (progn |
897 (progn |
896 (setq remember-handler-functions '(org-remember-handler)) |
899 (setq remember-handler-functions '(org-remember-handler)) |
897 (add-hook 'remember-mode-hook 'org-remember-apply-template) |
900 (add-hook 'remember-mode-hook 'org-remember-apply-template) |
898 (define-key global-map "\C-cr" 'org-remember) |
901 (define-key global-map "\C-cr" 'org-remember) |
899 (setq org-remember-templates |
902 (setq org-remember-templates |
900 ;; With one item emacs do not prompt choose template. |
903 ;; With one item emacs do not prompt choose template. |
901 '((?t "* TODO %?" "~/.gtd/todo.org") |
904 `( |
902 ;; (?j "* %^{topic}\n %T\n" "~/.gtd/journal.org") |
905 ("todo" ?t "* TODO %?" ,my-org-agenda-todo-file) |
|
906 ("note" ?n "* %^{Title}\n %?\n %a" ,my-org-agenda-note-file) |
903 )) |
907 )) |
904 (setq org-remember-store-without-prompt t) |
908 (setq org-remember-store-without-prompt t) |
|
909 (org-remember-insinuate) |
905 )) |
910 )) |
906 |
911 |
907 (setq org-agenda-files '("~/.gtd/todo.org")) |
|
908 ;; (setq org-todo-keyword-faces |
912 ;; (setq org-todo-keyword-faces |
909 ;; '(("TODO" . (:foreground "red" :weight bold)) |
913 ;; '(("TODO" . (:foreground "red" :weight bold)) |
910 ;; ("WAIT" . (:foreground "orange" :weight bold)) |
914 ;; ("WAIT" . (:foreground "orange" :weight bold)) |
911 ;; ("DONE" . (:foreground "green" :weight bold))) ) |
915 ;; ("DONE" . (:foreground "green" :weight bold))) ) |
912 )) |
916 )) |