Hi Bastien,
Bastien writes:
Sorry it took so long to apply this patch, this is now done in maint.
No problem, thank you for getting back on this.
I think something went wrong though. I've attached as a new patch a
part of the previous one that wasn't applied. Without it, some
write-back buffers are never killed.
Regards,
--
Sébastien Miquel
>From f293a9d5808c413ce785646ebf5f480df3a00a2f Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?S=C3=A9bastien=20Miquel?= <sebastien.miq...@posteo.eu>
Date: Sun, 16 May 2021 19:13:53 +0200
Subject: [PATCH] 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
---
lisp/org-src.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/lisp/org-src.el b/lisp/org-src.el
index df3c76e13..5604e6568 100644
--- a/lisp/org-src.el
+++ b/lisp/org-src.el
@@ -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.
--
2.31.1
