Jelajahi Sumber

Use `org-log-into-drawer' in `org-log-beginning'

* lisp/org.el (org-log-beginning): Use existing function for
  discovering the log specification.
Eric Abrahamsen 10 tahun lalu
induk
melakukan
94c1099dab
1 mengubah file dengan 1 tambahan dan 2 penghapusan
  1. 1 2
      lisp/org.el

+ 1 - 2
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]*$"))