0
0
Fork 1
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:
Nicolas Goaziou 2010-07-25 11:27:28 +02:00
parent 91488c75d5
commit 1bfe98bdf6

View file

@ -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]*$")