# HG changeset patch # User Oleksandr Gavenko # Date 1299146527 -7200 # Node ID d82530e4f0a61f014acac58d0767a438d7f99f29 # Parent aa917b11ffef4057a9a7f32107d488d4b75302d3 Move common part. diff -r aa917b11ffef -r d82530e4f0a6 .emacs-my --- a/.emacs-my Thu Mar 03 11:57:25 2011 +0200 +++ b/.emacs-my Thu Mar 03 12:02:07 2011 +0200 @@ -861,27 +861,12 @@ (when (>= emacs-major-version 23) (require 'remember)) -(when - (or (featurep 'remember) (fboundp 'remember)) - (progn - (setq remember-annotation-functions '(org-remember-annotation)) - (setq remember-handler-functions '(org-remember-handler)) - (add-hook 'remember-mode-hook 'org-remember-apply-template) - (define-key global-map "\C-cr" 'org-remember) - (setq org-remember-templates - ;; With one item emacs do not prompt choose template. - '((?t "* TODO %?" "~/.gtd/todo.org") - ;; (?j "* %^{topic}\n %T\n" "~/.gtd/journal.org") - )) - (setq org-remember-store-without-prompt t) - )) ;;; ---------------------------------------------------------------- (message "org-mode, GTD, PIM, organize, todo") (when (>= emacs-major-version 22) - (require 'org) - ) + (require 'org)) ;; XXX org-todo-keywords '((sequence "TODO" "START" "|" "DONE")) for org-version 4.67c ;; XXX (setq org-todo-keywords '("TODO" "START" "DONE")) for org-version 6.05b @@ -902,6 +887,22 @@ org-tags-column 64 ) (define-key global-map "\C-ca" 'org-agenda) + + (when + (or (featurep 'remember) (fboundp 'remember)) + (progn + (setq remember-annotation-functions '(org-remember-annotation)) + (setq remember-handler-functions '(org-remember-handler)) + (add-hook 'remember-mode-hook 'org-remember-apply-template) + (define-key global-map "\C-cr" 'org-remember) + (setq org-remember-templates + ;; With one item emacs do not prompt choose template. + '((?t "* TODO %?" "~/.gtd/todo.org") + ;; (?j "* %^{topic}\n %T\n" "~/.gtd/journal.org") + )) + (setq org-remember-store-without-prompt t) + )) + (setq org-agenda-files '("~/.gtd/todo.org")) ;; (setq org-todo-keyword-faces ;; '(("TODO" . (:foreground "red" :weight bold))