From 589e1f38c165cf8e47f58b8b1702287f98ec7852 Mon Sep 17 00:00:00 2001 From: Ihor Radchenko Date: Wed, 5 Jun 2024 15:32:54 +0200 Subject: [PATCH] Revert "org-log-beginning: Fix error creating LOGBOOK drawer at end of buffer" This reverts commit c0b66bf9c15ab1a0fc129dc49dc5f79583c223ad. This itself caused a regression when inserting a new logbook drawer - blank line is slurped. --- lisp/org.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lisp/org.el b/lisp/org.el index 0bde18397..c25134e84 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -10704,10 +10704,10 @@ narrowing." (unless (bolp) (insert-and-inherit "\n")) (let ((beg (point))) (insert-and-inherit ":" drawer ":\n:END:") - (unless (eolp) (insert-and-inherit "\n") (backward-char)) + (if (eolp) (forward-char) (insert "\n")) (org-indent-region beg (point)) - (org-fold-region (line-end-position 0) (point) t 'drawer)))) - (end-of-line 0)))) + (org-fold-region (line-end-position -1) (1- (point)) t 'drawer)))) + (end-of-line -1)))) (t (org-end-of-meta-data org-log-state-notes-insert-after-drawers) (let ((endpos (point)))