--- a/.emacs-my	Tue Dec 10 18:07:06 2019 +0200
+++ b/.emacs-my	Tue Dec 10 18:08:41 2019 +0200
@@ -12,6 +12,24 @@
 (with-no-warnings (require 'cl))
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+(message "silent runing")
+
+(setq inhibit-splash-screen t)
+(setq inhibit-startup-message t)
+
+(setq initial-scratch-message nil)
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+(message "helper buffers")
+
+(define-key global-map "\C-v" nil)
+(define-key global-map "\C-vt" (lambda nil (interactive) (switch-to-buffer "*scratch*")))
+
+(defvar my-work-file (expand-file-name "~/work.txt"))
+(setq initial-buffer-choice my-work-file)
+(define-key global-map "\C-vw" (lambda nil (interactive) (find-file-literally my-work-file)))
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 (message "recentf")
 
 (eval-and-compile
@@ -467,14 +485,6 @@
   (setq confirm-kill-emacs 'y-or-n-p))
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-(message "silent runing")
-
-(setq inhibit-splash-screen t)
-(setq inhibit-startup-message t)
-
-(setq initial-scratch-message nil)
-
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 (message "date, time")
 
 (require 'time)
@@ -676,8 +686,6 @@
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 (message "standart/general settings")
 
-(eval-when 'compile (require 'generic))
-
 ;; Try to speed things up, especially in VM.
 (setq gc-cons-threshold 2000000)
 
@@ -767,9 +775,6 @@
   (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-v" nil)
-(define-key global-map "\C-vt" (lambda nil (interactive) (switch-to-buffer "*scratch*")))
-
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 (message "scrolling")