 
 (use-package recentf
   :ensure nil
-  :bind ("C-c C-r" . recentf-open-files)
+  :bind (
+          ("C-c C-r" . recentf-open-files))
   :defer 2
   :commands (recentf-add-file recentf-apply-filename-handlers recentf-mode )
   :preface

      (setq initial-scratch-message (oblique-strategy))))
  ;; Does not seem to work. Use instead:
  ;; https://github.com/tecosaur/emacs-config/blob/master/config.org#splash-screen
  :bind ( ("C-c C-o"  . my/oblique-strategy)
          ("C-c C-O" . insert-oblique-strategy))
  :custom
  (oblique-edition "strategies/oblique-strategies-condensed.txt" "Version to draw a strategy from."))


;; ======================================================================

;; Adapted from source: https://stackoverflow.com/a/11916238/3899249
(defvar my/buffer-kill-all-exceptions
  '( "\\`\\*scratch\\*.*\\'"
     "\\`\\*Messages\\*\\'"
     "\\` \\*Minibuf-[[:digit:]]+\\*\\'"
     "\\` \\*Echo Area [[:digit:]]+\\*\\'")
  "Exception list for `my/buffer-kill-all-but-exceptions'.")

(defun my/buffer-kill-all-but-exceptions ()
  "Kill all buffers except those in `my/buffer-kill-all-exceptions'."
  (interactive)
  (mapc (lambda (buf)
          (let
            ((buf-name (buffer-name buf)))
            (when
              (and
                ;; if a buffer's name is enclosed by * with optional leading space characters
                ;; (string-match-p "\\` *\\*.*\\*\\'" buf-name)
                ;; The buffer must not be associated with a process
                (null
                  (get-buffer-process buf))
                ;; The buffer's name must not be in `my/buffer-kill-all-exceptions' var
                (null
                  (lambda
                    (exception)
                    (string-match-p exception buf-name)
                    (my/buffer-kill-all-exceptions)))
                (kill-buffer buf)))))
    (buffer-list)))

(defun my/buffer-new-scratch ()
