mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-08-22 12:18:40 +00:00
Minor refactoring.
This commit is contained in:
parent
91488c75d5
commit
1bfe98bdf6
|
@ -439,8 +439,7 @@ function ends."
|
|||
(after-text
|
||||
(when (< pos end-before-blank)
|
||||
(prog1
|
||||
(buffer-substring pos end-before-blank)
|
||||
(delete-region pos end-before-blank)
|
||||
(delete-and-extract-region pos end-before-blank)
|
||||
;; delete any blank line at and before point.
|
||||
(beginning-of-line)
|
||||
(while (looking-at "^[ \t]*$")
|
||||
|
|
Loading…
Reference in a new issue