pinwheel: Make sure e can open files when started

2023-11-12 14:26:53 +01:00
parent ea4c10c703
commit c623fe2c09
2 changed files with 11 additions and 5 deletions
--- a/hosts/pinwheel/modules/emacs/config.org
+++ b/hosts/pinwheel/modules/emacs/config.org
@@ -63,8 +63,14 @@
 *** Disable startup messages
 #+BEGIN_SRC emacs-lisp
  (setq inhibit-startup-message t)
-  (setq initial-buffer-choice t)
  (setq initial-scratch-message nil)
+
+  (setq initial-buffer-choice
+    (lambda ()
+      (if (buffer-file-name)
+        (current-buffer)
+        (scratch-buffer)
+        )))
 #+END_SRC
 *** Don't resize gui when setting new font
 ... it affecs startup time