|
@@ -19212,7 +19212,8 @@ Returns the number of empty lines passed."
|
|
(let ((pos (point)))
|
|
(let ((pos (point)))
|
|
(if (cdr (assoc 'heading org-blank-before-new-entry))
|
|
(if (cdr (assoc 'heading org-blank-before-new-entry))
|
|
(skip-chars-backward " \t\n\r")
|
|
(skip-chars-backward " \t\n\r")
|
|
- (forward-line -1))
|
|
|
|
|
|
+ (unless (eobp)
|
|
|
|
+ (forward-line -1)))
|
|
(beginning-of-line 2)
|
|
(beginning-of-line 2)
|
|
(goto-char (min (point) pos))
|
|
(goto-char (min (point) pos))
|
|
(count-lines (point) pos)))
|
|
(count-lines (point) pos)))
|