Fix 434103

* lisp/org.el (org-log-into-drawer): Fix
  04f6830a46e54db23afbe3c94de38a22c3.

1 files changed, 6 insertions, 6 deletions

diff --git a/lisp/org.el b/lisp/org.el
index c4e053e..e359922 100755
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -2972,12 +2972,12 @@ This is the value of `org-log-into-drawer'.  However, if the
 current entry has or inherits a LOG_INTO_DRAWER property, it will
 be used instead of the default value."
   (let ((p (org-entry-get nil "LOG_INTO_DRAWER" 'inherit t)))
-    (cond
-     ((not p) org-log-into-drawer)
-     ((equal p "nil") nil)
-     ((equal p "t") "LOGBOOK")
-     ((stringp p) p)
-     (p "LOGBOOK"))))
+    (cond ((equal p "nil") nil)
+	  ((equal p "t") "LOGBOOK")
+	  ((stringp p) p)
+	  (p "LOGBOOK")
+	  ((stringp org-log-into-drawer) org-log-into-drawer)
+	  (org-log-into-drawer "LOGBOOK"))))
 
 (defcustom org-log-state-notes-insert-after-drawers nil
   "Non-nil means insert state change notes after any drawers in entry.