diff -r 72d443fe2b1d -r e1eb89d99570 .emacs-my --- a/.emacs-my Wed Oct 17 13:26:01 2012 +0300 +++ b/.emacs-my Thu Oct 18 20:22:11 2012 +0300 @@ -498,7 +498,8 @@ (if (member (buffer-name) '("*scratch*" "NOTE.org")) nil t)) (add-to-list 'kill-buffer-query-functions 'my-prevent-kill-buffer) -(define-key global-map "\C-ct" (lambda nil (interactive) (switch-to-buffer "*scratch*"))) +(define-key global-map "\C-v" nil) +(define-key global-map "\C-vt" (lambda nil (interactive) (switch-to-buffer "*scratch*"))) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (message "package, elpa") @@ -1214,8 +1215,8 @@ (setq my-org-agenda-todo-file (concat org-directory "/TODO.org")) (setq my-org-agenda-note-file (concat org-directory "/NOTE.org")) (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-ce" (lambda nil (interactive) (find-file my-org-agenda-note-file))) + (define-key global-map "\C-va" 'org-agenda) + (define-key global-map "\C-ve" (lambda nil (interactive) (find-file my-org-agenda-note-file))) ;; My tags for remember buffer. (setq org-tag-persistent-alist @@ -1236,7 +1237,7 @@ (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) + (define-key global-map "\C-vr" 'org-remember) (setq org-remember-templates ;; With one item org-mode do not prompt choose template. `(