.emacs-my
changeset 587 ad59879d4891
parent 586 e140d8539157
child 588 aa917b11ffef
equal deleted inserted replaced
586:e140d8539157 587:ad59879d4891
   893       ))
   893       ))
   894 
   894 
   895 ;;; ----------------------------------------------------------------
   895 ;;; ----------------------------------------------------------------
   896 (message "remember-mode")
   896 (message "remember-mode")
   897 
   897 
   898 (if (or (featurep 'remember) (fboundp 'remember))
   898 (when (>= emacs-major-version 23)
   899     (progn
   899   (require 'remember))
   900       (setq remember-annotation-functions '(org-remember-annotation))
   900 (when
   901       (setq remember-handler-functions '(org-remember-handler))
   901     (or (featurep 'remember) (fboundp 'remember))
   902       (add-hook 'remember-mode-hook 'org-remember-apply-template)
   902   (progn
   903       (define-key global-map "\C-cr" 'org-remember)
   903     (setq remember-annotation-functions '(org-remember-annotation))
   904       (setq org-remember-templates
   904     (setq remember-handler-functions '(org-remember-handler))
   905             ;; With one item emacs do not prompt choose template.
   905     (add-hook 'remember-mode-hook 'org-remember-apply-template)
   906             '((?t "* TODO %?" "~/.gtd/todo.org")
   906     (define-key global-map "\C-cr" 'org-remember)
   907               ;; (?j "* %^{topic}\n  %T\n" "~/.gtd/journal.org")
   907     (setq org-remember-templates
   908               ))
   908           ;; With one item emacs do not prompt choose template.
   909       (setq org-remember-store-without-prompt t)
   909           '((?t "* TODO %?" "~/.gtd/todo.org")
   910       ))
   910             ;; (?j "* %^{topic}\n  %T\n" "~/.gtd/journal.org")
       
   911             ))
       
   912     (setq org-remember-store-without-prompt t)
       
   913     ))
   911 
   914 
   912 ;;; ----------------------------------------------------------------
   915 ;;; ----------------------------------------------------------------
   913 (message "TODO, XXX, FIXME highlight")
   916 (message "TODO, XXX, FIXME highlight")
   914 ;; Show blanks and FIXME
   917 ;; Show blanks and FIXME
   915 ;; http://www.emacswiki.org/cgi-bin/wiki/EightyColumnRule
   918 ;; http://www.emacswiki.org/cgi-bin/wiki/EightyColumnRule