.emacs-my
changeset 588 aa917b11ffef
parent 587 ad59879d4891
child 589 d82530e4f0a6
--- a/.emacs-my	Thu Mar 03 11:43:55 2011 +0200
+++ b/.emacs-my	Thu Mar 03 11:57:25 2011 +0200
@@ -857,10 +857,27 @@
 ;(setq flyspell-delay '1)
 
 ;;; ----------------------------------------------------------------
-(message "GTD, PIM, organize, todo mode")
+(message "remember-mode")
+
+(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")
+(message "org-mode, GTD, PIM, organize, todo")
 
 (when (>= emacs-major-version 22)
   (require 'org)
@@ -893,26 +910,6 @@
       ))
 
 ;;; ----------------------------------------------------------------
-(message "remember-mode")
-
-(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 "TODO, XXX, FIXME highlight")
 ;; Show blanks and FIXME
 ;; http://www.emacswiki.org/cgi-bin/wiki/EightyColumnRule