.emacs-my
changeset 1603 23bc0ad590b9
parent 1602 c1c4e95f4618
child 1604 72fa4385c7ba
equal deleted inserted replaced
1602:c1c4e95f4618 1603:23bc0ad590b9
    27 (define-key global-map "\C-v" nil)
    27 (define-key global-map "\C-v" nil)
    28 (define-key global-map "\C-vt" (lambda nil (interactive) (switch-to-buffer "*scratch*")))
    28 (define-key global-map "\C-vt" (lambda nil (interactive) (switch-to-buffer "*scratch*")))
    29 
    29 
    30 (defvar my-work-file (expand-file-name "~/work.txt"))
    30 (defvar my-work-file (expand-file-name "~/work.txt"))
    31 (setq initial-buffer-choice my-work-file)
    31 (setq initial-buffer-choice my-work-file)
    32 (define-key global-map "\C-vw" (lambda nil (interactive) (find-file-literally my-work-file)))
    32 (define-key global-map "\C-vw" (lambda nil (interactive) (find-file my-work-file)))
    33 
    33 
    34 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    34 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    35 (message "recentf")
    35 (message "recentf")
    36 
    36 
    37 (eval-and-compile
    37 (eval-and-compile