[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

org-datetree-insert-line and org-blank-before-new-entry

From: Richard Walker
Subject: org-datetree-insert-line and org-blank-before-new-entry
Date: Wed, 1 Sep 2021 10:35:17 +1000

A follow-up to the changes made to org-datetree-insert-line
in September 2020.

The definition now begins:

(defun org-datetree-insert-line (year &optional month day text)
  (delete-region (save-excursion (skip-chars-backward " \t\n") (point)) (point))
  (when (assq 'heading org-blank-before-new-entry)
    (insert "\n"))

I'm getting blank lines inserted before new entries, and
I found a couple of sources of advice for setting org-blank-before-new-entry
that say to do this:

(setf org-blank-before-new-entry '((heading . nil) (plain-list-item . nil)))

Such a setting seems to be consistent with the help text of
org-blank-before-new-entry, and what org--blank-before-heading-p
expects to find. But, having made this setting,
  (when (assq 'heading org-blank-before-new-entry)
    (insert "\n"))
still does the insertion, since (assq 'heading org-blank-before-new-entry)
is non-nil.

Change (assq 'heading org-blank-before-new-entry)
to (org--blank-before-heading-p) here?

reply via email to

[Prev in Thread] Current Thread [Next in Thread]