Use "*scratch*" as temp buffer.
authorOleksandr Gavenko <gavenkoa@gmail.com>
Tue, 11 Oct 2011 23:56:53 +0300
changeset 722 7d43d5ae86fe
parent 721 3eb929c032f4
child 724 77c31cb9ae75
child 725 76342f464abe
Use "*scratch*" as temp buffer.
.emacs-my
--- a/.emacs-my	Thu Oct 06 17:03:32 2011 +0300
+++ b/.emacs-my	Tue Oct 11 23:56:53 2011 +0300
@@ -405,6 +405,8 @@
   (if (equal (buffer-name) "*scratch*") 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*")))
+
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 (message "switching, creating, selecting buffers")
 
@@ -1037,7 +1039,7 @@
   (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-ct" (lambda nil (interactive) (find-file my-org-agenda-note-file)))
+  (define-key global-map "\C-ce" (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)