mirrors/org-mode
0
0
Fork 1
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-07-20 01:26:29 +00:00
Code Releases Activity

Revert "org-log-beginning: Fix error creating LOGBOOK drawer at end of buffer"

Browse source 
This reverts commit c0b66bf9c1.

This itself caused a regression when inserting a new logbook drawer -
blank line is slurped.
This commit is contained in:
Ihor Radchenko 2024-06-05 15:32:54 +02:00
parent b8497aa7fe
commit 589e1f38c1
No known key found for this signature in database
GPG key ID: 6470762A7DA11D8B
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/org.el
View file

@ -10704,10 +10704,10 @@ narrowing."
(unless (bolp) (insert-and-inherit "\n")) (unless (bolp) (insert-and-inherit "\n"))
(let ((beg (point))) (let ((beg (point)))
(insert-and-inherit ":" drawer ":\n:END:") (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-indent-region beg (point))
(org-fold-region (line-end-position 0) (point) t 'drawer)))) (org-fold-region (line-end-position -1) (1- (point)) t 'drawer))))
(end-of-line 0)))) (end-of-line -1))))
(t (t
(org-end-of-meta-data org-log-state-notes-insert-after-drawers) (org-end-of-meta-data org-log-state-notes-insert-after-drawers)
(let ((endpos (point))) (let ((endpos (point)))