Function: dape--source-make-buffer
dape--source-make-buffer is a natively compiled function defined in
dape.el.
Signature
(dape--source-make-buffer CONN NAME REFERENCE CONTENT MIME-TYPE)
Documentation
Make source buffer from REFERENCE for CONN's session.
Created from NAME, MIME-TYPE, REFERENCE and CONTENT.
Source Code
;; Defined in /nix/store/1fiaif8pifqj2jh65rbg3fkhg3i56q42-emacs-packages-deps/share/emacs/site-lisp/elpa/dape-0.27.1/dape.el
;;; Source buffers
(defun dape--source-make-buffer (conn name reference content mime-type)
"Make source buffer from REFERENCE for CONN's session.
Created from NAME, MIME-TYPE, REFERENCE and CONTENT."
(let ((root (dape--root-of conn))
(buffer (generate-new-buffer (format "*dape-source %s*" name))))
(setf (dape--source-buffers root)
(plist-put (dape--source-buffers root) reference buffer))
(with-current-buffer buffer
(when mime-type
(if-let* ((mode (cdr (assoc mime-type dape-mime-mode-alist))))
(unless (eq major-mode mode)
(funcall mode))
(message "Unknown mime type %s, see `dape-mime-mode-alist'"
mime-type)))
(setq buffer-read-only t)
(let ((inhibit-read-only t))
(erase-buffer)
(insert content))
(goto-char (point-min)))))