21 lines
521 B
EmacsLisp
Executable File
21 lines
521 B
EmacsLisp
Executable File
;;; -*- lexical-binding: t; -*-
|
|
|
|
(require 'syd/base)
|
|
|
|
;; Persistent and per-project scratch buffers.
|
|
(use-package scratch-plus
|
|
:hook after-init
|
|
:custom ((scratch-plus-save-directory
|
|
(file-name-concat syd-data-dir "scratch"))
|
|
(scratch-plus-project-subdir "scratch")))
|
|
|
|
(setq
|
|
;; Disable the initial "help" screen, in favour of starting off in
|
|
;; the scratch buffer.
|
|
inhibit-splash-screen t
|
|
inhibit-startup-screen t
|
|
inhibit-startup-message t
|
|
initial-buffer-choice t)
|
|
|
|
(provide 'syd/scratch)
|