.emacs-my
changeset 616 c8a07683bc57
parent 615 22cf0c9014d9
child 617 5e34660f1a23
--- a/.emacs-my	Sat Mar 26 15:29:58 2011 +0200
+++ b/.emacs-my	Sat Mar 26 15:36:20 2011 +0200
@@ -918,6 +918,11 @@
   (setq org-agenda-files `(,my-org-agenda-todo-file ,my-org-agenda-note-file))
   (define-key global-map "\C-ca" 'org-agenda)
   (define-key global-map "\C-ct" (lambda nil (interactive) (find-file my-org-agenda-note-file)))
+  ;; I expect that these bindings work in all mode, Org mode use own, so redefine:
+  (define-key org-mode-map [C-S-right] 'forward-word-mark)
+  (define-key org-mode-map [C-S-left] 'backward-word-mark)
+  (define-key org-mode-map [S-up] 'previous-line-mark)
+  (define-key org-mode-map [S-down] 'next-line-mark)
 
   (when (or (featurep 'remember) (fboundp 'remember))
     (setq remember-annotation-functions '(org-remember-annotation))