# HG changeset patch
# User Oleksandr Gavenko <gavenkoa@gmail.com>
# Date 1350925701 -10800
# Node ID 4c9cf099d204798ec9663eef830e5d1463cd1bb1
# Parent  5d0ffd485a43e4b9283b60f8e9e54e3e581268af# Parent  e1eb89d9957004e6144172b0e8d7bac0b32e1d75
merged

diff -r 5d0ffd485a43 -r 4c9cf099d204 .emacs-my
--- a/.emacs-my	Mon Oct 22 15:56:27 2012 +0300
+++ b/.emacs-my	Mon Oct 22 20:08:21 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.
           `(