emacs: use lambda for initial-buffer-choice
parent
8e2b1bb7bb
commit
809e3e0af8
|
@ -10,7 +10,6 @@
|
||||||
global-mark-ring-max 1024
|
global-mark-ring-max 1024
|
||||||
inhibit-compacting-font-caches t
|
inhibit-compacting-font-caches t
|
||||||
inhibit-startup-screen t
|
inhibit-startup-screen t
|
||||||
initial-buffer-choice "~/org/init.org"
|
|
||||||
initial-scratch-message nil
|
initial-scratch-message nil
|
||||||
mark-ring-max 1024)
|
mark-ring-max 1024)
|
||||||
|
|
||||||
|
@ -61,6 +60,12 @@
|
||||||
(add-hook 'hack-local-variables-hook #'agw-after-local-vars)
|
(add-hook 'hack-local-variables-hook #'agw-after-local-vars)
|
||||||
|
|
||||||
;; macros
|
;; macros
|
||||||
|
(setq initial-buffer-choice
|
||||||
|
(lambda ()
|
||||||
|
(if (buffer-file-name)
|
||||||
|
(current-buffer)
|
||||||
|
(find-file "~/org/init.org"))))
|
||||||
|
|
||||||
(add-hook 'emacs-lisp-mode-hook #'agw-fp-mode)
|
(add-hook 'emacs-lisp-mode-hook #'agw-fp-mode)
|
||||||
(add-hook 'lisp-mode-hook #'agw-fp-mode)
|
(add-hook 'lisp-mode-hook #'agw-fp-mode)
|
||||||
(add-hook 'reb-lisp-mode-hook #'agw-fp-mode)
|
(add-hook 'reb-lisp-mode-hook #'agw-fp-mode)
|
||||||
|
|
Loading…
Reference in New Issue