From ac1a4eb4b153f18d8766fdbe6ba4e2168f80ec16 Mon Sep 17 00:00:00 2001 From: Eric Abrahamsen Date: Sun, 14 Dec 2014 14:38:34 +0800 Subject: [PATCH] Use org-log-into-drawer in org-log-beginning * lisp/org.el (org-log-beginning): Use existing function for discovering the log specification. --- lisp/org.el | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/lisp/org.el b/lisp/org.el index bed5cb9..4aa7988 100755 --- a/lisp/org.el +++ b/lisp/org.el @@ -13609,8 +13609,7 @@ narrowing." (forward-line)) (if (org-at-heading-p) (point) (let ((end (save-excursion (outline-next-heading) (point))) - (drawer (cond ((stringp org-log-into-drawer) org-log-into-drawer) - (org-log-into-drawer "LOGBOOK")))) + (drawer (org-log-into-drawer))) (cond (drawer (let ((regexp (concat "^[ \t]*:" (regexp-quote drawer) ":[ \t]*$")) -- 2.1.3