equal
deleted
inserted
replaced
98 (require 'org)) |
98 (require 'org)) |
99 |
99 |
100 (when (or (featurep 'org) (featurep 'org-install)) |
100 (when (or (featurep 'org) (featurep 'org-install)) |
101 (message "Many lines here...")) |
101 (message "Many lines here...")) |
102 |
102 |
|
103 (cond |
|
104 ((featurep 'org-capture) |
|
105 (setq org-default-notes-file my-org-agenda-todo-file) |
|
106 (setq org-capture-templates |
|
107 '(("t" "Todo" entry (file my-org-agenda-todo-file) "* %?\n SCHEDULED: %T"))) |
|
108 (define-key global-map "\C-vr" |
|
109 (lambda () (interactive) (org-capture nil "t"))) |
|
110 ) |
|
111 ((or (featurep 'remember) (fboundp 'remember)) |
|
112 (setq remember-annotation-functions '(org-remember-annotation)) |
|
113 (setq remember-handler-functions '(org-remember-handler)) |
|
114 (add-hook 'remember-mode-hook 'org-remember-apply-template) |
|
115 (define-key global-map "\C-vr" 'org-remember) |
|
116 (setq org-remember-templates |
|
117 ;; With one item org-mode do not prompt choose template. |
|
118 `( |
|
119 ("todo" ?t "* TODO %?" ,my-org-agenda-todo-file) |
|
120 ;; ("note" ?n "* %?\n" ,my-org-agenda-note-file) |
|
121 )) |
|
122 (setq org-remember-store-without-prompt t) |
|
123 (org-remember-insinuate) |
|
124 )) |