0
0
Fork 1
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-09-29 20:07:46 +00:00

org-src.el (org-edit-src-exit): Fix write-back-buf not getting killed

* lisp/org.el (org-edit-src-exit): Fix write-back-buf not getting
killed
This commit is contained in:
Sébastien Miquel 2021-05-16 19:13:53 +02:00 committed by Bastien
parent 8cf704e3fe
commit a9af1faaa1

View file

@ -1255,8 +1255,8 @@ Throw an error if there is no such buffer."
(narrow-to-region beg end)
(replace-buffer-contents write-back-buf)
(goto-char (point-max))))
(when (and expecting-bol (not (bolp))) (insert "\n")))
(when write-back-buf (kill-buffer write-back-buf))))
(when (and expecting-bol (not (bolp))) (insert "\n")))))
(when write-back-buf (kill-buffer write-back-buf))
;; If we are to return to source buffer, put point at an
;; appropriate location. In particular, if block is hidden, move
;; to the beginning of the block opening line.