Function: get-scratch-buffer-create

get-scratch-buffer-create is a byte-compiled function defined in compat-29.el.

Signature

(get-scratch-buffer-create)

Documentation

[Compatibility function for get-scratch-buffer-create, defined in Emacs
29.1. See (compat) Emacs 29.1' for more details.]

Return the *scratch* buffer, creating a new one if needed.

Source Code

;; Defined in ~/.emacs.d/elpa/compat-30.1.0.1/compat-29.el
(compat-defun get-scratch-buffer-create () ;; <compat-tests:get-scratch-buffer-create>
  "Return the *scratch* buffer, creating a new one if needed."
  (or (get-buffer "*scratch*")
      (let ((scratch (get-buffer-create "*scratch*")))
        ;; Don't touch the buffer contents or mode unless we know that
        ;; we just created it.
        (with-current-buffer scratch
          (when initial-scratch-message
            (insert (substitute-command-keys initial-scratch-message))
            (set-buffer-modified-p nil))
          (funcall initial-major-mode))
        scratch)))