.emacs-my
changeset 777 398db35ab2ca
parent 776 1e680ded54d1
child 778 5caafff0b291
equal deleted inserted replaced
776:1e680ded54d1 777:398db35ab2ca
  1098   (setq my-org-agenda-todo-file (concat org-directory "/TODO.org"))
  1098   (setq my-org-agenda-todo-file (concat org-directory "/TODO.org"))
  1099   (setq my-org-agenda-note-file (concat org-directory "/NOTE.org"))
  1099   (setq my-org-agenda-note-file (concat org-directory "/NOTE.org"))
  1100   (setq org-agenda-files `(,my-org-agenda-todo-file ,my-org-agenda-note-file))
  1100   (setq org-agenda-files `(,my-org-agenda-todo-file ,my-org-agenda-note-file))
  1101   (define-key global-map "\C-ca" 'org-agenda)
  1101   (define-key global-map "\C-ca" 'org-agenda)
  1102   (define-key global-map "\C-ce" (lambda nil (interactive) (find-file my-org-agenda-note-file)))
  1102   (define-key global-map "\C-ce" (lambda nil (interactive) (find-file my-org-agenda-note-file)))
  1103   ;; I expect that these bindings work in all mode, Org mode use own, so redefine:
       
  1104   (define-key org-mode-map [C-S-right] 'forward-word-mark)
       
  1105   (define-key org-mode-map [C-S-left] 'backward-word-mark)
       
  1106   (define-key org-mode-map [S-up] 'previous-line-mark)
       
  1107   (define-key org-mode-map [S-down] 'next-line-mark)
       
  1108 
  1103 
  1109   ;; My tags for remember buffer.
  1104   ;; My tags for remember buffer.
  1110   (setq org-tag-persistent-alist
  1105   (setq org-tag-persistent-alist
  1111         '(
  1106         '(
  1112           ("ADMIN" . ?a)
  1107           ("ADMIN" . ?a)