916 (setq my-org-agenda-todo-file "~/.gtd/TODO.org") |
916 (setq my-org-agenda-todo-file "~/.gtd/TODO.org") |
917 (setq my-org-agenda-note-file "~/.gtd/NOTE.org") |
917 (setq my-org-agenda-note-file "~/.gtd/NOTE.org") |
918 (setq org-agenda-files `(,my-org-agenda-todo-file ,my-org-agenda-note-file)) |
918 (setq org-agenda-files `(,my-org-agenda-todo-file ,my-org-agenda-note-file)) |
919 (define-key global-map "\C-ca" 'org-agenda) |
919 (define-key global-map "\C-ca" 'org-agenda) |
920 (define-key global-map "\C-ct" (lambda nil (interactive) (find-file my-org-agenda-note-file))) |
920 (define-key global-map "\C-ct" (lambda nil (interactive) (find-file my-org-agenda-note-file))) |
|
921 ;; I expect that these bindings work in all mode, Org mode use own, so redefine: |
|
922 (define-key org-mode-map [C-S-right] 'forward-word-mark) |
|
923 (define-key org-mode-map [C-S-left] 'backward-word-mark) |
|
924 (define-key org-mode-map [S-up] 'previous-line-mark) |
|
925 (define-key org-mode-map [S-down] 'next-line-mark) |
921 |
926 |
922 (when (or (featurep 'remember) (fboundp 'remember)) |
927 (when (or (featurep 'remember) (fboundp 'remember)) |
923 (setq remember-annotation-functions '(org-remember-annotation)) |
928 (setq remember-annotation-functions '(org-remember-annotation)) |
924 (setq remember-handler-functions '(org-remember-handler)) |
929 (setq remember-handler-functions '(org-remember-handler)) |
925 (add-hook 'remember-mode-hook 'org-remember-apply-template) |
930 (add-hook 'remember-mode-hook 'org-remember-apply-template) |